SUPERCOM * *=\#6+6+6+6v+6+6Q>0y890 0(23636T\*256+23635S\+7) :"Loading in 48k mode" ("" SUPERCOM } }  20:6:0::23659k\,0 C"":0:3,0;" ":"":3,0;" ":"" bSUPERCOM @C00 ?0 00 H$!@ 00 ?0 00 H$@@0?0  00 0 000<0 H$@?@@? 0?0  00 0 000<0 @@@? 00 0 00< 0  !x?0 ?0  #@O?00 0 00< 0 ?0 ?0  ?p@ <00 0 0 3 0 # @  00 0 0 3 0 @ @??~|47/DC<58:108l j="Z"5 k 105i lA$=A$+D$:PC=PC+1 nD$; s*RL=DC-480:DC=480RL=10 tBF=0RL:1/100d,2:D=17:D:F xPC=3"-";:a$=a$+"-" PC=8140 105i BLINE=0:F=120 :A$=Z$(F)LINE=z$(F+1) F:LINE=0180 LEN=(*6)+2:LEN>52;20,11 ;1;" ENGAGED ":F=110 :1/10 ,8:F:9000(# F=0LEN 2r=17:1/100d,7::r d=160<:d 2r=19 :1/100d,7::r d=1240:d:F _D=15:1/502,30:D:PENCE=PENCE+10 :UNIT=-2500 :LINE =A$(59 )=Z$(13 ,59 )191 2;20,11 ;1;"NON VALID":F=12:1/1,2:F:20,11 ;" ";21,11 ;" " 9000(# 3STD1=(Z$(13 ,3)):STD2=A$(3) STD2STD1Y$="LOWER" #I$="THE STD CODE IS ":I$=I$+Y$: 33:LI=1:0:0:9999' >F=02558:F,0:0,175:F ?F=2512-8:F,0:0,175:F ߣ4;1;1,8;S$:7;3,12 ;"SYSTEM";5,13 ;"LINK";7,11 ;"ANALYSIS";10 ,10 ;" " L=14:1/502,18:F=713 2:F+4,10 ;" ";:ٺ(*7+1):D=18:1/200,20: BN=(*2)+1 BN=1""; BN=2""; 2D:" ":F+5,10 ;" ":F:L SSS=09000(# <9999':5:" "''' |"IT APPEARS THAT SOMEONE IS"'"TRYING TO PUT US OFF LINE"''"IT FOLLOWS THEREFORE THAT I MUSTOCCASIONALLY EXECUTE A SYSTEM"' "CHECK DURING YOUR EFFORTS TO"'"CRACK THE SUPERSOFT CODE."''"THIS WILL NO DOUBT PROVE TEDIOUSBUT I DO HAVE THE FOLLOWING"'"DATA TO HELP IN YOUR TASK"'' ""MISSING DIGIT IS A "; #4VV=Z$(21,1):VV<65A"NUMBER. "; $VV65A"LETTER. "; ' SSS=0:="Z"9000(# ( 295' ,'1:1:7:9999' @L1,8;6;S$'''1;" INFORMATION " J/F=811 :2;F,0;B$:F LLI=1I$ T#F=14:2;B$:F ^LI=1I$="" h LI=0 ="Z"9000(#  390 9999':5 '" "''' f"SEE OUR NEW EXTENSIVE ";Z$(37%,4);" RANGE"'"OF PROFFESSIONAL PHOTOCOPYING"'"MACHINES"'' D"WE HAVE A MACHINE TO SUIT YOUR"'"BUDGET AND WE DELIVER DAILY"'''' g4;" "''" ";Z$(32 ,3);" RADNAGE ROAD LONDON SW1"'''' -2;" " LgI$="THERE ARE TWO CODES IN ORION ADVERT ALSO TEL ":I$=I$+Z$(3,8):I$=I$+"?":5 9999':4 $"//////// \\\\\\\\" 4''" HIGH SPEC COMPUTER COMPONENTS"'''"TEL LIST..." D8,0;B$;8,0;1;"CODE";0;" "; ;GOS=1250:LL=4:C$=Z$(37%,LL):502 .6:'''"COMPANY _____ TEL _____ CODE"'' @"SUPERSOFT...";Z$(5);"...?";Z$(21,25) )"MERIDIAN....";Z$(9 );"...UNKNOWN"  /"TELSTAR.....";Z$(7);"...";Z$(22) F 5 x'3:3:0:9999' F=14:""''" "''"":F J20,0;B$;20,0;1;"S.S/CODE";0;" "; pLLL=(*4)+1:GOS=1415:LLL=2SSC<3SSC=SSC+1:GOS=200:SSS=1 +LL=5:C$=Z$(21,LL):502 +SSS=0:3:3:9999' "" " I''" TITLE COST ORD/NO"'"--------------------------------" 6"COSMOS WAR ........`08.95 ";Z$(40(,3) 6"KILLER DOGS .......`12.99 ";Z$(41),3) 6"PLANET WARRIOR ....`12.99 ";Z$(42*,3) 6"SAM CHASER ........`05.50 ";Z$(43+,3) 6"MAXIMS FORTH ......`17.99 ";Z$(44,,3) 6"DEATH RANGER ZERO .`05.50 ";Z$(45-,3) 6"SNAKER ............`08.95 ";Z$(46.,3) @'''1;" "''" " , 5 @'0:0:7:9999' J$" " ^D6,0;B$;6,0;1;"CODE";0;" "; |;GOS=1630^:LL=7:C$=Z$(22,LL):502  4 ''"WE FIT AND SERVICE ALL TYPES OF HUGE BUSINESS COMPUTERS WE ALSO KEEP TEL NO.S AND BACK DOOR"'"CODES TO THE COMPUTERS THAT"'"WE INSTALL TO ACCESS THE DATA"'"BASE PLEASE ENTER YOUR PRIVATE"'"CODE NO. .... THANKYOU."'' <F=1400:F:" " F18,0;B$;18,0;1;"CODE";0;" "; |GOS=1730:LL=3:C$=Z$(23,LL):I$="TELSTAR DATA CODE IS ?":I$=I$+Z$(23,23):502 .I$="":7:7:1:9999' T" "'''1;"RESTRICTED-RESTRICTED-RESTRICTED"'' "INPUT COMPUTER"'' J6,0;B$;6,0;1;"SERIAL NO.";0;" "; 7GOS=1800:LL=9 :C$=Z$(33!):502 ''"TELSTAR REGRETS THAT IT CAN ONLYDISCLOSE THE FIRST 3 DIGITS OF THE MAIN CODE FOR THE ";Z$(33!)''"ALIAS ARMAGEDDON COMPUTER" &''"THE DATA HAS BEEN FORWARDED TO YOUR PRIVATE INFORMATION DISPLAY":LI=1:I$="TEL NO. RESTRICTED ":I$=I$+" CODE ":I$=I$+Z$(24,3) 0="Z"9999':10 ,0;1;"STAND BY FOR SPECIFICATION DATA":F=1502:1/40(,20:F:1850: 2 18400 :/9999':" KX599L 256 BIT/180MHZ" ;''".. 128,000 MEGA BYTE" <''".. 64,000 MEGA BYTE" @&''" GRADE 1 ARTIFICIAL" N$''" 10,000 OPS PER NANO SEC" S''" NOVUS LASER DISC" X#''" GEMINI AERO TECHNICS" ]'" GAVIN ELECTRONICS" l 5 '1:1:7:9999' ڡJ=13:D=26:D:F=1202:F,0;" "'':F:D:J:F=1200:F:9999' )4;" " F4,0;B$;4,0;1;"CODE";0;" ";  GOS=2030:LL=9 :C$=Z$(31,LL):I$="MERIDIAN CODE IS A WORD OUT OF SUPERSOFT ADVERT REVERSED PLUS AN ORDER NO.":502 4I$="":6;0''B$;"THE NOVUS HI GRADE LASER DISC ISOUR CLAIM TO FAME FOR THE FIRST TIME EVER A LASER DISC THAT CAN BE RE-RECORDED INSTANTLY........" >,B$;" ."'B$'' H~"ENTER CODE TO RELEASE A"'7;1;1;"SPECIAL INFORMATION PACK"'0;6;"TO YOUR PERSONAL SYSTEM." R-''7;"THANK YOU FOR CALLING MERIDIAN" W?F=15:1/100d,20:3280 :F n20,0;B$;20,0;1;"CODE";0;" ";:H$=Z$(25,3)2400` 0GOS=2200:LL=3:C$="SIP":502 F=13:3280 :1/100d,20:F:18,0;" "'"THE INFORMATION PACK HAS BEEN FORWARDED TO YOUR PRIVATE"'"INFORMATION SYSTEM THANKYOU..." @F=13:3280  :1/100d,20:F LI=1:I$="THE INFORMATION PACK FORWARDED BY MERIDIAN HAS BEEN RECEIVED THE PACKAGE WAS OF NO USE BUT SUPERCOM HAS DISCOVERED ANOTHER CODE THAT CAN BE USED TO GIVE MORE DATA.. CODE " &I$=I$+Z$(25,3):5 `'0:0:4:9999' j.1;" "'' tIF=120:1/20,40(:D=110 :D:F ~J1;"COMPUTER...";:2525 :H$=" ARMAGEDDON":8000 @ Q''1;"TELEPHONE..";:2525 :" ";:H$=Z$(11 ):8000 @ I''1;"BASED......";:2525 :H$=" GLASGOW":8000 @ H''1;"LINKED.....";:2525 :H$=" LONDON":8000 @ I''1;"PURPOSE....";:2525 :H$=" UNKNOWN":8000 @ I''1;"INSTALLED..";:2525 :H$=" TELSTAR":8000 @ I''1;"CODE.......";:2525 :H$=" UNKNOWN":8000 @ Q''1;"SERIAL NO..";:" ";:2525 :H$=Z$(33!):8000 @ [''1;"DESIGNED...";:" ";:2525 :H$="GEMINI AERO TECHNICS":8000 @ X''1;"BUILT......";:" ";:2525 :H$="GAVIN ELECTRONICS":8000 @ ="Z"2530 20:2500 2F=15:1/20,5:F: 9999':1/1,0:3,0;"THE FOLLOWING INFORMATION IS ON"'"REVERSE CHARGE TO MERIDIAN YOUR ACCOUNT IS NOT BEING CHARGED"'''"COURTESY OF MERIDIAN LASER DISCS" jWT=120x:HT=40(:SI=40(:F=116:1;7;WT,HT,SI:SI=SI-2:F KF=020:1/502,5:F:1/5,35# Y9999':'6;"GEMINI AERO TECHNICS"'15;"&"'7;"GAVIN ELECTRONICS" w1/1,0:F=39 :F+F,0;"********* *********":F:D=1150:D 9999' '"GEMINI & GAVIN WON A GOVERNMENT"'"DEAL TO PRODUCE A MEGA COMPUTER.THE RESULT OF 3yrs RESEARCH AND `85,000000 PRODUCTION COSTS"'"STRETCHED THESE TWO AMBITIUOS" "COMPANIES TO THEIR LIMITS." '"DUE TO A STRIKE EARLY ON IN THE PROJECT THE GOVERNMENT DEADLINE WAS EXCEEDED BY 6 MONTHS."''"THEY APPEALED TO THE GOVERNMENT FOR 3 MORE MONTHS TO FINISH THE PROJECT AND PROMISED THAT THE" "MACHINE WOULD BE 100 TIMES MORE POWERFUL THAN ANY MACHINE"'"AVAILABLE ANYWHERE IN THE WORLDBUT THE GOVERNMENT REFUSED AND THEY LOST THE DEAL TO AN" "AMERICAN COMPETITOR." G23659k\,2:0:#0;" any key to continue data" ""9999':2575 2572 `"LOSING THE DEAL BANKRUPT THE TWOCOMPANIES AND THE RECEIVERS WERECALLED IN ON 18 APRIL 1981." '"LATER THE TWO COMPANIES GOT"'"TOGETHER AND BORROWED `2,000000"'"FROM SILICON UK AND FORMED"'"A NEW COMPANY CALLED "'"CREANT CREANT HYPERTRONICS." '"CREANT CREANT PAYED BACK THE"'"SILICON LOAN IN ITS FIRST YEAR"'"AND IS NOW SAID TO HAVE A BANK BALANCE BIGGER THAN THE TOP"'"THREE ELECTRONICS COMPANIES"'"PUT TOGETHER." ('"THE GOVERNMENT HAS SINCE"'"REALISED THAT THE COMPUTER BUILTBY CREANT CREANT WAS FAR"'"SUPERIOR TO THE ONE THEY FINALLYPURCHASED." )G23659k\,2:0:#0;" any key to continue data" *""9999':26102 + 2602* 2''"NO ONE KNOWS WHAT HAPPENED TO"'"THE COMPUTER AND DESPITE RECENT"'"OFFERS FROM THE GOVERNMENT TO"'"RE-NEGOTIATE WITH CREANT CREANT THE COMPANY HAS DECLINED TO OPENUP ANY FURTHER DEALS." <;F=17:'"########## ##########":F 5 '0:0:4:9999' T2;"";4;" WAS NOT EXPECTING"'"THIS LINK UP WHO ARE YOU ?" A4,0;B$;4,0;1;"";0;" "; 1GOS=7:LL=7:C$="TELSTAR":502 RFIND=(*3):FIND=04/1,35#:9999':8,0;" ":H$=" YOU ARE NOT TELSTAR":8000@:Z$(11 ,57)=((*899)+100d):'':H$=" YOU ARE NOT WELCOME":8000@:'':H$=" YOU WILL NOT SUCCEED.":8000@:D=1120x:20:D:200 +{9999':TIME=0TIME=1:" "''" "'':31200 0" " :G8,0;B$;8,0;1;"LEV 1 ";0;" "; X@GOS=3130: :LL=3:C$=Z$(32 ,3):502 =F=19 :3280 :1/20,0:F 5:0,0;" ":H$="WELCOME TELSTAR ... ":8000@:''':H$="IT IS MY DUTY TO REMIND YOU THATTHERE IS A TIME FACTOR ON THE NEXT CODE":8000@:'':H$="THERE IS NO RELEASE OTHER THAN THE CORRECT CODE" 8000@ w'':H$="FAILING TO COMPLETE CODE IN TIMEALLOWED WILL CLOSE YOUR SYSTEM DOWN FOR AN UNSPECIFIED PERIOD..":8000@ I$="I HAVE A TEL NO. FOR YOU BUT REGRET I DO NOT HAVE THE STD CODE ???-":I$=I$+Z$(13 ,4) :I$=I$+" SYSTEM ANALYSIS WILL HELP." QH$="":21,0;B$;21,0;1;"LEV 2 ";0;" "; GOS=3310 :LL=9 F=1170:1/100d,2:""P$=:1/30,20:H$=H$+P$:P$;:H$=Z$(24)TT=0:3370* H$>9 3350 F }7:0:9999':F=1100d:F:7:9999':0;21,0;"SYSTEM OFF LINE...." pLLL=((*3)+1)*1000:F=2000+LLL0-1:0;21,25;F;" ":F 200 % TT=0 *4:F=110 :1/30,40(:D=15:D:F:9999':" " ,o'':2;" "''6;"? ... PROGRAMMER"''"? ... DESIGNER"''"? ... TERMINATION"'''"R=RESET" .=C$=" ":F=13:CK=(*10 ):C$(F)=CK:F 4:''"LATEST MENU CODES TEL ";6;C$;7;"-80841" 820:F=13:=C$(F)3+F+F,18;1;"<<<":1/10 ,10 :D=180P:20:D:33804 +(F*10 ) 9="R"3365% :="Z"7 ;[(3+F+F),18;"<<<":1/80P,5:(3+F+F),18;" " =F:33848 >TT=0TT=TT+1 A9999':1;""''':7:H$="TOP SHADO EXECUTIVE":8000@:'':H$="WROTE FOR SUPERSOFT":8000@:'':H$="BORN LONDON 1948":8000@:'':H$="........................DECEASED":8000@ B="Z"3370* C20:3394B HTT=1TT=TT+1 J9999':2;""''':7:H$="CREANT CREANT HYPERTRONICS":8000@:'':H$="BASED LIVERPOOL":8000@ K'':H$="MULTI NATIONAL CONGLOMERATE ASSETS EXCEDE `648,000000":8000@:'':H$="SUB DIVISION ........................TELSTAR":8000@ L="Z"3370* M20:3404L RTT<29999':7,0;" ":H$="ARMAGEDDON REGRETS THAT YOU DO NOT QUALIFY FOR ACCESS TO THE TERMINATION FACILITY":8000@:F=1200:20:F:200 \9999':6;" "''':H$="IF A COUNTER REACHES ZERO BEFORECALIBRATION YOUR SYSTEM WILL BE CLOSED DOWN !!!!!!!" ]8000@:3;10 ,7;"PRESS 1 TO HOLD";11 ,7;"PRESS 2 TO HOLD";12 ,7;"PRESS 3 TO HOLD" ^?A(3):F=13:A(F)=40(+(*15):F aEA(1)=A(1)-1:="1"A(1)=A(1)+1 bEA(2)=A(2)-1:="2"A(2)=A(2)+1 cEA(3)=A(3)-1:="3"A(3)=A(3)+1 f5F=10 12 :F,0;A(F-9 );" ":F k-U=13:A(U)=03350 mU n9A(1)=A(2)A(1)=A(3)7000X o 20 p 3425a /I$=" ":3:0:0:9999' }D=15:F=07:1/60<,F+F+F:F;21,0;" ":F:D rD=18:F=07:F;21,0;" ":3280 :F:D 9999' H" "''"----- -----" R6,0;B$;4,0;1;7;"COMPUTER";0;" "; 5C$="SUPERCOM":GOS=3530 :LL=8:502 5:::h$=" ":8000@ 8000@:: c1/5,5:1/5,5:2;10 ,0;" "'' "1 S"''"2 S" ="1"3700t $="2"3750 )="Z"7 BZ20:1/60<,30:(*8);18,0;"":3610 t9999':4 x"Telstar Tel ";Z$(7)'' z"Silicon Tel ";Z$(3)'' | "Falcon Tel ";Z$(15)'' ~"Orion Tel ";Z$(1) )20:="Z"9999':3600  3720 L9999':7:"Telstar ";Z$(22);" ?";Z$(23,2)'' "Silicon ";Z$(37%)'' "Falcon RESTRICTED"'' "Orion NO CODE" <)20:="Z"9999':3600 A 3900< '4:4:0:9999' '" "'''  I$="INVOICE CODE IS A TEL NO." I4,0;B$;4,0;1;"INVOICE";0;" "; ;GOS=4030:LL=5:C$=Z$(27,LL):502 1/1,20 h'1:1:7:9999' pE"/. --- ";:2525 :H$=Z$(35#,8):8000@ r?''" --- ";:2525 :H$="FORG LIERRA":8000@ t=''" --- ";:2525 :H$="SHADO LTD":8000@ v<''" --- ";:2525 :H$="MET/GOLD":8000@ wT''"/. --- ";:2525 :H$="???":H$=H$+Z$(28,4):8000@ x=''"/. --- ";:2525 :H$="FL01255FL":8000@ |>''"/. --- ";:2525 :H$=Z$(30):8000@ '':H$="PLEASE NOTE THAT THE ENG NO. SHOWN HERE IS THE ORIGINAL BUT THE ENGINE NO. TAKEN BY THE POLICE AT THE TIME OF THE ACCIDENT WAS DIFFERENT FOR FURTHER INFORMATION RING LEEDS CENTRAL POLICE STN ON ":H$=H$+Z$(17)  8000@  5 '7:2:2:9999' $"OO OO OO OO OO OO" S4,0;B$;4,0;1;"CODE-- ";0;" ";:5060 `H$<25015:4,0;B$;4,0;1;"CODE-- ";0;" "; XC$(1)=H$(1)1/1,30:8,0;"1ST ";C$(1) XC$(1)=H$(2)1/1,30:8,0;"1ST ";C$(1) YC$(2)=H$(2)1/1,30:10 ,0;"2ND ";C$(2) YC$(2)=H$(1)1/1,30:10 ,0;"2ND ";C$(2)  5015 ;GOS=5030:LL=2:C$=Z$(34",LL):502 ?''1;"THIS DATA BASE OFFERS CRASH DATA"''"PLEASE ENTER"  K10 ,0;B$;10 ,0;1;"REG NO...";0;" "; (;GOS=5130 :LL=8:C$=Z$(35#,LL):502 <0:0:9999' P$" " d''"THE INFORMATION YOU REQUEST IS OVER 1 YEAR OLD AND IS NO LONGERON FILE AT THIS STATION."''"IT CAN HOWEVER BE ACCESSED AT UK DATA SYSTEMS BIRMINGHAM"''"REF ";Z$(36$) n/I$="UK DATA SYSTEMS TEL ":I$=I$+Z$(19)  5 |'5:0:0:9999' :F=09 :" "'B$:F rD=13:F=019:F,12 ;"SYSTEMS":Z=12:Z:F,12 ;" ":F:D  9999' N18,0;B$;18,0;1;"PASS CODE >>";0;" "; ;GOS=5530:LL=1:C$=Z$(38&,LL):502 H20,0;B$;20,0;1;"REF >>";0;" "; ;GOS=5570:LL=9 :C$=Z$(36$,LL):502 ':1/10 ,0:9999' " ";Z$(35#)'' " FORG LIERRA"'' " MET/GOLD"'' " 2000"'' " SHADO"'' (" ???";Z$(28,4)'' " ";Z$(29)'' " ";Z$(30)'' "VEHICLE CRASHED INTO REAR OF ARTICULATED LORRY KILLING DRIVERIN RESULTING FIRE"'"EVIDENCE SHOWS THAT THE BRAKES HAD BEEN TAMPERED WITH..." f 5 X17,2;1;7;"THE NUCLEAR THREAT IS OVER";21,6;"YOUR A CODE BUSTER":D=120:ٺ(*6)+1:F=10 12 :F,0;A(F-9 );" ":1/100d,F+10 :F:D bD=1502:19,3;2;" ":1/10 ,10 :19,3;B$:D g 9999' l(XX=1000:Z$(11 )=" " q5:"THE COUNTRY IS GRATEFUL TO YOU FOR SUCH DEDICATION"''"YOU WILL GO DOWN IN HISTORY AS"'"THE GREATEST CODE BUSTER OF ALL TIME." v|16,0;"NOW THAT YOU HAVE SAVED THE GOVERNMENT `85,000000 A YEAR WHYNOT ASK THEM TO PAY YOUR"'"PHONE BILL?" { 7105  7 '0:0:6:9999' >10 ,3;6;"YOUR PHONE BILL IS `";POUND;"."; PENCE<10 6;"0"; 6;(PENCE) D=1XX:D  LA7:1:1:9999':1/1,10 Q0,0;1;0;7;"INITIALISING SYSTEM PLEASE WAIT";21,0;6;0;"  1985 ATLANTIS SOFTWARE LTD." V/F=416:0;F,0;B$:F o=0:6,0;" ALL NAMES TELEPHONE AND CODE"' t" NUMBERS USED IN THIS"' y!" SIMULATION ARE FICTITIOUS"' ~X''" AND ANY SIMILARITY"'" TO REAL PERSONS"'" TELEPHONE OR CODE NUMBERS" " IS PURELY UNINTENTIONAL" /f=1192:d=19 8pn=(*10 ):z$(f,d)=pn:d:Z$(F,4)="-":f  z$(1,7)="818-771" (F=21502:D=19 Z$(F,D)=" "7630 @NC=480+(*42*):NC>579NC<65A7610 Z$(F,D)=NC:D F Z$(24,3)=Z$(28,3):Z$(24,46)=Z$(29,3):Z$(24,7)=Z$(30,3) z:"SOMSOC","REKANS","REGNAR","RELLIK","TENALP","RESAHC","SMIXAM":QQ=(*7)+1:F=1QQ:Z$(31):F BF=17:Z$(39'+F)=((*899)+100d):F JADD=40(+(*7):Z$(31,79 )=Z$(ADD,3) 7680:1,3,5,7,9 ,11 ,13 ,15:F=1̺(*9 ):OO:F:Z$(27)=Z$(OO,5)  3Z$(32 ,3)=((*899)+100d) TZ$(35#,1)="A":Z$(35#,24)=((*899)+100d) Z_i$="THE MISSING NO.s LIE BETWEEN ":T1=Z$(1,8):T125I$=I$+"00 & 25" \*T126T1502I$=I$+"26 & 50" ^*T1513T175KI$=I$+"51 & 75" `T176LI$=I$+"76 & 99" b SSC=0 dAK$=B$:K$=K$+"ALL MODEMS AND INTERFACES ARE ON LINE TO SYSTEM " j4K$=K$+"** ALL MODES ARE GO ** ALL LINES ARE OPEN " l+K$=K$+"** OVERALL STATUS OPERATIONAL ** " n4K$=K$+B$+"FOR HELP SELECT MODE 2 THEN MODE 3 ... " s6K$=K$+B$+" 1985 ATLANTIS SOFTWARE ...":K$=K$+B$+B$ ? @TF=1̱H$:P$=H$(1):H$=H$(2):P$" "1/150,16 JP$; TF r#D=120:20:D: #(APCOL=0:IS=0:0:4:0:9999' #7'4;1;1,8;s$ #<4,13 ;5;"MENU";5,13 ;"----";7,8;7;"1--DIAL";9 ,8;"2--LINK ANALYSIS";11 ,8;"3--INFORMATION";13 ,8;"4--SAVE/LOAD";15,8;"5--ACCOUNT" #Z)IS=IS+1:IS=298*IS=1 #[/PCOL=PCOL+1:PCOL=7PCOL=1 #\+ICOL=3:IS<155ICOL=6: #]IS>240ICOL=2: #_uPCOL;0,0;" ";0,30;" ";18,0;" ";18,30;" ":""9140# #d.21,10 ;ICOL;K$(ISIS+10 ); # 9050Z# #A21,0;B$:="1"1/3,5:100d #+="2"1/3,5:200 #+="3"1/3,5:300, #,="4"1/3,5:9500% #F="5"XX=100d:1/3,5:7100:9000(# # 9120# %/9999':10 ,10 ;"OAD OR AVE" %&="L"I$="":1/10 ,20:;1;10 ,4;" PLEASE START YOUR TAPE ":"HACKERDATA"Z$():POUND=Z$(491):PENCE=Z$(502):9000(# %0="S"1/10 ,20:Z$(491)=POUND:Z$(502)=PENCE:23659k\,2:"HACKERDATA"Z$():9000(# %5="Z"9000(# %:&1/90Z,2:9500% &R '.23659k\,2::23659k\,0: sniounencim d,,o B1ine coXcol 2x(intdtdYHIGHERk 2 818-771441000 793-629521200 827-769331400 117-505841600 247-549162000 586-973863000 974-728403500 752-028084000 446-397155000 621-785925500 RUYHE LP6TOK6 J8T 52RFDCJMP5TQ EMIMS1 76933 52RS51JSOFDCLC5THJJMPM5XVQNRESAHC798892 HIWMSWLD2S6 A208 VTG OJBI8I5AVV920 B 291 997 904 193 798 366 310 0 0 D1A 675-50711MIC258PYHB S I+I CALCULATE THE MISSING NO.s TO BE BELOW 51K^ ALL MODEMS AND INTERFACES ARE ON LINE TO SYSTEM ** ALL MODES ARE GO ** ALL LINES ARE OPEN ** OVERALL STATUS OPERATIONAL ** FOR HELP SELECT MODE 2 THEN MODE 3 ... 1985 ATLANTIS SOFTWARE ...