Listing of file='@CONNECT' on disk='vmedia/bsc_3271_rel_1.14.04.wvd.zip'
# Sector 1232, program filename = '@CONNECT' 0010 % @CONNECT 02/04/83 -- Sample log on program 0020 $PSTAT="@CONNECT" 0030 $DISCONNECT ON 120 : REM /.Respond within 120 seconds 0040 REM %.Title : PRINT HEX(03);AT(0,30);"LOG ON" 0050 PRINT AT(10,20,8);"Enter password: "; : FOR I=1TO 8 : KEYIN STR(P$,I,1) : PRINT HEX(8B); : NEXT I 0060 IF STR(P$,1,8)<>"PASSWORD"THEN 10 : $PSTAT=" " 0070 $DISCONNECT ON : REM /.Turnoff disconnect timeout 0080 LOAD RUN T"START"