tj400:M:LO$(1)"HONGKONG ":LO$(2)"SHANGHAI ":LO$(3)"NAGASAKI ":LO$(4)"SAIGON ":LO$(5)"MANILA ":LO$(6)"SINGAPORE":LO$(7)"BATAVIA ":LO$(8)"AT SEA ":10jT02000:kT01000:k T0500::k ::(23):II13496764:@II,"ii";::F$">"(19,61)"<":@202,F$;:@270,"T A I P A N <";:@336,"(VERSION 10.0) <";:@394,F$;:8:l (23)" A GAME BASED ON THE CHINA TRADE OF THE 1800'S BY ART CANFIL":8:lJ,Z:Z(31):(23),"  COPYRIGHT (C) 1979 BY CYBERNAUTICS BOX 4 0 1 3 2 SAN FRANCISCO, CA 94140":8:'m:(23)" WHAT WILL YOU NAME YOUR HONG (FIRM)":A$:S$(12,32):S1$(9,32):L1:D05000:MO1:YE1860:CA400:MW50:SHMW:23000::20:80:70mGF$(62,137):@64,(153);GF$;(169);:@512,GF$;(2,137);:@38,(149);:A12851164:@A,(149);:@A30,(149);:@A63,(170);::@94,(153);:@542,(137);:30mA050:255,8:(28);::*n@0,"HONG: "A$", HONGKONG";:@40,"DATE:";:L8@576,(30);n(@129,"HONGKONG WAREHOUSE:";:@197,"OPIUM "S$;:@261,"SILK "S$;:@325,"ARMS "S$;:@389,"GENERAL "S$;^o2@449,"BANK "S1$;:@464,"DEBT"S1$;:@159,"HOLD "S$;:@178,"GUNS"S1$;:@227,"OPIUM "S$;:@291,"SILK "S$;:@355,"ARMS "S$;:@419,"GENERAL "S$;:@479,"CASH"S$;:@498,"LOC";:o4GPGP10:"FAMINE IN SOUTH CHINA, TAIPAN! GENERAL CARGO PRICES HAVE RISEN TOWARD HEAVEN!!!";:9p6OKOK10:"TAIPAN!!! A FIRE HAS SWEPT "LO$(L)(24)"!! THE PRICE OF OPIUM HAS LEAPED BECAUSE OF HOSPITAL USE!";:p8SPSP10:"THE "LO$(L)(24)" WARVES HAVE BEEN BURNED BY REBEL SAMURAI, TAIPAN!!! ALL THE SILK WAS DESTROYED!";: q:SPSP5:"A RIVAL HONG HAS DUMPED SURPLUS SILK ON THE MARKET IN "LO$(L)(3,24)"!!!";:|q<APAP10:"TAIPAN, AN AGENT FOR THE MORO REBELS IS BUYING ARMS AT HIGH PRICES!!! ARMS ARE SKY-HIGH HERE!";:q>OKOK5:"TAIPAN, A YANKEE CAPTAIN IS SELLING TURKISH OPIUM BELOW THE BRITISH PRICE IN "LO$(L)"!!!";:Zr@GPGP10:"MALAY PIRATES HAVE FLOODED "LO$(L)(2,24)" WITH CHEAP GENERAL CARGO FROM THEIR BOOTY, TAIPAN!!!";:rFBA(BA(BA24)):D0(D0(D010)):MOMO1:TITI1:MO12,YEYE1:MO1:85::85RsP@45,15;MO;YE;:@206,OW;:@270,SW;:@334,AW;:@398,GW;:@453,BA;:@468,D0;:@163,MW;:@182,GN;:@236,OC;:@300,SC;:@364,AC;:@428,GC;:@483,CA;:@502,LO$(L);:usUL120,130,140,150,160,170,180sZ@502,LO$;:@576,Z:L8,@580,"COMPRADOR'S REPORT:";:L12010 tdL8,@580,"CAPTAIN'S REPORT:";:3000:LLD:@502,LO$(L);:L120,130,140,150,160,170,180:L12010Atn11000:115:2000:8030:186ts:(0).08,@576,:L52,54,56,58,60,62,64:7:@640,Z::txOK15000:SP1300:AP150:GP10:tOK16000:SP1400:AP160:GP11:tOK14000:SP1500:AP100:GP12:uOK13000:SP1600:AP110:GP13:4uOK12000:SP1000:AP120:GP14:XuOK10000:SP1100:AP130:GP15:|uOK11000:SP1200:AP140:GP16:u(20)1BR0:8000 v@832,Z"SHALL I BUY, SELL, OR QUIT TRADING";:Q$:Q$(Q$,1):Q$"B"188:Q$"S"189:(Q$"Q")(Q$"0")300:187v@832,Z"WHAT DO YOU WISH ME TO BUY, TAIPAN";:Q$:Q$(Q$,1):@832,Z:Q$"O"190:Q$"S"220:Q$"A"240:Q$"G"260:188w@832,Z"WHAT ITEM SHALL I SELL, TAIPAN";:Q$:Q$(Q$,1):@832,Z:Q$"O"210:Q$"S"230:Q$"A"250:Q$"G"270:189`wTG$"OPIUM":TPOK:13000:OB$:OB(OB$):OBOKCAOB0,190:(OB$,1)"A"OB(CAOK)w18000:CACAOBOK:OCOCOB:MWMWOB:20000:187wTG$"OPIUM":14000:OS$:OS(OS$):OSOCOS0,210:(OS$,1)"A"OSOCx18000:CACAOSOK:OCOCOS:MWMWOS:20000:187nxTG$"SILK":TPSP:13000:SB$:SB(SB$):SBSPCASB0,220:(SB$,1)"A"SB(CASP)x18000:CACASBSP:SCSCSB:MWMWSB:20000:187xTG$"SILK":14000:SS$:SS(SS$):SSSCSS0,230:(SS$,1)"A"SSSC"y18000:CACASSSP:SCSCSS:MWMWSS:20000:187{yTG$"ARMS":TPAP:13000:AY$:AY(AY$):AYAPCAAY0,240:(AY$,1)"A"AY(CAAP)y18000:CACAAYAP:ACACAY:MWMWAY:20000:187yTG$"ARMS":14000:AZ$:AZ(AZ$):AZACAZ0,250:(AZ$,1)"A"AZAC/z18000:CACAAZAP:ACACAZ:MWMWAZ:20000:187zTG$"GENERAL CARGO":TPGP:13000:GB$:GB(GB$):GBGPCAGB0,260:(GB$,1)"A"GB(CAGP)z 18000:CACAGBGP:GCGCGB:MWMWGB:20000:187{TG$"GENERAL CARGO":14000:GS$:GS(GS$):GSGCGS0,270:(GS$,1)"A"GSGCN{18000:CACAGSGP:GCGCGS:MWMWGS:20000:187{,OW0SW0AW0GW0OC0SC0AC0GC0L1,545:@832,Z"DO YOU WISH TO TRANSFER CARGO TO OR FROM THE WAREHOUSE";:TR$:(TR$,1)"Y",545/|6OC0,340:TG$"OPIUM":15000:O1$:O1(O1$):O1OC,310:(O1$,1)"A"O1OC\|@18000:OWOWO1:OCOCO1:MWMWO1:20000|TOW0,370:TG$"OPIUM":16000:O2$:O2(O2$):O2OW,340:(O2$,1)"A"O2OW|^18000:OCOCO2:OWOWO2:MWMWO2:20000*}rSC0,400:TG$"SILK":15000:S3$:S3(S3$):S3SC,370:(S3$,1)"A"S3SCW}|18000:SWSWS3:SCSCS3:MWMWS3:20000}SW0,430:TG$"SILK":16000:S4$:S4(S4$):S4SW,400:(S4$,1)"A"S4SW}18000:SWSWS4:SCSCS4:MWMWS4:20000$~AC0,460:TG$"ARMS":15000:A1$:A1(A1$):A1AC,430:(A1$,1)"A"A1ACQ~18000:AWAWA1:ACACA1:MWMWA1:20000~AW0,490:TG$"ARMS":16000:A2$:A2(A2$):A2AW,460:(A2$,1)"A"A2AW~18000:AWAWA2:ACACA2:MWMWA2:20000'GC0,520:TG$"GENERAL CARGO":15000:G1$:G1(G1$):G1GC,490:(G1$,1)"A"G1GCT18000:GWGWG1:GCGCG1:MWMWG1:20000GW0,540:TG$"GENERAL CARGO":16000:G2$:G2(G2$):G2GW,520:(G2$,1)"A"G2GW18000:GWGWG2:GCGCG2:MWMWG2:200002005:187>!L8,600:L1@832,Z"DO YOU WISH TO RETURN TO YOUR BANK";:Q$:(Q$,1)"Y"2020#MW0,@832,Z"YOUR SHIP IS OVERLOADED, TAIPAN!";:8:2005:187&&@832,"DO YOU WISH TO GO TO 1) HONGKONG, 2) SHANGHAI, 3) NAGASAKI, 4) SAIGON, 5) MANILA, 6) SINGAPORE, OR 7) BATAVIA";:LD:LD(LD):LDLLD1LD7,@832,Z:550P0L8:(127,25),80:70::20:80:70`:L8:20:80wXLD8,70:LLD:70A044864:@A,(30);::CK1,CK0:J0"SN0,CK1:1000:PP5:SN6,P1SN:@PP,J0;:PPPP12:::SN11,P15:@PP,J0;:PPPP12::PP261:P6SN:@PP,J0;:PPPP12::SN10,PP5:P15:@PP,J0;:PPPP12::PP261:P610:@PP,J0;:PPPP12:ӂSN10,(25)(27);"+";قSN0,:SN6,X1SN:PP134:1510:X15:PP134:1510PSN5SN11X1SN5:PP390:1510:SN5,X15:PP390:1510VRP1(X12):P1(PP12)((X1)12):T102:@P1,J1;:@P14,J2;:T020:T:@P1,J3;:@P14,J4;:T1,RP:SN6,X1SN:PP7((X1)12):X15:PP7((X1)12)1780:HT05:@PP1,J5;:@PP3,S$;:@PP62,S$;:@PP125,S$;:@PP189,S$;:@PP,J0;::@PP66,(143)(180)(25)(188);:@PP134,(140);: J6"ބJ7"J8"",J8(26)(J7,8)@PP1,S$;:@PP63,S$;:@PP127,S$;:@PP191,S$;:@PP1,J7;:9:@PP1,S$;:@PP63,S$;:@PP127,S$;:@PP1,J8;:9:@PP1,S$;:@PP63,S$;:@PP127,S$;:@PP1,J6;!9::OK(OK2)(3):SP(SP2)(3):AP(AP2)(3):GP(GP2)(3)M@640,Z"TAIPAN, PRESENT PRICES PER UNIT HERE ARE: OPIUM:"OK,"SILK:"SP " ARMS:"AP,"GENERAL:"GP:5000:6000:2055:@640,Z"DO YOU WISH TO VISIT THE BANK";:Q$:(Q$,1)"Y",*@640,Z"HOW MUCH WILL YOU DEPOSIT";:D$:D(D$):DCA@640,Z"YOU ONLY HAVE"CA"IN CASH, TAIPAN.":TL01500::2020:(D$,1)"A"DCAL17000:BABAD:CACAD:20000@640,Z"HOW MUCH WILL YOU WITHDRAW";:W$:W(W$)::WBAʲ@640,Z"YOU ONLY HAVE"BA"IN THE BANK, TAIPAN.";:TL01500::@640,Z:2040:(W$,1)"A"WBA17000:@640,Z:BABAW:CACAW:20000:920000:D010000WN1,2070:2100WN1:@640,Z"ELDER BROTHER WU HAS SENT"(100)50"BRAVES TO ESCORT YOU TO THE WU MANSION, TAIPAN.";:8:@640,Z;:8:40004@640,Z"DO YOU HAVE BUSINESS WITH ELDER BROTHER WU, THE MONEYLENDER";:Q$:(Q$,1)"Y",2300>R0:D00,@640,Z"HOW MUCH DO YOU WISH TO REPAY HIM";:R$:R(R$):(R$,1)"A"CAD0RD0:(R$,1)"A"RCACRD0R0RCA2110HD0D0R:CACAR:20000gR@640,Z;:"HOW MUCH DO YOU WISH TO BORROW, TAIPAN";B$:B(B$):B0,2130:B(BACA)2,@640,Z"HE WON'T LOAN YOU SO MUCH, TAIPAN!":8:@640,Z:2130:(B$,1)"A"B2CA\17000:D0D0B:CACAB:20000&D020000(5)1,CA0:@640,Z"BAD JOSS!!! TWO OF YOUR BODYGUARDS HAVE BEEN KILLED BY CUTTHROATS AND YOU HAVE BEEN ROBBED OF ALL YOUR CASH!!!";:20000:74 @640,Z:\ :M1SH:9000:@640,Z:(0).9,3040ˋ @640,Z;"LI YUEN'S PIRATES, TAIPAN!!";:8:BR1" GOOD JOSS!! THEY LET US BE!!";:8:@640,Z:3040:9002j (100)95,3060:@640,"STORM, TAIPAN!! ";:(100)95,3050:8:"WE'RE GOING DOWN!!!";:25:8:@896,"WANT TO GIVE IT ANOTHER GO";:Q$:(Q$,1)"Y",::֌ 8:"WE MADE IT!";:8:(5)3ʑ9:L(7):LDL:@704,"WE'VE BEEN BLOWN OFF COURSE TO "LO$(L);:8:@704,Z;1 LLD:@640,Z"ARRIVING AT "LO$(L);:9:@576,Z:@576,"COMPRADOR'S REPORT:";:(5)170007 "ELDER BROTHER WU REMINDS YOU OF THE CONFUCIAN IDEAL OF PERSONAL WORTHINESS, AND OF HOW THIS APPLIES TO PAYING ONE'S DEBTS. HE IS REMINDED OF A FABLED BARBARIAN WHO CAME TO A BAD END, AFTER NOT CARING FOR HIS OBLIGATIONS.";l" HE HOPES NO SUCH FATE AWAITS YOU, HIS FRIEND, TAIPAN.":7:7:@640,Z:&TMCABAD0:TM1000000@640,Z"DO YOU WISH TO RETIRE OR CONTINUE";:Z2:(Z2,1)"R"ʁA09:@640,Z"y O U ' R E A";:@704,"M I L L I O N A I R E !";:TL099:TL:@640,Z:A:::~@640,"YOUR RATING IS"(TM(TI1.1))100;:@704,;:"PLAY AGAIN";Q$:(Q$,1)"Y",:6pBR1,:BB((CA1.8)(0)):BR0:@640,Z"LI YUEN ASKS"BB"IN DONATION TO THE TEMPLE OF TIN HAU, THE SEA GODDESS. WILL YOU PAY";:Q$:(Q$,1)"Y",CACABB:BR1:20000:@640,Z::XPS1000(500):CAPS@640,"DO YOU WISH TO TRADE IN YOUR SHIP FOR ONE WITH 50 MORE CAPACITY BY PAYING AN ADDITONAL";:PS;:", TAIPAN";Q$:(Q$,1)"Y",7050:CAPS,CACAPS:MWMW50:SHSH50:20000@640,Z:@(100)98,8010:RB((CA1.8)(0)):CACARB:20000:@832,Z"TAIPAN, YOU'VE BEEN BEATEN UP AND ROBBED OF"RB"IN CASH!!";:7:9:@832,ZJOC0(100)5,89990TOF(CA1.8(0)):CACAOF:@832,Z"LOCALS SEIZE YOUR OPIUM AND FINE YOU"OF", TAIPAN!";:MWMWOC:OC0:20000:7:9:@832,Z=Y20000:Β^BR0(0).6L1,@832,Z"LI YUEN HAS SENT A LIEUTENANT, TAIPAN. HE SAYS HIS ADMIRAL WISHES TO SEE YOU IN HONGKONG, POSTHASTE.";:7:@832,ZԒ'#B(#(10)1,:SN((SH20)1):SASN:@640,Z;SN"HOSTILE SHIPS APPROACHING, TAIPAN!";:8:@640,Z:1000:9005*#SN(SHGN)1:SASN:M1SH:@640,Z;SN"SHIPS OF LI YUEN'S PIRATE FLEET, TAIPAN!!!";:8:@640,Z:1000-#21000:(2)1,9050,2#:9:@704,Z"THEY'RE FIRING ON US, TAIPAN!";:J1(191):J2(187):J3(179):J4(184):1500:9:@704,Z;<#(SN)(4)"THEY MISSED!!";::SHSH(30):DM((SHM1)100):22000:"WE'VE BEEN HIT!!! STATE OF REPAIR DOWN TO"(DM);(24)"%!";:25:9F#DM25SHM14,9:25:@768,Z"THE DOGS GOT US, TAIPAN!!! IT'S ALL OVER NOW!!!";::9050_P#CK1:1000:20:80:@832,"WANT TO TRY AGAIN";:Q$:(Q$,1)"Y",::Z#9:(20)1BR1,SN0:21000:CK1:1000:@704,Z"LI YUEN'S FLEET DROVE 'EM OFF, TAIPAN!!!";:8:20:80:10500::@704,Z;:ZR(95):GN0"SHALL WE RUN? "ZR;::"SHALL WE RUN OR FIGHT? "ZR;_#Q$"":T059:Q$:Q$""Q0ʇ:(24)Q$ZR;:Q2$Q2$Q$:Q$(13)Q1$(Q2$,1):Q2$"":Q0:9060:Q1:9055#d#@704,Z:Q1$"R"Q1$"Y",(3)(SN),SN0:@704,Z"WE GOT AWAY FROM 'EM!!";:8:@640,Z:CK1:1000:20:80:10500:::@704,Z"CAN'T LOSE 'EM!";:9ڗi#21000:Q1$"R"Q1$"Y",9070:SN2(0).9,PU(SN1):SNSNPU:SASN:1000:@768,Z"BUT WE ESCAPED FROM"PU"OF, 'EM, TAIPAN!!";:@832,"ONLY"SN"STILL ATTACKING!";:21000:9:9010Ln#GN0Q1$"F",@704,Z"WE'RE FIRING ON 'EM!";:9080::GN0Q1$"F",@704,Z"WITH WHAT, TAIPAN?!?";:9010:9080s#J5(10,188)(26)(10,24)(10,191)(26)(10,24)(10,191)(26)(10,24)(10,131):x#GN0Q1$"F",9090:(GN)(4),9:9075:1750:@768,Z"WE HIT 'EM!!";::9:@768,Z"MISSED 'EM!";:9100#GN0Q1$"F",9010:(100)50GN,SNSN1:9:1802:@832,"THE MONGREL'S JOINING DAVY JONES!!! ";:1000:19000::9:@832,"STILL FLOATING!";#21000:SN0,9:@896,"WE'VE DONE FOR 'EM ALL, TAIPAN!!!!";:1000:20:80::9010'8:@640,Z"WE'VE INHERITED SOME BOOTLE, TAIPAN!!";:CB(10000)SA:CACACB:" IT'S WORTH"CB"!!";:20000:8:@640,Z:10500:)Q1$"":(0).29000::*G1(1000)500:G1CA(4)1,:@640,Z"DO YOU WISH TO BUY A SHIP'S GUN FOR"G1;:Q$:(Q$,1)"Y",:MW100,12000::CACAG1:GNGN1:MWMW10:20000:~.@640,Z"YOUR SHIP WOULD BE OVERBURDENED, TAIPAN!";:8:@640,Z:؛2@832,Z:@896,"(YOU CAN AFFORD"(CATP)(24)")":@832,"HOW MUCH "TG$" SHALL I BUY";: 6@832,Z"HOW MUCH "TG$" SHALL I SELL, TAIPAN";:J:@832,Z"HOW MANY UNITS OF "TG$" MOVE TO THE WAREHOUSE";:>@832,Z"HOW MANY UNITS OF "TG$" MOVE ABOARD SHIP";:hB(127,25)0,:20:80:@580,"COMPRADOR'S REPORT:";::PF(127,25)0,:20:80:@580,"COMPRADOR'S REPORT:";:2005::b8J(0).5SN(SA4)SN1,SR(SN):SNSNSR:1000:SASN:@896,SR"RAN AWAY, TAIPAN!!! ";::x N40:80:@832,Z:R@640,(30);"SHIPS ATTACKING:"SN,"YOUR SHIP'S GUNS:"GN;:˝UDM0DM0::Y:(23);" DO YOU WANT TO START . . . 1) WITH CASH (AND A DEBT) >> OR << 2) WITH FIVE GUNS (AND NO CASH OR DEBT) ";:WZ$:WZ((WZ$)):WZ1WZ223000:WZ2D00:GN5:MW0:CA0::T