; ; ; KOMMANDOFIL LB:[1,2]UTKREGENT.CMD -- ; -- G\R ENTER P] ALLA UTKBEV REGISTER ; ; ; VERSION 88-01-17 B-E TAPPER ; ; .ENABLE GLOBAL .ENABLE SUBSTITUTION .; .; .; .SETF PRTOUT !F\R FELS\KNING .; .; .; .; .DISABLE QUIET .IFNINS VFSACP ;VFSACP EJ INSTALLERAD .IFNINS VFSACP .EXIT 4 .SETF PIPNIN .IFNINS PIP .SETT PIPNIN .IFNINS PIP INS $PIP .IFNINS PIP ;PIP EJ INSTALLERBART .IFNINS PIP .EXIT 4 .SETF VFUNIN .IFNINS VFU .SETT VFUNIN .IFNINS VFU INS $VFU/IOP=NO .IFNINS VFU ;VFU EJ INSTALLERBART .IFNINS VFU .EXIT 4 .; .; ; ; G\R ENTER P] VTS UTKBEV REGISTER ; .ENTER: .IFF PRTOUT .ENABLE QUIET VFU @LB:[1,2]UTKREGENT.VFU .SETN EXST .IF EXST NE 1 .DISABLE QUIET .IF EXST NE 1 ;UTKREGENT SKET SIG .IF EXST NE 1 .PAUSE ; .IFT VFUNIN .IFINS VFU REM VFU .IFT PIPNIN .IFINS PIP REM PIP .EXIT 'EXST' ; ; UTKREGENT.CMD ;