PODRAZ 5 h635393:"1":ڰ"1":ٰ"1"::#1;ٰ"6";ڰ"2";" COPYRIGHT BY FALCON SOFT ":N="21"̰"34":װ"0.01",N:N:ç,ç;:"":-,-;:"" #"PODRAZ 5 (* !d͵JR8 PODRAZ 5 FPEFP ** ini ** QXC$="":rpraf=0:rpssofraf=0:rpbd=0:rph=0:t$="":rp1=0 R23658j\,8 U*** uvod *** V2:2:6: W%1,1;"Good morning !!!" Xk4,0;"Tato hra je pokracovanim her";';3;"PODRAZ 3";2;" a ";3;"PODRAZ 4." Y]2;"Z techto her budete potrebovat"'"nektere udaje,napr.heslo"'"Bostonske databanky." Z''"A ted se uz muzete vzit do role"'"americkeho programatora"';4;0;"Tima Colemana";6;2;",jehoz ukolem"'"je >obrat< sveho stareho "'"nepritele ";5;1;"JACKA RAGGERA";2;6;" a jeho"'"partu o asi 100 000$." [B''';1;4;0;" ---------- tally-ho ------- " \ 0 d*** TELEFON *** n$T$="":1:1:6: s_0,0:255,0:0,175:-255,0:0,-175 t9 ,1;2;" ";10 ,1;2;" ***** PACKARD COMPUTER ***** ";11 ,1;2;" " xg2,2;1;1;">T<";0;0;4;0;" ZAVOLAT TELEFONEM " r3,2;1;1;">S<";0;0;4;0;" PODIVAT SE DO SEZNAMU":200 RPH=020,8;2;1;" TELEFON! ":N=13:0.1}L,30:20:0.8L,30:502:N:100d:280 RP1=120,8;2;1;"TELEFON !":N=13:0.1}L,30:20:0.73333,30:20:N:100d:3000 RPBD=120,8;2;1;"TELEFON !":N=13:0.1}L,30:20:0.73333,30:20:N:100d:2000 RPRAF=120,8;2;1;"TELEFON !":N=13:0.1}L,30:20:.73333,30:20:N:100d:2300 RPSSOFRAF=120,8;2;1;"TELEFON !":N=13:.1}L,30:20:.73333,30:20:N:100d:2305 "0:X$=:X$="T"160 X$="S"250 *** ZAVOLANI *** N=10 12 [19,N;1;"?":0:X$=:19,N;X$:T$=T$+X$:0.1}L,-30:N 19,13 ;"-" pN=1415:19,N;1;"?":0:X$=:19,N;X$:0.1}L,-30:T$=T$+X$:N 19,16;"-" pN=1719:19,N;1;"?":0:X$=:19,N;X$:0.1}L,-30:T$=T$+X$:N 502:M=13:N=130:0.01z# =,N:N:M:20:N=13:64000:502:N:N=20-40(-1:0.01z# =,N:N ꏏ** ** T$="80732443"300, T$="56189131"400 T$="57110880"165 T$="80011111"500 T$="10124190"450 T$="35918669"550& T$="23072913"600X T$="11129111"750 T$="14279227"800  T$="21261666"900 T$="23128301"1000 T$="27688427"610b T$="43563451"1200 ‚20,8;2;1;" -- OBSAZENO -- ":N=17:.25~,30:20:N:150:100d *** SEZNAM *** e6:6:1::0,0;">>>>>>>>> INFORMATION <<<<<<<<<<":7,0; A$="ARTHUR BROWN 807-32-443 (ALENA) DAVID AHL 561-89-131 (ZDENA) INFORMACE 800-11-111 (-----)":9000(#:0:100d 1.AHLOVA ZPRAVA A$=" AHOJ TIME!JAK SE MAS? JA O.K. PRED CHVILI JSEM TESTOVAL JEDEN KOMPILATOR.JSOU TAM SKORO VSECHNY ZNAME ZNACKY,VCETNE TOHO TVEHO PACKARDU. ALE K VECI.MAM PRO TEBE KSEFT,A JE V TOM ZASE RAGGER A JEHO PARTA.TAKZE ZAVOLEJ ARTHUROVI, VI O TOM VIC. DAVID":1:1:6::9000(#:0:RPH=RPH+1:100d: ,*** BROWN *** 1$RPH=0RPH=1320@ 6H11 ,9 ;1;"BRAKE UP":30:9500%:100d @A$="******* SOUKROMY UZIVATEL ****** ARTHUR BROWN ZADEJTE HESLO: (-----)":0,0;:2:2:7::9000(#:T$="" ERN=15:0:X$=:3,N;X$:0.1}L,30:T$=T$+X$:N J#T$"ALENA"9500%:100d TA$="AHOJ TIME!DOBRE,ZE VOLAS,PROTOZEJA ODJIZDIM DO ANGLIE,TAKZE VAM PRI TOM NEBUDU POMAHAT. RAGGER TED NENI ANI V NEW YORKUANI V BOSTONE.ALE V BOSTONSKE POJISTOVNE >BOSTON'S INSURANCE COMPANY< SI NEJAK VYDELAVA NA ZBYTCICH Z KONT.TY TAM JSOU KRYTE KODEM,HESLEM A JMENEM. JESTLI SE TI PODARI TAM DOSTAT, ZMEN KOD NA 3245191.HESLO SI VYMYSLI.NEJDRIV BYS ALE MEL NECOZJISTIT V >COMPUTING CENTRE OF BOSTON<.HESLO JE PORAD STEJNE. -------------------------ARTHUR" Y=1:1:6::9000(#:0:100d ******** AHL ********* T$="":A$="******* SOUKROMY UZIVATEL ****** DAVID AHL ZADEJTE HESLO: (-----)":3:3:6::9000(# RN=15:0:X$=:3,N;X$:0.1}L,20:T$=T$+X$:N #T$"ZDENA"9500%:100d A$=" DOUFAM,TIME,ZE UZ NECO MAS.JA SE TI POTOM OZVU SAM. --------------------------DAVID":2:2:5::9000(#:0:100d **** COCEOFDE ***** êA$="********************************* COMPUTING CENTRE OF DETROIT *********************************1...KARTOTEKA OSOBNICH LISTU 2...QUIT (-)" )5:5:2::9000(# A0:X$=:5,1;X$:502:X$="1"470 X$="2"9500%:100d !5,1;"-":453 **** KARTOTEKA *****  2:2:5::A$=" KARTOTEKA OSOBNICH LISTU ZADEJTE HESLO: (-----)":9000(#:T$="" SN=15:0:X$=:4,N;X$:T$=T$+X$:0.1}L,-10 :N VT$"VERKA"A$=" CODE IS K.O.":9000(#:9500%:RPBD=RPBD+1:100d *A$="CODE IS O.K.":9000(#:100d A$=" ZADEJTE JMENO: (------------------------------)":4:4:0::9000(#:T$="":N=132 :0:X$=:X$=13 490 01,N;X$:T$=T$+X$:0.1}L,20:N 3N=140(:Z=*40(:0.01z# =,Z:N ZT$"JACK RAGGER"A$="NENI V EVIDENCI !!!":9000(#:100d:9500%:100d A$=" JACK RAGGER NAROZEN 8.9.1955.OD ROKU 1995 ZAMESTNAN JAKO PROGRAMATOR U FIRMY >COMPUTERS OF FIRM APPLE<.NA MISTO BYL DOPORUCEN JOHNEM BLACKEM,PRACOVNIKEM FIRMY >COMPAQ<.BYDLISTE: CHURCHILL STREET 810,DETROIT. V KARTOTECE FIRMY MA CISLO >2717759<. (-)"::9000(#:0:10 ,1;:9500%:100d *** INFORMACE *** :A$="INFORMACE O TELEFONNICH CISLECH:":2,0;:9000(#:4,0;:A$="ZADEJTE NAZEV ORGANIZACE NEBO SOUKROMEHO UZIVATELE: (------------------------------)":9000(#:T$="" <N=131:0:X$=:X$=13 510 06,N;X$:0.1}L,30:T$=T$+X$:N >T$="COMPUTING CENTRE OF DETROIT"C$="101-24-190":530 >C$="BOSTON'S INSURANCE COMPANY"C$="434-116-421":530 =T$="COMPUTING CENTRE OF BOSTON"C$="359-18-669":530 ?T$="COMPUTING CENTRE OF NEW YORK"C$="898-11-531":530 )T$="COMPAQ"C$="230-72-913":530 4T$="POLICE STATION 09"C$="111-29-111":530 1T$="POLLY HOLESMAN"C$="142-79-227":530 .T$="PAUL HANDER"C$="212-69-666":530 /T$="MARTY DUDSON"C$="231-28-301":530 ?:A$="NENI V EVIDENCI !!!":9000(#:9500%:100d 0:0:4: PA$=T$:9000(#:N=110 :3,N;C$(N):0.5,30:N V4,0;"(-)":0:4,1;:502:9500%:100d 502:4:4:0:A$=" ZADEJTE JMENO: (------------------------------)":9000(#:T$="" &**** COCEOFBO **** 'A$="################################## COMPUTING CENTRE OF BOSTON ##################################>>> KARTOTEKA OSOBNICH LISTU <<< ZADEJTE HESLO: (------)":2:2:5::9000(#:T$="" (RN=16:0:X$=:5,N;X$:0.1}L,30:T$=T$+X$:N )iT$"GABIKA"11 ,9 ;1;1;"BRAKE UP...":0:0:9500%:100d *ZO$="O.K.":N=14:6,N;1;O$(N):0.5,35#:N:502 +ZA$=" ZADEJTE JMENO: (------------------------------)":9000(#:T$="" -<N=131:0:X$=:X$=13 559/ .08,N;X$:T$=T$+X$:0.1}L,30:N /YT$"JACK RAGGER"100d:A$="NENI V EVIDENCI !!!":100d:9500%:100d 03:3:6::A$="--------- JACK RAGGER ----------NAROZEN 8.9.1955 VE WASHINGTONE.JEHO ZAZNAMY BYLY PRELOZENY DO DETROITSKE DATABANKY.":9000(#:4,0;"(-)" 1Y0:X$=:0.1}L,30:4,1;X$:502:9500%:100d X******** COMPAQ ******* YA$="============================================ COMPAQ ============================================1...KARTOTEKA ZAMESTNANCU 2...JINA ODDELENI COMPAQ (-)":6:6:2::9000(#: Z70:X$=:5,1;X$:X$="1"650 [*X$"2"100d:9500%:100d ]5:5:1: ^vA$="ZADEJTE P R E S N Y NAZEV ODDELENI: (--------------------------)":9000(#:T$="" _SN=126:0:X$=:2,N;X$:0.1}L,29:T$=T$+X$:N `xT$"SOFTWARE SECTION OF COMPAQ"A$="N E Z N A M !!!":4,0;:9000(#:100d:9500%:100d a3:3:0: bfA$=">> SOFTWARE SECTION OF COMPAQ << ZADEJTE SVE JMENO: (----------)":9000(#:T$="" cSN=110 :0:X$=:2,N;X$:0.2~L,30:T$=T$+X$:N dPT$"JOHN BLACK"A$="YOU AREN'T IN SYSTEM !":100d:9500%:100d ec:A$="PRISNE TAJNE DOKUMENTY: ZADEJTE HESLO: (-----)":9000(#:T$="" fRN=15:0:X$=:2,N;X$:0.1}L,30:T$=T$+X$:N gfT$"KATKA"A$="CODE IS K.O.":5,0;:9000(#:RP1=RP1+1:9500%:100d h1:1:4: ipA$=" AHOJ JACK ! ASI CHCES VEDET TO NOVE HESLO V POJISTOVNE.JE TO ACE OF ACES. JO,A PRIBRAL JSEM DVA MANIKY DO PARTY.JMENUJI SE PAUL HANDER A MARTY DUDSON A ZNAJI SE S HUFFEREM.NO JISTE UZNAS,ZE PRI NASEM VEKU POTREBUJEM NEJAKEOSTRE HOCHY,NE? --------------------------- JOHN":9000(#:RPSSOFRAF=RPSSOFRAF+1 ***** KARTOTEKA ****** A$=">>>> KARTOTEKA ZAMESTNANCU <<<< ZADEJTE CISLO ZAMESTNANCE:(-------)":3:3:7::9000(#:T$="" RN=17:0:X$=:2,N;X$:0.1}L,30:T$=T$+X$:N  :A$=T$:9000(#:100d gT$"2717759"A$="TOTO CISLO NEEXISTUJE !!!":100d:9000(#:100d:9500%:100d :RPRAF=RPRAF+1:A$=" JOHN BLACK NAROZEN 18.9.1964 V OTTAWE. V ROCE 1984 BYL PRIJAT DO FIRMY >IBM SOFTWARE< JAKO PROGRAMATOR.OD ROKU 1989 PRACOVAL U NASI FIRMY JAKO PROGRAMATOR A POZDEJISE STAL REDITELEM >SOFTWARE SECTION OF COMPAQ<,SOFTWAROVEHO ODDELENI.":9000(#:9 ,0;"(-)":0:9 ,1;:502:9500%:100d ****** POLICE 09 ****** A$="$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ POLICE STATION 09 $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ ZADEJTE KOD: (---------)":2:2:6::9000(#:T$="" RN=19 :0:X$=:4,N;X$:0.1}L,30:T$=T$+X$:N 0:A$="--------- "+T$+" ----------":9000(# IT$"1247MESN3""NENI V EVIDENCI !!!":100d:9500%:100d 4A$=" MIKE SHERWIN NAROZEN 31.5.1970.10KRAT SOUDNE TRESTANY PRO NEZAKONNE KOPIROVA-NI SOFTWARU.MOMENTALNE PRACUJE JAKO PROGRAMATOR HLAVNIHO POCITACE U FIRMY >BOSTON'S INSURANSE COMPANY<. (-)":9000(#:0:7,1;:502:9500%:100d  ****** POHO ***** !A$="******* SOUKROMY UZIVATEL ****** POLLY HOLESMAN ZADEJTE SVE JMENO: (------------------------------)":5:5:2::9000(#:T$="" "<N=131:0:X$=:X$=13 804$ #/3,N;X$:.1}L,20:T$=T$+X$:N $T$"TIM COLEMAN"502:A$="NEMAM ZAJEM S VAMI HOVORIT...":6,0;:9000(#:100d:9500%:100d %:A$=" GOOD DAY,COLEMANE ! DOST JSEM TOHO O TOBE SLYSEL, MEZI JINYM TAKY TO,ZE TEN ZMETEKRAGGER JE TVUJ NEPRITEL.TAK TO JSME DVA. ALE ABYCH MOC NEPOVIDAL: ZAVOLEJ NA >POLICE STATION 09< A ZADEJ KOD 1247MESN3.JMENO TOHOHLE CLOVEKA SE MOZNA ZADAVA JAKO JMENO V TY POJISTOVNE,ALE JA NEZNAM HESLO.PROZATIM CAO. -------------------------- POLLY":9000(#:0:9500%:100d ****** GAGA ******** A$="******* SOUKROMY UZIVATEL ****** PAUL GANDER ZADEJTE SVE JMENO: (------------)":2:2:4:9000(#:T$="" SN=112 :0:X$=:0.1}L,30:3,N;X$:T$=T$+X$:N [30:T$"MARTY DUDSON"A$="NECHCI S VAMI HOVORIT":9000(#:502:9500% A$=" AHOJ MARTY! POSLOUCHEJ,DOUFAM,ZE JESTE PLATITO TVOJE HESLO(MYSLIM>IVANA<). JINAK BYCH SE K TOBE NEDOSTAL. PROC TI VLASTNE VOLAM.VOLAL MI HUFFER.PRY PO NAS JDE AHLOVA PARTA A TAKY JIM PRY POMAHA TIM COLEMAN A POLLY HOLESMAN. REKNI MIKEOVI,AT RADSI ZMENI KODV TY POJISTOVNE.BEZ KODU JSOU VYRIZENI.TAK ZATIM. PAUL":9000(#:0:9500%:100d ****** TUTEL ***** L3:3:7: NA$=">>>>>>> SOUKROMY UZIVATEL <<<<<< MARTY DUDSON ZADEJTE HESLO: (-----)":9000(#:T$="" OPN=15:0:X$=:3,N;X$:.1}L,0:T$=T$+X$:N P<T$"IVANA""BRAKE UP...":30:9500%:100d QT:A$=" AHOJ PAULE! VOLAL JSEM TOMU MIKEOVI A ZMENILKOD NA: >>> 32D5N1018R1333215V1 <<< RAGGER TI DEKUJE ZA ZPRAVU A REKNAM PODILY:MIKE 40%,ON 10%, TY 10%,JA 10%,BLACK 15%,HUFFER 5%.TAK ZATIM TALLY-HO. ------------------------- MARTY":9000(#:0:9500%:100d *** POJISTOVNA *** EA$=" BOSTON'S INSURANCE COMPANY ZADEJTE KOD: (-------------------) ZADEJTE HESLO: (-----------) ZADEJTE SVE JMENO: (------------)":0:0:4::9000(#:T$="" TN=119:0:X$=:4,N;X$:0.1}L,-10 :T$=T$+X$:N &T$"32D5N1018R1333215V1"1220 64000:T$="" TN=111 :0:X$=:6,N;X$:0.1}L,-10 :T$=T$+X$:N T$"ACE OF ACES"1220 64000:T$="" TN=112 :0:X$=:8,N;X$:T$=T$+X$:0.1}L,-10 :N T$"MIKE SHERWIN"1220 3:3:6: cA$=" YOU'RE IN SYSTEM !!! ZADEJTE NOVY KOD PODLE >ZMDJVL< (-------)":9000(#:T$="" RN=17:0:X$=:2,N;X$:0.1}L,20:T$=T$+X$:N {T$="3245191"100d:64000:A$=" CASTKA 98531$ PREVEDENA NA KOD "+T$:9000(#:100d:1500 ."BRAKE UP":100d:9500%:100d **** END ***** 6A$=">>>>>>>>>> GRATULUJEME <<<<<<<<