BYE.MAC/AU:72./-BF=BYE.MAC;2 -,,/; RVT01/ -/.IDENT/,. .IDENT /3.1XE/ -/DD041/ ; RAY VAN TASSLE 1-20-81 ; HAVE IT SPAWN & WAIT FOR UPD (AVOIDS PROBLEM WITH ; TERMINAL BEING LOGGED OFF BEFORE UPD STARTS UP) ; ; HAVE IT SHOOT A COMMAND TO AT. TO RESET TERMINAL ; CHARACTERISTICS OF THE TI: ; THIS SLP FILE IS RUN AFTER THE KMS-FUSION ONE ; -/MSG1A:/ -/MSG1A:/,. MSG1A: .ASCIZ /DDNN: LOGGED OFF/<15><12> -/UPDAT:/ UPDATL=.-UPDAT-1 .EVEN SPNUPD: SPWN$ MCR...,,,,,1,,,UPDAT,UPDATL SPNAT: SPWN$ MCR...,,,,,1,,,ATCM,ATCML ATCM: .ASCII "@LB0:[001,005]SETTERM/-LI " ATUN: .ASCII /DDNN:/<33> ATCML=.-ATCM-1 .EVEN -/MOV #MSG1,R0/,.+2 -/MOV #UPDAT,R5/,.+1 MOVB #033,UPDAT+UPDATL-1 ; UPD TO NOT PROMPT CLR U.LUIC(R0) ; SO UPD WILL THINK WE ARE PRIV DIR$ #SPNUPD ; SPAWN UPD & WAIT FOR IT BCS 15$ WTSE$S #1 -/BYEXIT:/,.+1 BYEXIT: MOV #MSG1,R0 ; PRINT MESSAGE CLR ERRDPB+Q.IOPL+4 CALL BYEERR MOV UCB,R0 ; SPAWN AT. TO RESET THE TERMINAL CHARACTERISTICS MOVB MSG1A+0,ATUN+0 MOVB MSG1A+1,ATUN+1 MOVB MSG1A+2,ATUN+2 MOVB MSG1A+3,ATUN+3 DIR$ #SPNAT BCS 26$ WTSE$S #1 26$: BIS #U2.LOG,U.CW2(R0) ; LOG TERMINAL OFF -/T3.MCR/,. /