Home » Recent acquisitions » Commodore_16 » tape009b_c16_commodore_16_games_pack_1.wav » star trader

star trader

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Recent acquisitions » Commodore_16 » tape009b_c16_commodore_16_games_pack_1.wav
Filename: star trader
Read OK: ✔
File size: 294D bytes
Load address: 1001
Exec address: 0000
File contents
    10 N$="<clr><black>              STAR TRADER":S$="BOLT BIN  ":VOL8
    20 PRINT"<black>";N$:PRINT"<cursor down>             PLEASE WAIT..."
    30 RC$="<cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>"
    40 NL$="                                       "
    50 CY$="<home><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>":L$="🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸":CD$="<cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>"
    60 L1$="🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸┼🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸┼🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸"
    70 LP=0:MS=0:DF=0:DIMW%(9,1):DIMP(9,6):DIMPL$(9):SS=100:L=0
    80 DIMPF(9,3):DIMGD(8,1):DIMTP(8)
    90 DEFFNX(D)=INT(RND(0)*D*8-D*3)
   100 DEFFNDS(D)=INT(SQR(ABS(P(D,0)-P(L,0))^2+ABS(P(D,1)-P(L,1))^2+ABS(P(D,2)-P(L,2))^2))
   110 RESTORE
   120 DATASIRIUS,PROCYON,WESEN,ALTAIR,DENEB,DUBHE,VEGA,CAPELLA,CASTOR,POLLUX,ANTARES
   130 DATAZOSMA,RIGEL,MEGREZ,MINTAKA,SAIPH,KOCHAB,PHAEDA
   140 DATAETAMIN,ERIDANE,WOLF,HAMAL,ARIADNE
   150 FORI=1TO9:IFRND(0)<.333THENREADPL$(I):READD$:GOTO180
   160 IFRND(0)<.333THENREADD$:READPL$(I):GOTO180
   170 READD$:READPL$(I)
   180 P(I,0)=FNX(I):P(I,1)=FNX(I):P(I,2)=FNX(I)
   190 P(I,3)=91-10*I+INT(RND(0)*15)+INT(RND(0)*15)
   200 P(I,4)=21-2*I-INT(RND(0)*3):P(I,5)=INT(2000/(P(I,3)*P(I,4))+1)
   210 P(I,6)=FNDS(I)
   220 NEXTI:PL$(0)="SOL":P(0,3)=110+INT(RND(0)*20):P(0,4)=20:P(0,5)=1
   230 DIMT$(9):T$(0)="🭲0:FOOD    ":T$(1)="🭲1:METALS  "
   240 T$(6)="🭲6:GEMS    "
   250 T$(2)="🭲2:WEAPONS ":T$(3)="🭲3:CYBORGS "
   260 T$(4)="🭲4:URANIUM ":T$(5)="🭲5:DRUGS   "
   270 T$(7)="🭲7:FUEL    ":T$(8)="🭲8:REPAIRS "
   280 COLOR0,2:COLOR4,2
   290 PRINT"<clr>      WELCOME TO STAR TRADER!"
   300 INPUT"<cursor down>      ENTER NAME OF YOUR SHIP";S$:PRINT"<clr>"
   310 GD(7,1)=10:CS=5000:CR=-5000:SD=5+INT(RND(0)*200)/100:GOSUB2200:GOSUB690:B=2*CS+500
   320 GETA$:IFA$=""THEN320
   330 IFA$="Q"THEN530
   340 IFA$="I"THENGOSUB690:GOTO320
   350 IFA$="M"THENGOSUB870:GOTO320
   360 IFA$="J"THENGOSUB990:GOTO320
   370 IFA$="B"ANDL=0ANDB>0THENGOSUB2400:GOTO320
   380 IFA$="D"ANDL=0ANDCS>0THENGOSUB2480:GOTO320
   390 IFA$="T"THENGOSUB1270:GOTO320
   400 IFA$="U"ANDL=0THENGOSUB570:GOTO320
   410 IFA$="L"ANDL=0THENGOSUB630:GOTO320
   420 IFASC(A$)=13THEN320
   430 PRINTN$;"<home><cursor down><cursor down><red>          VALID COMMANDS ARE :":PRINT"<cursor down> 'I'  CARGO AND SHIP STATUS"
   440 PRINT"<cursor down> 'J'  HYPER JUMP CHART":PRINT"<cursor down> 'T'  TRADE TABLE"
   450 PRINT"<cursor down> 'M'  SYSTEM LIBRARY"
   460 PRINT"<cursor down> 'Q'  TO QUIT GAME"
   470 PRINT"<cursor down> 'U'  UNLOAD SHIP TO WAREHOUSE"
   480 PRINT"<cursor down> 'L'  LOAD SHIP FROM WAREHOUSE"
   490 PRINT"<cursor down> 'B'  BORROW CASH FROM BANK"
   500 PRINT"<cursor down> 'D'  DEPOSIT CASH IN BANK"
   510 GETA$:IFA$=""THEN510
   520 GOTO330
   530 PRINT"<cursor down><cursor down><cursor down>   QUITTING: ARE YOU SURE ?";
   540 GETA$:IFA$=""THEN540
   550 IFA$="Y"THEN2860
   560 GOSUB690:GOTO320
   570 IN=-1:I$="":PRINT"<home>";CY$;NL$
   580 PRINTCY$;"<pink> UNLOADING ";
   590 GOSUB1620:IFIN>6THENSOUND1,200,5:GOTO590
   600 PRINTRIGHT$(T$(IN),8);:INPUTN:IFINT(N)>GD(IN,1)ORN<0THENSOUND1,200,5:GOTO570
   610 GD(IN,0)=GD(IN,0)+INT(N):GD(IN,1)=GD(IN,1)-INT(N)
   620 PRINTCY$;NL$:GOSUB2360:GOSUB850:RETURN
   630 IN=-1:I$="":PRINTCY$;NL$
   640 PRINTCY$;"<pink> LOADING ";
   650 GOSUB1620:IFIN>6THENSOUND1,200,5:GOTO650
   660 PRINTRIGHT$(T$(IN),8);:INPUTN:IFINT(N)>GD(IN,0)ORN<0THENSOUND1,200,5:GOTO630
   670 GD(IN,1)=GD(IN,1)+INT(N):GD(IN,0)=GD(IN,0)-INT(N)
   680 PRINTCY$;NL$:GOSUB2360:GOSUB850:RETURN
   690 PRINTN$:PRINT"╭";L$;"╮╭";L$;"╮";
   700 PRINT"│  WAREHOUSE (SOL) 🭲🭲                  🭲";
   710 PRINT"<home><cursor down><cursor down><cursor right><cursor right><cursor right><cursor right><cursor right>";RC$;S$
   720 PRINT"├";L$;"┤├";L$;"┤";
   730 FORI=0TO6:PRINTT$(I);"        🭲";T$(I);"        🭲";:NEXT
   740 PRINT"<black>╰";L$;"╯╰";L$;"╯":PRINT"<cursor down><cursor down><cursor down>"
   750 GOSUB2360:GOSUB840:GOSUB2460:GOSUB850
   760 PRINTCY$;"<cursor down><cursor down><cursor down><cursor down><cursor down><black>       SHIP DATA FOR ";S$
   770 PRINT"<cursor down><light blue>  TONNAGE   <brown>";:PRINTUSING"#######";SS;
   780 PRINT"<light blue>   DAMAGE    <brown>";:PRINTUSING"#####";DM
   790 PRINT"<light blue><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>FUEL    <brown>";:PRINTUSING"#####.#";GD(7,1)
   800 PRINT:PRINT"<light blue>  LASER PODS  <brown>";:PRINTUSING"#####";LP;
   810 PRINT"<light blue>   DEFLECTORS<brown>";:PRINTUSING"#####";DF
   820 PRINT"<light blue>  MISSILES  <brown>";:PRINTUSING"#######";MS;
   830 RETURN
   840 PRINTCY$;"<green>  ";PL$(L);" STARDATE ";:PRINTUSING"#####.##";SD;:RETURN
   850 CC=SS:FORI=0TO6:CC=CC-GD(I,1):NEXT:CC=CC-INT(GD(7,1))-10*(LP+DF)-MS
   860 PRINTCY$;"<light blue><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor right><cursor right>CARGO CAP.<brown>";:PRINTUSING"#######";CC:RETURN
   870 PRINTN$:PRINT:PRINT"SYSTEM","POPL.    TECH.    AGRICULTURE":PRINT
   880 FORI=0TO9:PRINT:IFL=ITHENPRINT"*";
   890 PRINTPL$(I),P(I,3),P(I,4),P(I,5):NEXT
   900 RETURN
   910 PRINTN$:L1=L
   920 PRINT"<cursor down><light green>       DESTINATION SYSTEM <red>";PL$(L1)
   930 FORI=0TO4:PRINT"<cursor down><black>";CHR$(I+48);":<medium gray>";:IFI=LTHENPRINT"<reverse on>";
   940 PRINTPL$(I);"<rev off><blue>";,P(I,6),;
   950 PRINT"<black>";CHR$(I+53);":<medium gray>";:IFI+5=LTHENPRINT"<reverse on>";
   960 PRINTPL$(I+5);"<rev off><blue>";,P(I+5,6):NEXTI
   970 PRINT"<cursor down><cursor down><light blue>  '0'..'9' TO SELECT DESTINATION":PRINT"       THEN RETURN TO LAUNCH."
   980 RETURN
   990 IFCC<0ORGD(7,1)<=0THENSOUND1,200,5:RETURN
  1000 GOSUB910
  1010 GETA$:IFA$=""THEN1010
  1020 IFA$="Q"THEN530
  1030 IFL1=LANDASC(A$)=13THENGOSUB690:GOSUB840:RETURN
  1040 IFASC(A$)<>13THEN1110
  1050 K=P(L1,6):L=L1:FORZ=1TOK:GOSUB1140:SD=SD+.01:IFCR>0THENCR=CR+CR/500
  1060 IFCR<0THENCR=CR+CR/150
  1070 NEXTZ
  1080 FORI=0TO9:P(I,6)=FNDS(I):NEXT:GOSUB2200:SOUND1,1000,10
  1090 IFRND(0)*CR*CR/1000000>50000/SDTHENPRINT"<clr><black>   YOUR SHIP WAS REPOSESSED...":GOTO2860
  1100 B=2*CS+500:GOSUB2540:GOSUB690:RETURN
  1110 IFASC(A$)<48ORASC(A$)>57THEN1010
  1120 L1=VAL(A$):PRINT"<red><home><cursor down><cursor down><cursor right><cursor right><cursor right><cursor right><cursor right>";RC$;"          <cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left>";PL$(L1);
  1130 GOTO1010
  1140 GD(7,1)=GD(7,1)-0.1
  1150 IFGD(7,1)<0THENPRINT"<clr><red>   YOU RAN OUT OF FUEL IN MID-FLIGHT...":GOTO2860
  1160 IFRND(0)>.06THENRETURN
  1170 IFRND(0)>.3THEN1220
  1180 DM=DM+INT(RND(0)*5+1):SOUND3,400,20
  1190 PRINTCY$;"<cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>    <flash on>SPACE DEBRIS!!<flash off>":FORJ=1TO400:NEXTJ
  1200 IFDM>=SSTHENPRINT"<clr><cursor down><cursor down><cursor down><black>YOUR SHIP WAS DESTROYED BY A METEOR":GOTO2860
  1210 RETURN
  1220 IFRND(0)>.1THEN1250
  1230 GD(7,1)=GD(7,1)-INT(RND(0)*10)-1:SOUND3,1000,20
  1240 PRINTCY$;"<cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>    <flash on>MIS-JUMP!!<flash off>":FORJ=1TO400:NEXTJ:RETURN
  1250 IFRND(0)>L^2/120THENRETURN
  1260 GOSUB1710:RETURN
  1270 PRINTN$:PRINT"<cursor down><black>           TRADE PRICES FOR ";PL$(L)
  1280 PRINT"╭🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸┬🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸┬🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸╮"
  1290 PRINT"🭲 ITEM     🭲    PRICE  🭲         OWNED 🭲";
  1300 PRINT"├";L1$;"┤"
  1310 FORI=0TO6:PRINTLEFT$(T$(I),3);:IFIX=ITHENPRINT"<reverse on>";
  1320 PRINTRIGHT$(T$(I),8);"<rev off>🭲";:PRINT USING"#######.##";TP(I);
  1330 PRINT" 🭲               🭲":NEXT
  1340 PRINT"├";L1$;"┤"
  1350 PRINTT$(7);"🭲";:PRINTUSING"#######.##";TP(7);:PRINT" 🭲               🭲";
  1360 PRINT"├";L1$;"┤"
  1370 PRINTT$(8);"🭲";:PRINT USING"#######.##";TP(8);:PRINT" 🭲               🭲";
  1380 PRINT"╰🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸┴🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸┴🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸🭸╯"
  1390 PRINT"'B'-BUY  'S'-SELL  'Q'-QUIT  'R'-REPAIR":DN$="":GOSUB1650
  1400 IN=-1:I$="":GD(8,1)=0
  1410 PRINTCY$;CD$;NL$
  1420 GETA$:IFA$=""THEN1420
  1430 IFA$="Q"THENGOSUB690:RETURN
  1440 IFA$<>"R"THEN1480
  1450 PRINTCY$;CD$;"<pink>  REPAIRS ";DM;:INPUTN:IFN>DMTHENN=DM
  1460 IFINT(N)*TP(8)>CSTHENN=INT(CS/TP(8))
  1470 DM=DM-INT(N):CS=CS-INT(N)*TP(8):GOSUB1650:GOTO1410
  1480 IFA$<>"B"THEN1560
  1490 PRINTCY$;CD$;"<medium gray>  BUYING ";
  1500 IFIN<0THENGOSUB1620
  1510 PRINTRIGHT$(I$,8);"(";
  1520 PRINT USING"######";INT(CS/TP(IN));:PRINT")";
  1530 PRINT"           <cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left>";
  1540 INPUTN:IFTP(IN)*INT(N)>CSTHENN=INT(CS/TP(IN))
  1550 CS=CS-TP(IN)*INT(N):GD(IN,1)=GD(IN,1)+N:GOSUB1650:IN=-1:GOTO1410
  1560 IFA$<>"S"THENSOUND1,200,5:GOTO1410
  1570 PRINTCY$;CD$;"<orange>  SELLING ";:IFIN>=0THENPRINT"<cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>";:GOTO1590
  1580 GOSUB1620:PRINTRIGHT$(I$,8);:IFIN>7THENSOUND1,200,5:IN=-1:GOTO1410
  1590 PRINT"                  <cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left>";
  1600 INPUTN:IFINT(N)>GD(IN,1)THENN=GD(IN,1)
  1610 CS=CS+TP(IN)*INT(N):GD(IN,1)=GD(IN,1)-N:GOSUB1650:IN=-1:GOTO1410
  1620 GETA$:IFA$=""THEN1620
  1630 IFASC(A$)>=48ANDASC(A$)<=55THENIN=ASC(A$)-48:I$=T$(IN):RETURN
  1640 SOUND1,200,5:GOTO1620
  1650 GOSUB850:PRINTCY$;"<red><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>  CASH            <cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left><cursor left>";
  1660 PRINTUSING "$###########.##";CS
  1670 DN$="":FORI=0TO6:PRINT"<home><blue><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>";DN$;RC$;
  1680 PRINT USING"########";GD(I,1):DN$=DN$+"<cursor down>":NEXT:DN$=DN$+"<cursor down><cursor down><cursor down><cursor down><cursor down><cursor down><cursor down>"
  1690 PRINT"<home><blue><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>";DN$;RC$;:PRINTUSING"#####.#";GD(7,1):
  1700 PRINT"<home><blue><cursor down><cursor down><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>";DN$;RC$;:PRINTUSING"######";DM:RETURN
  1710 PRINT"<clr>":COLOR1,8:COLOR0,2,4:DR=0:PS=480:SK=0:OS=0
  1720 SN=0:BT=500:FORI=1TOINT(SS/100):SN=SN+INT(RND(0)*2):BT=BT+500+INT(RND(0)*600):NEXT
  1730 PF(0,0)=SS+INT(RND(0)*SS/100+2)*100:IFSN>9THENPF(0,0)=PF(0,0)+(SN-9)*100:SN=9
  1740 PF(0,1)=INT(RND(0)*SS/100+2)+INT(RND(0)*L/2)
  1750 FORJ=1TO9:PF(J,0)=INT(RND(0)*SS/10+SS/10):PF(J,1)=INT(RND(0)*SS/500+1)
  1760 IFJ>SNTHENPF(J,0)=0
  1770 NEXT
  1780 FORJ=0TO9:PF(J,3)=30+INT(RND(0)*9):PF(J,2)=8+INT(RND(0)*6):NEXT:TG=0:OS=SN+1
  1790 DR=DR-10*DF:IFDR<0THENDR=0
  1800 DM=DM+INT(DR):DR=DR-INT(DR)
  1810 IFGD(7,1)<=0THENPRINT"<home><white><cursor down><cursor down>YOU RAN OUT OF FUEL...":DM=SS+1:FORI=1TO1000:NEXT
  1820 IFDM>=SSTHENPRINT"<clr><black><cursor right><cursor right><cursor right><cursor right><cursor right>LOOTED BY PIRATES!":FORI=0TO6:GD(I,1)=0:NEXT:CS=0:GOTO2860
  1830 PRINTN$:PRINT"<yellow> 'E' EVADE 'C' CLOSE '0'..'9' TARGET":PRINT" 'M' NUKE  'L' LASER"
  1840 GOSUB760:GOSUB2050
  1850 IFSN=-1THEN1930
  1860 PRINTCY$;RC$;CD$;"<cursor down><light green>  TARGET       ";:PRINTUSING"##";TG;:GETA$:IFA$=""THEN1860
  1870 IFA$="L"ANDLP>0ANDPF(TG,0)>0THENGOSUB1970:GOTO1790
  1880 IFA$="M"ANDMS>0ANDPF(TG,0)>0THENGOSUB2000:GOTO1790
  1890 IFA$="E"ANDGD(7,1)>0THENGOSUB2040:GOTO1790
  1900 IFA$="C"THENIFRND(0)<.7THENEV=-3:GOTO1790
  1910 IFASC(A$)>47ANDASC(A$)<58THENTG=ASC(A$)-48:GOTO1860
  1920 GOTO1860
  1930 COLOR0,2:PRINT"<clr>":IFOS<>SKTHENRETURN
  1940 PRINT"<clr><cursor down><cursor down><black>YOU DEFEATED THE PIRATE FLEET"
  1950 CS=CS+BT:PRINT"<cursor down>AND COLLECTED ";:PRINTUSING"########";BT;:PRINT" IN BOOTY!"
  1960 FORI=1TO2000:NEXT:PRINT"<clr>":RETURN
  1970 SOUND3,1020,8:SOUND1,970,8:PF(TG,0)=PF(TG,0)-(150*LP)/PF(TG,3)
  1980 IFPF(TG,0)<=0THENSOUND3,900,20:SN=SN-1:SK=SK+1
  1990 RETURN
  2000 SOUND3,600,20:MS=MS-1:IFRND(0)*100<PF(TG,3)THENRETURN
  2010 SOUND3,800,30:PF(TG,0)=PF(TG,0)-INT(RND(0)*50)-INT(RND(0)*50)
  2020 IFPF(TG,0)<=0THENSOUND3,950,20:SN=SN-1:SK=SK+1
  2030 RETURN
  2040 GD(7,1)=GD(7,1)-.1:EV=INT(RND(0)*3+1):RETURN
  2050 POKE3072+PS,42:POKE2048+PS,127
  2060 FORJ=9TO0STEP-1:IFPF(J,0)<=0THEN2180
  2070 MV=INT(RND(0)*3):IFPF(J,3)+EV-MV>=1THENPF(J,3)=PF(J,3)+EV-MV
  2080 IFPF(J,3)>39THENPF(J,0)=0:SN=SN-1:GOTO2180
  2090 IFINT(PS/40)>PF(J,2)ANDRND(0)<.3THENPF(J,2)=PF(J,2)+1
  2100 IFINT(PS/40)<PF(J,2)ANDRND(0)<.3THENPF(J,2)=PF(J,2)-1
  2110 IFJ=0THENPOKE3072+PF(0,2)*40+PF(0,3),65:POKE2048+PF(0,2)*40+PF(0,3),127:GOTO2140
  2120 POKE3072+PF(J,2)*40+PF(J,3)-40,J+48:POKE2048+PF(J,2)*40+PF(J,3)-40,113
  2130 POKE3072+PF(J,2)*40+PF(J,3),87:POKE2048+PF(J,2)*40+PF(J,3),127
  2140 IFRND(0)<PF(J,3)/40THEN2180
  2150 SOUND3,1020-10*J,5:DX=(PF(J,1)*400)/(PF(J,3)^2)
  2160 DR=DR+DX:IFRND(0)<DX/(SS-DM+DX)ANDDF>0THENSOUND3,1020,10:SOUND3,990,15:DF=DF-1
  2170 IFRND(0)<DX/(SS-DM+DX)ANDLP>0THENSOUND3,1000,10:SOUND3,900,10:LP=LP-1
  2180 NEXTJ
  2190 EV=0:RETURN
  2200 TP(0)=20/SQR(P(L,5))
  2210 TP(1)=2000/(5*P(L,4)+P(L,5)/5)
  2220 TP(2)=40000/(10*P(L,4)+P(L,3))
  2230 TP(3)=(12000+INT(RND(0)*2000))/SQR(10*P(L,4))
  2240 TP(4)=100000/SQR(4*P(L,4))
  2250 TP(5)=100000/SQR(P(L,5)/2)
  2260 TP(6)=15000*P(L,3)/(5*P(L,4))
  2270 TP(7)=100/SQR(2*P(L,4))
  2280 TP(8)=500-P(L,4)*22
  2290 FORI=0TO7:IFRND(0)<.4THENTP(I)=TP(I)-RND(0)*(TP(I)/(7+L/2)):GOTO2310
  2300 TP(I)=TP(I)+RND(0)*TP(I)/(10+2*L)
  2310 NEXT:IX=INT(RND(0)*7):IFINT(RND(0)*10)<>LORRND(0)<50/(SD*10)THENIX=-1:RETURN
  2320 NS=(RND(0)*P(L,3)+8)/4:G$="SHORTAGE":IFRND(0)<.5THENG$="GLUT":NS=4/NS
  2330 PRINT"<clr><cursor down><cursor down><cursor down><light blue>THERE HAS BEEN A ";G$;" OF ";RIGHT$(T$(IX),8);"."
  2340 PRINT"PRICES ARE <flash on>";:PRINTUSING"##.##";NS;:PRINT"<flash off> TIMES NORMAL!!!"
  2350 FORI=1TO2500:NEXT:TP(IX)=TP(IX)*NS:RETURN
  2360 DN$=""
  2370 PRINT"<blue>":FORI=0TO6:PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>";DN$;:PRINT USING"########";GD(I,0)
  2380 PRINT"<home><cursor down><cursor down><cursor down><cursor down><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right><cursor right>";RC$;DN$;:PRINT USING"########";GD(I,1)
  2390 DN$=DN$+"<cursor down>":NEXT:RETURN
  2400 PRINTCY$;NL$
  2410 PRINTCY$;"<pink>   BORROWING ";
  2420 INPUTN:IFINT(N)>BTHENN=B
  2430 CS=CS+INT(N):CR=CR-INT(N):B=B-INT(N):GOSUB2460
  2440 PRINTCY$;NL$
  2450 RETURN
  2460 PRINTCY$;"<red><cursor down><cursor down>    CASH   $ ";:PRINT USING"##############.##";CS
  2470 PRINTCY$;"<red><cursor down><cursor down><cursor down>    CREDIT $ ";:PRINT USING"##############.##";CR:RETURN
  2480 PRINTCY$;NL$
  2490 PRINTCY$;"<pink>   DEPOSITING ";
  2500 INPUTN:IFINT(N)>CSTHENN=CS
  2510 CS=CS-INT(N):CR=CR+INT(N):B=B+INT(N):GOSUB2460
  2520 PRINTCY$;NL$
  2530 RETURN
  2540 IFRND(0)>P(L,4)/40THENRETURN
  2550 IFRND(0)>.2THEN2620
  2560 CT=P(L,4)*100+1000*RND(0)+RND(0)*(CS/1000)+CS/1000
  2570 IFCT>CSTHENRETURN
  2580 PRINT"<clr><cursor down><cursor down><cursor down><green>YOU HAVE BEEN OFFERED A BIGGER SPACE-"
  2590 PRINT"<cursor down>SHIP FROM A COMPANY ON ";PL$(L)
  2600 PRINT"<cursor down>IT COSTS ";:PRINTUSING"########";CT;:PRINT" CR.";
  2610 PRINT" WITH A TRADE-IN.":GOSUB2820:SS=SS+100:RETURN
  2620 IFRND(0)>.25THEN2680
  2630 CT=160*(25-P(L,4))+RND(0)*(CS/1000)+CS/1000
  2640 IFCT>CSTHENRETURN
  2650 PRINT"<clr><cursor down><cursor down><cursor down><blue>THERE IS A NEW LASER POD FOR SALE HERE."
  2660 PRINT"<cursor down>IT COSTS A MERE ";:PRINTUSING"########";CT;:PRINT" CR."
  2670 GOSUB2820:LP=LP+1:RETURN
  2680 IFRND(0)>.15THEN2740
  2690 CT=200*(25-P(L,4))+RND(0)*(CS/800)+CS/800
  2700 IFCT>CSTHENRETURN
  2710 PRINT"<clr><cursor down><cursor down><cursor down><red>THERE IS A DEFLECTOR SHIELD AVAILABLE"
  2720 PRINT"<cursor down>COSTING JUST ";:PRINTUSING"########";CT;:PRINT" CR."
  2730 GOSUB2820:DF=DF+1:RETURN
  2740 CT=70*(25-P(L,4))+RND(0)*(CS/1000)+CS/1000:N=INT(RND(0)*P(L,4)/2+P(L,4)/3+1)
  2750 IFCT*N>CSTHENN=INT(CS/CT)
  2760 IFN=0THENRETURN
  2770 PRINT"<clr><cursor down><cursor down><cursor down>";N;"<red> NUCLEAR MISSILES ARE OFFERED."
  2780 PRINT"<cursor down>TOTAL COST IS";:PRINTUSING"########";CT*N;:PRINT" CR."
  2790 INPUT"<cursor down>HOW MANY DO YOU WISH TO BUY";NM:IFNM<0THENNM=0
  2800 IFNM>NTHENNM=N
  2810 MS=MS+NM:CS=CS-NM*CT:RETURN
  2820 PRINT"<cursor down>ARE YOU WILLING TO MAKE THE PURCHASE ?"
  2830 GETA$:IFA$<>"Y"ANDA$<>"N"THEN2830
  2840 IFA$="Y"THENCS=CS-CT
  2850 PRINT"<clr>":RETURN
  2860 PRINT"<red><cursor down><cursor down>        CASH POSESSED ";CS:PRINT"<cursor down>        BANK BALANCE ";CR;"
  2870 PRINT"<pink><cursor down><cursor down>        GOODS POSESSED<cursor down>"
  2880 FORI=0TO6:PRINT"<green>        ";T$(I);":<light blue>";GD(I,0)+GD(I,1):NEXT


9
N$�"��              STAR TRADER":S$�"BOLT BIN  ":�8e�"�";N$:�"             PLEASE WAIT..."�RC$�""�(NL$�"                                       "�2CY$�"":L$�"������������������":CD$�"")<L1$�"��������������������������������������"`FLP�0:MS�0:DF�0:�W%(9,1):�P(9,6):�PL$(9):SS�100:L�0}P�PF(9,3):�GD(8,1):�TP(8)�Z��X(D)��(�(0)�D�8�D�3)�d��DS(D)��(�(�(P(D,0)�P(L,0))�2��(P(D,1)�P(L,1))�2��(P(D,2)�P(L,2))�2))�n�9x�SIRIUS,PROCYON,WESEN,ALTAIR,DENEB,DUBHE,VEGA,CAPELLA,CASTOR,POLLUX,ANTARESm��ZOSMA,RIGEL,MEGREZ,MINTAKA,SAIPH,KOCHAB,PHAEDA���ETAMIN,ERIDANE,WOLF,HAMAL,ARIADNE���I�1�9:��(0)�.333��PL$(I):�D$:�180����(0)�.333��D$:�PL$(I):�180���D$:�PL$(I)�P(I,0)��X(I):P(I,1)��X(I):P(I,2)��X(I)?�P(I,3)�91�10�I��(�(0)�15)��(�(0)�15)|�P(I,4)�21�2�I��(�(0)�3):P(I,5)��(2000�(P(I,3)�P(I,4))�1)��P(I,6)��DS(I)���I:PL$(0)�"SOL":P(0,3)�110��(�(0)�20):P(0,4)�20:P(0,5)�1���T$(9):T$(0)�"�0:FOOD    ":T$(1)�"�1:METALS  "�T$(6)�"�6:GEMS    "B�T$(2)�"�2:WEAPONS ":T$(3)�"�3:CYBORGS "nT$(4)�"�4:URANIUM ":T$(5)�"�5:DRUGS   "�T$(7)�"�7:FUEL    ":T$(8)�"�8:REPAIRS "��0,2:�4,2�"�"�      WELCOME TO STAR TRADER!"�,�"      ENTER NAME OF YOUR SHIP";S$:�"�"G6GD(7,1)�10:CS�5000:CR��5000:SD�5��(�(0)�200)�100:�2200:�690:B�2�CS�500Z@�A$:�A$�""�320jJ�A$�"Q"�530�T�A$�"I"��690:�320�^�A$�"M"��870:�320�h�A$�"J"��990:�320�r�A$�"B"�L�0�B�0��2400:�320�|�A$�"D"�L�0�CS�0��2480:�320��A$�"T"��1270:�320��A$�"U"�L�0��570:�3206��A$�"L"�L�0��630:�320H���(A$)�13�320���N$;"          VALID COMMANDS ARE :":�" 'I'  CARGO AND SHIP STATUS"���" 'J'  HYPER JUMP CHART":�" 'T'  TRADE TABLE"���" 'M'  SYSTEM LIBRARY"��" 'Q'  TO QUIT GAME")��" 'U'  UNLOAD SHIP TO WAREHOUSE"P��" 'L'  LOAD SHIP FROM WAREHOUSE"t��" 'B'  BORROW CASH FROM BANK"���" 'D'  DEPOSIT CASH IN BANK"���A$:�A$�""�510��330��"   QUITTING: ARE YOU SURE ?";��A$:�A$�""�540�&�A$�"Y"�28600�690:�320):IN��1:I$�"":�"";CY$;NL$BD�CY$;"� UNLOADING ";`N�1620:�IN�6��1,200,5:�590�X��(T$(IN),8);:�N:��(N)�GD(IN,1)�N�0��1,200,5:�570�bGD(IN,0)�GD(IN,0)��(N):GD(IN,1)�GD(IN,1)��(N)�l�CY$;NL$:�2360:�850:��vIN��1:I$�"":�CY$;NL$��CY$;"� LOADING ";0��1620:�IN�6��1,200,5:�650f���(T$(IN),8);:�N:��(N)�GD(IN,0)�N�0��1,200,5:�630��GD(IN,1)�GD(IN,1)��(N):GD(IN,0)�GD(IN,0)��(N)���CY$;NL$:�2360:�850:����N$:�"�";L$;"��";L$;"�";��"�  WAREHOUSE (SOL) ��                  �";��"";RC$;S$0��"�";L$;"��";L$;"�";c��I�0�6:�T$(I);"        �";T$(I);"        �";:����"��";L$;"��";L$;"�":�""���2360:�840:�2460:�850���CY$;"�       SHIP DATA FOR ";S$��"�  TONNAGE   �";:��"#######";SS;�"�   DAMAGE    �";:��"#####";DMQ�"�FUEL    �";:��"#####.#";GD(7,1)z �:�"�  LASER PODS  �";:��"#####";LP;�*�"�   DEFLECTORS�";:��"#####";DF�4�"�  MISSILES  �";:��"#######";MS;�>�H�CY$;"  ";PL$(L);" STARDATE ";:��"#####.##";SD;:�CRCC�SS:�I�0�6:CC�CC�GD(I,1):�:CC�CC��(GD(7,1))�10�(LP�DF)�MSw\�CY$;"�CARGO CAP.�";:��"#######";CC:��f�N$:�:�"SYSTEM","POPL.    TECH.    AGRICULTURE":��p�I�0�9:�:�L�I��"*";�z�PL$(I),P(I,3),P(I,4),P(I,5):�������N$:L1�L(��"�       DESTINATION SYSTEM ";PL$(L1)R��I�0�4:�"�";�(I�48);":�";:�I�L��"";m��PL$(I);"�";,P(I,6),;���"�";�(I�53);":�";:�I�5�L��"";���PL$(I�5);"�";,P(I�5,6):�I���"�  '0'..'9' TO SELECT DESTINATION":�"       THEN RETURN TO LAUNCH."��#��CC�0�GD(7,1)��0��1,200,5:�,��910@��A$:�A$�""�1010P��A$�"Q"�530o�L1�L��(A$)�13��690:�840:����(A$)��13�1110�K�P(L1,6):L�L1:�Z�1�K:�1140:SD�SD�.01:�CR�0�CR�CR�CR�500�$�CR�0�CR�CR�CR�150�.�Z
8�I�0�9:P(I,6)��DS(I):�:�2200:�1,1000,10UB��(0)�CR�CR�1000000�50000�SD��"��   YOUR SHIP WAS REPOSESSED...":�2860qLB�2�CS�500:�2540:�690:��V��(A$)�48��(A$)�57�1010�`L1��(A$):�"";RC$;"          ���������";PL$(L1);�j�1010�tGD(7,1)�GD(7,1)�0.1. ~�GD(7,1)�0��"�   YOU RAN OUT OF FUEL IN MID-FLIGHT...":�2860> ���(0)�.06��P ���(0)�.3�1220p �DM�DM��(�(0)�5�1):�3,400,20� ��CY$;"    �SPACE DEBRIS!!�":�J�1�400:�J� ��DM��SS��"��YOUR SHIP WAS DESTROYED BY A METEOR":�2860� ��� ���(0)�.1�1250$!�GD(7,1)�GD(7,1)��(�(0)�10)�1:�3,1000,20V!��CY$;"    �MIS-JUMP!!�":�J�1�400:�J:�j!���(0)�L�2�120��v!��1710:��!��N$:�"�           TRADE PRICES FOR ";PL$(L)�!�"��������������������������������""
�"� ITEM     �    PRICE  �         OWNED �";"�"�";L1$;"�"="�I�0�6:��(T$(I),3);:�IX�I��"";j"(��(T$(I),8);"��";:� �"#######.##";TP(I);�"2�" �               �":��"<�"�";L1$;"�"�"F�T$(7);"�";:��"#######.##";TP(7);:�" �               �";�"P�"�";L1$;"�"##Z�T$(8);"�";:� �"#######.##";TP(8);:�" �               �";S#d�"��������������������������������"�#n�"'B'-BUY  'S'-SELL  'Q'-QUIT  'R'-REPAIR":DN$�"":�1650�#xIN��1:I$�"":GD(8,1)�0�#��CY$;CD$;NL$�#��A$:�A$�""�1420�#��A$�"Q"��690:��#��A$��"R"�1480 $��CY$;CD$;"�  REPAIRS ";DM;:�N:�N�DM�N�DMA$���(N)�TP(8)�CS�N��(CS�TP(8))m$�DM�DM��(N):CS�CS��(N)�TP(8):�1650:�1410$��A$��"B"�1560�$��CY$;CD$;"�  BUYING ";�$��IN�0��1620�$���(I$,8);"(";�$�� �"######";�(CS�TP(IN));:�")";�$��"           �����������";%%�N:�TP(IN)��(N)�CS�N��(CS�TP(IN))a%CS�CS�TP(IN)��(N):GD(IN,1)�GD(IN,1)�N:�1650:IN��1:�1410}%�A$��"S"��1,200,5:�1410�%"�CY$;CD$;"�  SELLING ";:�IN��0��"";:�1590�%,�1620:��(I$,8);:�IN�7��1,200,5:IN��1:�1410&6�"                  ������������������";0&@�N:��(N)�GD(IN,1)�N�GD(IN,1)l&JCS�CS�TP(IN)��(N):GD(IN,1)�GD(IN,1)�N:�1650:IN��1:�1410�&T�A$:�A$�""�1620�&^��(A$)��48��(A$)��55�IN��(A$)�48:I$�T$(IN):��&h�1,200,5:�1620�&r�850:�CY$;"  CASH            ������������";'|�� "$###########.##";CSJ'�DN$�"":�I�0�6:�"";DN$;RC$;�'�� �"########";GD(I,1):DN$�DN$�"":�:DN$�DN$�""�'��"";DN$;RC$;:��"#####.#";GD(7,1):�'��"";DN$;RC$;:��"######";DM:�(��"�":�1,8:�0,2,4:DR�0:PS�480:SK�0:OS�0\(�SN�0:BT�500:�I�1��(SS�100):SN�SN��(�(0)�2):BT�BT�500��(�(0)�600):��(�PF(0,0)�SS��(�(0)�SS�100�2)�100:�SN�9�PF(0,0)�PF(0,0)�(SN�9)�100:SN�9�(�PF(0,1)��(�(0)�SS�100�2)��(�(0)�L�2))��J�1�9:PF(J,0)��(�(0)�SS�10�SS�10):PF(J,1)��(�(0)�SS�500�1)#)��J�SN�PF(J,0)�0))��l)��J�0�9:PF(J,3)�30��(�(0)�9):PF(J,2)�8��(�(0)�6):�:TG�0:OS�SN�1�)�DR�DR�10�DF:�DR�0�DR�0�)DM�DM��(DR):DR�DR��(DR)�)�GD(7,1)��0��"YOU RAN OUT OF FUEL...":DM�SS�1:�I�1�1000:�,*�DM��SS��"��LOOTED BY PIRATES!":�I�0�6:GD(I,1)�0:�:CS�0:�2860u*&�N$:�"� 'E' EVADE 'C' CLOSE '0'..'9' TARGET":�" 'M' NUKE  'L' LASER"�*0�760:�2050�*:�SN��1�1930�*D�CY$;RC$;CD$;"�  TARGET       ";:��"##";TG;:�A$:�A$�""�1860�*N�A$�"L"�LP�0�PF(TG,0)�0��1970:�1790%+X�A$�"M"�MS�0�PF(TG,0)�0��2000:�1790G+b�A$�"E"�GD(7,1)�0��2040:�1790h+l�A$�"C"���(0)�.7�EV��3:�1790�+v��(A$)�47��(A$)�58�TG��(A$)�48:�1860�+��1860�+��0,2:�"�":�OS��SK���+��"��YOU DEFEATED THE PIRATE FLEET",�CS�CS�BT:�"AND COLLECTED ";:��"########";BT;:�" IN BOOTY!"3,��I�1�2000:�:�"�":�n,��3,1020,8:�1,970,8:PF(TG,0)�PF(TG,0)�(150�LP)�PF(TG,3)�,��PF(TG,0)��0��3,900,20:SN�SN�1:SK�SK�1�,���,��3,600,20:MS�MS�1:��(0)�100�PF(TG,3)��-��3,800,30:PF(TG,0)�PF(TG,0)��(�(0)�50)��(�(0)�50)+-��PF(TG,0)��0��3,950,20:SN�SN�1:SK�SK�11-��Y-�GD(7,1)�GD(7,1)�.1:EV��(�(0)�3�1):�v-�3072�PS,42:�2048�PS,127�-�J�9�0��1:�PF(J,0)��0�2180�-MV��(�(0)�3):�PF(J,3)�EV�MV��1�PF(J,3)�PF(J,3)�EV�MV�- �PF(J,3)�39�PF(J,0)�0:SN�SN�1:�2180&.*��(PS�40)�PF(J,2)��(0)�.3�PF(J,2)�PF(J,2)�1V.4��(PS�40)�PF(J,2)��(0)�.3�PF(J,2)�PF(J,2)�1�.>�J�0��3072�PF(0,2)�40�PF(0,3),65:�2048�PF(0,2)�40�PF(0,3),127:�2140�.H�3072�PF(J,2)�40�PF(J,3)�40,J�48:�2048�PF(J,2)�40�PF(J,3)�40,113 /R�3072�PF(J,2)�40�PF(J,3),87:�2048�PF(J,2)�40�PF(J,3),127:/\��(0)�PF(J,3)�40�2180j/f�3,1020�10�J,5:DX�(PF(J,1)�400)�(PF(J,3)�2)�/pDR�DR�DX:��(0)�DX�(SS�DM�DX)�DF�0��3,1020,10:�3,990,15:DF�DF�1�/z��(0)�DX�(SS�DM�DX)�LP�0��3,1000,10:�3,900,10:LP�LP�1�/��J�/�EV�0:�0�TP(0)�20��(P(L,5))30�TP(1)�2000�(5�P(L,4)�P(L,5)�5)V0�TP(2)�40000�(10�P(L,4)�P(L,3))�0�TP(3)�(12000��(�(0)�2000))��(10�P(L,4))�0�TP(4)�100000��(4�P(L,4))�0�TP(5)�100000��(P(L,5)�2)�0�TP(6)�15000�P(L,3)�(5�P(L,4))�0�TP(7)�100��(2�P(L,4))1�TP(8)�500�P(L,4)�22K1��I�0�7:��(0)�.4�TP(I)�TP(I)��(0)�(TP(I)�(7�L�2)):�2310o1�TP(I)�TP(I)��(0)�TP(I)�(10�2�L)�1	�:IX��(�(0)�7):��(�(0)�10)��L��(0)�50�(SD�10)�IX��1:��1	NS�(�(0)�P(L,3)�8)�4:G$�"SHORTAGE":��(0)�.5�G$�"GLUT":NS�4�NS#2	�"��THERE HAS BEEN A ";G$;" OF ";�(T$(IX),8);"."[2$	�"PRICES ARE �";:��"##.##";NS;:�"� TIMES NORMAL!!!"~2.	�I�1�2500:�:TP(IX)�TP(IX)�NS:��28	DN$�""�2B	�"":�I�0�6:�"";DN$;:� �"########";GD(I,0)�2L	�"";RC$;DN$;:� �"########";GD(I,1)3V	DN$�DN$�"":�:� 3`	�CY$;NL$;3j	�CY$;"�   BORROWING ";N3t	�N:��(N)�B�N�Bw3~	CS�CS��(N):CR�CR��(N):B�B��(N):�2460�3�	�CY$;NL$�3�	��3�	�CY$;"    CASH   $ ";:� �"##############.##";CS�3�	�CY$;"    CREDIT $ ";:� �"##############.##";CR:�4�	�CY$;NL$$4�	�CY$;"�   DEPOSITING ";94�	�N:��(N)�CS�N�CSb4�	CS�CS��(N):CR�CR��(N):B�B��(N):�2460o4�	�CY$;NL$u4�	��4�	��(0)�P(L,4)�40���4�	��(0)�.2�2620�4
CT�P(L,4)�100�1000��(0)��(0)�(CS�1000)�CS�1000�4

�CT�CS��5
�"�YOU HAVE BEEN OFFERED A BIGGER SPACE-"65
�"SHIP FROM A COMPANY ON ";PL$(L)c5(
�"IT COSTS ";:��"########";CT;:�" CR.";�52
�" WITH A TRADE-IN.":�2820:SS�SS�100:��5<
��(0)�.25�2680�5F
CT�160�(25�P(L,4))��(0)�(CS�1000)�CS�1000�5P
�CT�CS��6Z
�"�THERE IS A NEW LASER POD FOR SALE HERE."C6d
�"IT COSTS A MERE ";:��"########";CT;:�" CR."W6n
�2820:LP�LP�1:�j6x
��(0)�.15�2740�6�
CT�200�(25�P(L,4))��(0)�(CS�800)�CS�800�6�
�CT�CS���6�
�"�THERE IS A DEFLECTOR SHIELD AVAILABLE"7�
�"COSTING JUST ";:��"########";CT;:�" CR."7�
�2820:DF�DF�1:�d7�
CT�70�(25�P(L,4))��(0)�(CS�1000)�CS�1000:N��(�(0)�P(L,4)�2�P(L,4)�3�1)|7�
�CT�N�CS�N��(CS�CT)�7�
�N�0���7�
�"�";N;" NUCLEAR MISSILES ARE OFFERED."�7�
�"TOTAL COST IS";:��"########";CT�N;:�" CR."8�
�"HOW MANY DO YOU WISH TO BUY";NM:�NM�0�NM�0*8�
�NM�N�NM�NE8�
MS�MS�NM:CS�CS�NM�CT:�t8�"ARE YOU WILLING TO MAKE THE PURCHASE ?"�8�A$:�A$��"Y"�A$��"N"�2830�8�A$�"Y"�CS�CS�CT�8"�"�":��8,�"        CASH POSESSED ";CS:�"        BANK BALANCE ";CR;"96�"�        GOODS POSESSED"L9@�I�0�6:�"        ";T$(I);":�";GD(I,0)�GD(I,1):�
9PJ@n$."..              star trader":s$."bolt bin  ":.8@EPT@.".";n$:."Q             please wait..."@.P.@rc$."]]]]]]]]]]]]]]]]]]]]"@.P(@nl$."                                       "@.P2@cy$."SQQQQQQQQQQQQQ":l$."..................":cd$."QQQQQQQQQQ"@)Q<@l1$."......................................"@.Qf@lp.0:ms.0:df.0:.w%(9,1):.p(9,6):.pl$(9):ss.100:l.0@.Qp@.pf(9,3):.gd(8,1):.tp(8)@.Qz@..x(d)..(.(0).d.8.d.3)@.QD@..ds(d)..(.(.(p(d,0).p(l,0)).2..(p(d,1).p(l,1)).2..(p(d,2).p(l,2)).2))@.QN@.@9RX@.sirius,procyon,wesen,altair,deneb,dubhe,vega,capella,castor,pollux,antares@MR.@.zosma,rigel,megrez,mintaka,saiph,kochab,phaeda@.R.@.etamin,eridane,wolf,hamal,ariadne@.R.@.i.1.9:..(0)..333..pl$(i):.d$:.180@.R.@..(0)..333..d$:.pl$(i):.180@.R.@.d$:.pl$(i)@VS.@p(i,0)..x(i):p(i,1)..x(i):p(i,2)..x(i)@?S.@p(i,3).91.10.i..(.(0).15)..(.(0).15)@.S.@p(i,4).21.2.i..(.(0).3):p(i,5)..(2000.(p(i,3).p(i,4)).1)@.S.@p(i,6)..ds(i)@.S.@.i:pl$(0)."sol":p(0,3).110..(.(0).20):p(0,4).20:p(0,5).1@.S.@.t$(9):t$(0).".0:food    ":t$(1).".1:metals  "@VT.@t$(6).".6:gems    "@bT.@t$(2).".2:weapons ":t$(3).".3:cyborgs "@NTDAt$(4).".4:uranium ":t$(5).".5:drugs   "@.TNAt$(7).".7:fuel    ":t$(8).".8:repairs "@.TXA.0,2:.4,2@.T"A.".      welcome to star trader!"@.T,A."Q      enter name of your ship";s$:."."@gU6Agd(7,1).10:cs.5000:cr..5000:sd.5..(.(0).200).100:.2200:.690:b.2.cs.500@zU@A.a$:.a$."".320@JUjA.a$."q".530@.UtA.a$."i"..690:.320@.U.A.a$."m"..870:.320@.UHA.a$."j"..990:.320@.URA.a$."b".l.0.b.0..2400:.320@.U.A.a$."d".l.0.cs.0..2480:.320@BV.A.a$."t"..1270:.320@£V.A.a$."u".l.0..570:.320@6V.A.a$."l".l.0..630:.320@hV.A..(a$).13.320@.V.A.n$;"SQQ£          valid commands are :":."Q 'i'  cargo and ship status"@.V.A."Q 'j'  hyper jump chart":."Q 't'  trade table"@.V.A."Q 'm'  system library"@BW.A."Q 'q'  to quit game"@)W.A."Q 'u'  unload ship to warehouse"@pW.A."Q 'l'  load ship from warehouse"@TW.A."Q 'b'  borrow cash from bank"@.W.A."Q 'd'  deposit cash in bank"@.W.A.a$:.a$."".510@.WHB.330@.WRB."QQQ   quitting: are you sure ?";@.W£B.a$:.a$."".540@.W&B.a$."y".2860@LX0B.690:.320@)X:Bin..1:i$."":."S";cy$;nl$@bXdB.cy$;". unloading ";@.XnB.1620:.in.6..1,200,5:.590@.XxB..(t$(in),8);:.n:..(n).gd(in,1).n.0..1,200,5:.570@.XBBgd(in,0).gd(in,0)..(n):gd(in,1).gd(in,1)..(n)@.XLB.cy$;nl$:.2360:.850:.@.XVBin..1:i$."":.cy$;nl$@RY.B.cy$;". loading ";@0Y.B.1620:.in.6..1,200,5:.650@FY.B..(t$(in),8);:.n:..(n).gd(in,0).n.0..1,200,5:.630@.Y.Bgd(in,1).gd(in,1)..(n):gd(in,0).gd(in,0)..(n)@.Y.B.cy$;nl$:.2360:.850:.@.Y.B.n$:.".";l$;"..";l$;".";@@Z.B.".  warehouse (sol) ..                  .";@WZ.B."SQQ]]]]]";rc$;s$@0Z.B.".";l$;"..";l$;".";@CZ.B.i.0.6:.t$(i);"        .";t$(i);"        .";:.@.Z.B."..";l$;"..";l$;".":."QQQ"@.Z.B.2360:.840:.2460:.850@.Z.B.cy$;"QQQQQ.       ship data for ";s$@.ZBC."Q.  tonnage   .";:.."#######";ss;@T[LC.".   damage    .";:.."#####";dm@q[VC.".]]]]]]]]]]]]]]]]]]]]]]fuel    .";:.."#####.#";gd(7,1)@Z[ C.:.".  laser pods  .";:.."#####";lp;@.[*C.".   deflectors.";:.."#####";df@.[4C.".  missiles  .";:.."#######";ms;@.[>C.@C£hC.cy$;".  ";pl$(l);" stardate ";:.."#####.##";sd;:.@c£rCcc.ss:.i.0.6:cc.cc.gd(i,1):.:cc.cc..(gd(7,1)).10.(lp.df).ms@W££C.cy$;".QQQQQQQQ]]cargo cap..";:.."#######";cc:.@.£FC.n$:.:."system","popl.    tech.    agriculture":.@.£PC.i.0.9:.:.l.i.."*";@.£ZC.pl$(i),p(i,3),p(i,4),p(i,5):.@.£.C.@.£.C.n$:l1.l@(].C."Q.       destination system £";pl$(l1)@r].C.i.0.4:."Q.";.(i.48);":.";:.i.l.."R";@M].C.pl$(i);"..";,p(i,6),;@.].C.".";.(i.53);":.";:.i.5.l.."R";@.].C.pl$(i.5);"..";,p(i.5,6):.i@.].C."QQ.  '0'..'9' to select destination":."       then return to launch."@C..C.@#..C.cc.0.gd(7,1)..0..1,200,5:.@,..C.910@@..C.a$:.a$."".1010@p..C.a$."q".530@O.FD.l1.l..(a$).13..690:.840:.@..PD..(a$)..13.1110@..ZDk.p(l1,6):l.l1:.z.1.k:.1140:sd.sd..01:.cr.0.cr.cr.cr.500@..$D.cr.0.cr.cr.cr.150@...D.z@J.8D.i.0.9:p(i,6)..ds(i):.:.2200:.1,1000,10@u.bD..(0).cr.cr.1000000.50000.sd.."..   your ship was reposessed...":.2860@Q.lDb.2.cs.500:.2540:.690:.@..vD..(a$).48..(a$).57.1010@...Dl1..(a$):."£SQQ]]]]]";rc$;"          .........";pl$(l1);@..JD.1010@..TDgd(7,1).gd(7,1).0.1@. .D.gd(7,1).0..".£   you ran out of fuel in mid-flight...":.2860@> .D..(0)..06..@p .D..(0)..3.1220@P .Ddm.dm..(.(0).5.1):.3,400,20@. .D.cy$;"QQQQQQ    .space debris!!.":.j.1.400:.j@. .D.dm..ss..".QQQ.your ship was destroyed by a meteor":.2860@. .D.@. .D..(0)..1.1250@$!.Dgd(7,1).gd(7,1)..(.(0).10).1:.3,1000,20@v!.D.cy$;"QQQQQQQQ    .mis-jump!!.":.j.1.400:.j:.@J!.D..(0).l.2.120..@V!.D.1710:.@.!.D.n$:."Q.           trade prices for ";pl$(l)@.!@E."........................................"@H"JE.". item     .    price  .         owned .";@Y"TE.".";l1$;"."@=".E.i.0.6:..(t$(i),3);:.ix.i.."R";@J"(E..(t$(i),8);"..";:. ."#######.##";tp(i);@."2E." .               .":.@."<E.".";l1$;"."@."fE.t$(7);".";:.."#######.##";tp(7);:." .               .";@."pE.".";l1$;"."@##zE.t$(8);".";:. ."#######.##";tp(8);:." .               .";@s#DE."........................................"@.#NE."'b'-buy  's'-sell  'q'-quit  'r'-repair":dn$."":.1650@.#XEin..1:i$."":gd(8,1).0@.#.E.cy$;cd$;nl$@.#.E.a$:.a$."".1420@.#.E.a$."q"..690:.@.#.E.a$.."r".1480@ $.E.cy$;cd$;".  repairs ";dm;:.n:.n.dm.n.dm@a$.E..(n).tp(8).cs.n..(cs.tp(8))@M$.Edm.dm..(n):cs.cs..(n).tp(8):.1650:.1410@.$.E.a$.."b".1560@.$.E.cy$;cd$;".  buying ";@.$.E.in.0..1620@.$.E..(i$,8);"(";@.$.E. ."######";.(cs.tp(in));:.")";@.$.E."           ...........";@%%DF.n:.tp(in)..(n).cs.n..(cs.tp(in))@A%NFcs.cs.tp(in)..(n):gd(in,1).gd(in,1).n:.1650:in..1:.1410@.%XF.a$.."s"..1,200,5:.1410@.%"F.cy$;cd$;".  selling ";:.in..0.."]]]]]]]]";:.1590@.%,F.1620:..(i$,8);:.in.7..1,200,5:in..1:.1410@O&6F."                  ..................";@0&@F.n:..(n).gd(in,1).n.gd(in,1)@L&jFcs.cs.tp(in)..(n):gd(in,1).gd(in,1).n:.1650:in..1:.1410@.&tF.a$:.a$."".1620@.&.F..(a$)..48..(a$)..55.in..(a$).48:i$.t$(in):.@.&HF.1,200,5:.1620@.&RF.850:.cy$;"£QQQQQQQ  cash            ............";@X'.F.. "$###########.##";cs@j'.Fdn$."":.i.0.6:."S.QQQQQQ]]]]]]]]]]]";dn$;rc$;@.'.F. ."########";gd(i,1):dn$.dn$."Q":.:dn$.dn$."QQQQQQQ"@.'.F."S.]]]]]]]]]]]]";dn$;rc$;:.."#####.#";gd(7,1):@.'.F."S.QQ]]]]]]]]]]]]]";dn$;rc$;:.."######";dm:.@U(.F.".":.1,8:.0,2,4:dr.0:ps.480:sk.0:os.0@£(.Fsn.0:bt.500:.i.1..(ss.100):sn.sn..(.(0).2):bt.bt.500..(.(0).600):.@.(.Fpf(0,0).ss..(.(0).ss.100.2).100:.sn.9.pf(0,0).pf(0,0).(sn.9).100:sn.9@.(.Fpf(0,1)..(.(0).ss.100.2)..(.(0).l.2)@O).F.j.1.9:pf(j,0)..(.(0).ss.10.ss.10):pf(j,1)..(.(0).ss.500.1)@#).F.j.sn.pf(j,0).0@)).F.@L).F.j.0.9:pf(j,3).30..(.(0).9):pf(j,2).8..(.(0).6):.:tg.0:os.sn.1@.).Fdr.dr.10.df:.dr.0.dr.0@.)HGdm.dm..(dr):dr.dr..(dr)@.)RG.gd(7,1)..0.."SEQQyou ran out of fuel...":dm.ss.1:.i.1.1000:.@,*£G.dm..ss.."..]]]]]looted by pirates!":.i.0.6:gd(i,1).0:.:cs.0:.2860@U*&G.n$:.". 'e' evade 'c' close '0'..'9' target":." 'm' nuke  'l' laser"@.*0G.760:.2050@.*:G.sn..1.1930@.*dG.cy$;rc$;cd$;"Q.  target       ";:.."##";tg;:.a$:.a$."".1860@.*nG.a$."l".lp.0.pf(tg,0).0..1970:.1790@%+xG.a$."m".ms.0.pf(tg,0).0..2000:.1790@g+BG.a$."e".gd(7,1).0..2040:.1790@H+LG.a$."c"...(0)..7.ev..3:.1790@.+VG..(a$).47..(a$).58.tg..(a$).48:.1860@.+.G.1860@.+.G.0,2:.".":.os..sk..@.+.G.".QQ.you defeated the pirate fleet"@£,.Gcs.cs.bt:."Qand collected ";:.."########";bt;:." in booty!"@3,.G.i.1.2000:.:.".":.@N,.G.3,1020,8:.1,970,8:pf(tg,0).pf(tg,0).(150.lp).pf(tg,3)@.,.G.pf(tg,0)..0..3,900,20:sn.sn.1:sk.sk.1@.,.G.@.,.G.3,600,20:ms.ms.1:..(0).100.pf(tg,3)..@@-.G.3,800,30:pf(tg,0).pf(tg,0)..(.(0).50)..(.(0).50)@+-.G.pf(tg,0)..0..3,950,20:sn.sn.1:sk.sk.1@1-.G.@y-.Ggd(7,1).gd(7,1)..1:ev..(.(0).3.1):.@V-BH.3072.ps,42:.2048.ps,127@.-LH.j.9.0..1:.pf(j,0)..0.2180@.-VHmv..(.(0).3):.pf(j,3).ev.mv..1.pf(j,3).pf(j,3).ev.mv@.- H.pf(j,3).39.pf(j,0).0:sn.sn.1:.2180@&.*H..(ps.40).pf(j,2)..(0)..3.pf(j,2).pf(j,2).1@v.4H..(ps.40).pf(j,2)..(0)..3.pf(j,2).pf(j,2).1@..>H.j.0..3072.pf(0,2).40.pf(0,3),65:.2048.pf(0,2).40.pf(0,3),127:.2140@..hH.3072.pf(j,2).40.pf(j,3).40,j.48:.2048.pf(j,2).40.pf(j,3).40,113@ /rH.3072.pf(j,2).40.pf(j,3),87:.2048.pf(j,2).40.pf(j,3),127@:/£H..(0).pf(j,3).40.2180@J/FH.3,1020.10.j,5:dx.(pf(j,1).400).(pf(j,3).2)@./PHdr.dr.dx:..(0).dx.(ss.dm.dx).df.0..3,1020,10:.3,990,15:df.df.1@./ZH..(0).dx.(ss.dm.dx).lp.0..3,1000,10:.3,900,10:lp.lp.1@./.H.j@./.Hev.0:.@P0.Htp(0).20..(p(l,5))@30.Htp(1).2000.(5.p(l,4).p(l,5).5)@v0.Htp(2).40000.(10.p(l,4).p(l,3))@.0.Htp(3).(12000..(.(0).2000))..(10.p(l,4))@.0.Htp(4).100000..(4.p(l,4))@.0.Htp(5).100000..(p(l,5).2)@.0.Htp(6).15000.p(l,3).(5.p(l,4))@.0.Htp(7).100..(2.p(l,4))@P1.Htp(8).500.p(l,4).22@k1.H.i.0.7:..(0)..4.tp(i).tp(i)..(0).(tp(i).(7.l.2)):.2310@O1.Htp(i).tp(i)..(0).tp(i).(10.2.l)@.1FI.:ix..(.(0).7):..(.(0).10)..l..(0).50.(sd.10).ix..1:.@.1PIns.(.(0).p(l,3).8).4:g$."shortage":..(0)..5.g$."glut":ns.4.ns@#2ZI.".QQQ.there has been a ";g$;" of ";.(t$(ix),8);"."@[2$I."prices are .";:.."##.##";ns;:.". times normal!!!"@.2.I.i.1.2500:.:tp(ix).tp(ix).ns:.@.28Idn$.""@.2bI.".":.i.0.6:."SQQQQ]]]]]]]]]]]";dn$;:. ."########";gd(i,0)@.2lI."SQQQQ]]]]]]]]]]]";rc$;dn$;:. ."########";gd(i,1)@S3vIdn$.dn$."Q":.:.@ 3.I.cy$;nl$@;3JI.cy$;".   borrowing ";@n3TI.n:..(n).b.n.b@W3.Ics.cs..(n):cr.cr..(n):b.b..(n):.2460@.3.I.cy$;nl$@.3.I.@.3.I.cy$;"£QQ    cash   $ ";:. ."##############.##";cs@.3.I.cy$;"£QQQ    credit $ ";:. ."##############.##";cr:.@H4.I.cy$;nl$@$4.I.cy$;".   depositing ";@94.I.n:..(n).cs.n.cs@B4.Ics.cs..(n):cr.cr..(n):b.b..(n):.2460@O4.I.cy$;nl$@U4.I.@.4.I..(0).p(l,4).40..@.4.I..(0)..2.2620@.4@Jct.p(l,4).100.1000..(0)..(0).(cs.1000).cs.1000@.4JJ.ct.cs..@O5TJ.".QQQ.you have been offered a bigger space-"@65.J."Qship from a company on ";pl$(l)@C5(J."Qit costs ";:.."########";ct;:." cr.";@.52J." with a trade-in.":.2820:ss.ss.100:.@.5<J..(0)..25.2680@.5fJct.160.(25.p(l,4))..(0).(cs.1000).cs.1000@.5pJ.ct.cs..@P6zJ.".QQQ.there is a new laser pod for sale here."@c6DJ."Qit costs a mere ";:.."########";ct;:." cr."@w6NJ.2820:lp.lp.1:.@J6XJ..(0)..15.2740@.6.Jct.200.(25.p(l,4))..(0).(cs.800).cs.800@.6.J.ct.cs..@.6.J.".QQQ£there is a deflector shield available"@E7.J."Qcosting just ";:.."########";ct;:." cr."@Y7.J.2820:df.df.1:.@D7.Jct.70.(25.p(l,4))..(0).(cs.1000).cs.1000:n..(.(0).p(l,4).2.p(l,4).3.1)@.7.J.ct.n.cs.n..(cs.ct)@.7.J.n.0..@.7.J.".QQQ";n;"£ nuclear missiles are offered."@.7.J."Qtotal cost is";:.."########";ct.n;:." cr."@[8.J."Qhow many do you wish to buy";nm:.nm.0.nm.0@*8.J.nm.n.nm.n@e8.Jms.ms.nm:cs.cs.nm.ct:.@T8DK."Qare you willing to make the purchase ?"@.8NK.a$:.a$.."y".a$.."n".2830@.8XK.a$."y".cs.cs.ct@.8"K.".":.@.8,K."£QQ        cash posessed ";cs:."Q        bank balance ";cr;"@W96K.".QQ        goods posessedQ"@l9@K.i.0.6:.".        ";t$(i);":.";gd(i,0).gd(i,1):.@@@
00000000  39 10 0a 00 4e 24 b2 22  93 90 20 20 20 20 20 20  |9...N$."..      |
00000010  20 20 20 20 20 20 20 20  53 54 41 52 20 54 52 41  |        STAR TRA|
00000020  44 45 52 22 3a 53 24 b2  22 42 4f 4c 54 20 42 49  |DER":S$."BOLT BI|
00000030  4e 20 20 22 3a db 38 00  65 10 14 00 99 22 90 22  |N  ":.8.e...."."|
00000040  3b 4e 24 3a 99 22 11 20  20 20 20 20 20 20 20 20  |;N$:.".         |
00000050  20 20 20 20 50 4c 45 41  53 45 20 57 41 49 54 2e  |    PLEASE WAIT.|
00000060  2e 2e 22 00 84 10 1e 00  52 43 24 b2 22 1d 1d 1d  |..".....RC$."...|
00000070  1d 1d 1d 1d 1d 1d 1d 1d  1d 1d 1d 1d 1d 1d 1d 1d  |................|
00000080  1d 22 00 b6 10 28 00 4e  4c 24 b2 22 20 20 20 20  |."...(.NL$."    |
00000090  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
000000b0  20 20 20 22 00 f8 10 32  00 43 59 24 b2 22 13 11  |   "...2.CY$."..|
000000c0  11 11 11 11 11 11 11 11  11 11 11 11 22 3a 4c 24  |............":L$|
000000d0  b2 22 c3 c3 c3 c3 c3 c3  c3 c3 c3 c3 c3 c3 c3 c3  |."..............|
000000e0  c3 c3 c3 c3 22 3a 43 44  24 b2 22 11 11 11 11 11  |....":CD$.".....|
000000f0  11 11 11 11 11 22 00 29  11 3c 00 4c 31 24 b2 22  |.....".).<.L1$."|
00000100  c3 c3 c3 c3 c3 c3 c3 c3  c3 c3 db c3 c3 c3 c3 c3  |................|
00000110  c3 c3 c3 c3 c3 c3 db c3  c3 c3 c3 c3 c3 c3 c3 c3  |................|
00000120  c3 c3 c3 c3 c3 c3 22 00  60 11 46 00 4c 50 b2 30  |......".`.F.LP.0|
00000130  3a 4d 53 b2 30 3a 44 46  b2 30 3a 86 57 25 28 39  |:MS.0:DF.0:.W%(9|
00000140  2c 31 29 3a 86 50 28 39  2c 36 29 3a 86 50 4c 24  |,1):.P(9,6):.PL$|
00000150  28 39 29 3a 53 53 b2 31  30 30 3a 4c b2 30 00 7d  |(9):SS.100:L.0.}|
00000160  11 50 00 86 50 46 28 39  2c 33 29 3a 86 47 44 28  |.P..PF(9,3):.GD(|
00000170  38 2c 31 29 3a 86 54 50  28 38 29 00 98 11 5a 00  |8,1):.TP(8)...Z.|
00000180  96 a5 58 28 44 29 b2 b5  28 bb 28 30 29 ac 44 ac  |..X(D)..(.(0).D.|
00000190  38 ab 44 ac 33 29 00 e3  11 64 00 96 a5 44 53 28  |8.D.3)...d...DS(|
000001a0  44 29 b2 b5 28 ba 28 b6  28 50 28 44 2c 30 29 ab  |D)..(.(.(P(D,0).|
000001b0  50 28 4c 2c 30 29 29 ae  32 aa b6 28 50 28 44 2c  |P(L,0)).2..(P(D,|
000001c0  31 29 ab 50 28 4c 2c 31  29 29 ae 32 aa b6 28 50  |1).P(L,1)).2..(P|
000001d0  28 44 2c 32 29 ab 50 28  4c 2c 32 29 29 ae 32 29  |(D,2).P(L,2)).2)|
000001e0  29 00 e9 11 6e 00 8c 00  39 12 78 00 83 53 49 52  |)...n...9.x..SIR|
000001f0  49 55 53 2c 50 52 4f 43  59 4f 4e 2c 57 45 53 45  |IUS,PROCYON,WESE|
00000200  4e 2c 41 4c 54 41 49 52  2c 44 45 4e 45 42 2c 44  |N,ALTAIR,DENEB,D|
00000210  55 42 48 45 2c 56 45 47  41 2c 43 41 50 45 4c 4c  |UBHE,VEGA,CAPELL|
00000220  41 2c 43 41 53 54 4f 52  2c 50 4f 4c 4c 55 58 2c  |A,CASTOR,POLLUX,|
00000230  41 4e 54 41 52 45 53 00  6d 12 82 00 83 5a 4f 53  |ANTARES.m....ZOS|
00000240  4d 41 2c 52 49 47 45 4c  2c 4d 45 47 52 45 5a 2c  |MA,RIGEL,MEGREZ,|
00000250  4d 49 4e 54 41 4b 41 2c  53 41 49 50 48 2c 4b 4f  |MINTAKA,SAIPH,KO|
00000260  43 48 41 42 2c 50 48 41  45 44 41 00 94 12 8c 00  |CHAB,PHAEDA.....|
00000270  83 45 54 41 4d 49 4e 2c  45 52 49 44 41 4e 45 2c  |.ETAMIN,ERIDANE,|
00000280  57 4f 4c 46 2c 48 41 4d  41 4c 2c 41 52 49 41 44  |WOLF,HAMAL,ARIAD|
00000290  4e 45 00 bb 12 96 00 81  49 b2 31 a4 39 3a 8b bb  |NE......I.1.9:..|
000002a0  28 30 29 b3 2e 33 33 33  a7 87 50 4c 24 28 49 29  |(0)..333..PL$(I)|
000002b0  3a 87 44 24 3a 89 31 38  30 00 db 12 a0 00 8b bb  |:.D$:.180.......|
000002c0  28 30 29 b3 2e 33 33 33  a7 87 44 24 3a 87 50 4c  |(0)..333..D$:.PL|
000002d0  24 28 49 29 3a 89 31 38  30 00 eb 12 aa 00 87 44  |$(I):.180......D|
000002e0  24 3a 87 50 4c 24 28 49  29 00 16 13 b4 00 50 28  |$:.PL$(I).....P(|
000002f0  49 2c 30 29 b2 a5 58 28  49 29 3a 50 28 49 2c 31  |I,0)..X(I):P(I,1|
00000300  29 b2 a5 58 28 49 29 3a  50 28 49 2c 32 29 b2 a5  |)..X(I):P(I,2)..|
00000310  58 28 49 29 00 3f 13 be  00 50 28 49 2c 33 29 b2  |X(I).?...P(I,3).|
00000320  39 31 ab 31 30 ac 49 aa  b5 28 bb 28 30 29 ac 31  |91.10.I..(.(0).1|
00000330  35 29 aa b5 28 bb 28 30  29 ac 31 35 29 00 7c 13  |5)..(.(0).15).|.|
00000340  c8 00 50 28 49 2c 34 29  b2 32 31 ab 32 ac 49 ab  |..P(I,4).21.2.I.|
00000350  b5 28 bb 28 30 29 ac 33  29 3a 50 28 49 2c 35 29  |.(.(0).3):P(I,5)|
00000360  b2 b5 28 32 30 30 30 ad  28 50 28 49 2c 33 29 ac  |..(2000.(P(I,3).|
00000370  50 28 49 2c 34 29 29 aa  31 29 00 8e 13 d2 00 50  |P(I,4)).1).....P|
00000380  28 49 2c 36 29 b2 a5 44  53 28 49 29 00 cb 13 dc  |(I,6)..DS(I)....|
00000390  00 82 49 3a 50 4c 24 28  30 29 b2 22 53 4f 4c 22  |..I:PL$(0)."SOL"|
000003a0  3a 50 28 30 2c 33 29 b2  31 31 30 aa b5 28 bb 28  |:P(0,3).110..(.(|
000003b0  30 29 ac 32 30 29 3a 50  28 30 2c 34 29 b2 32 30  |0).20):P(0,4).20|
000003c0  3a 50 28 30 2c 35 29 b2  31 00 fe 13 e6 00 86 54  |:P(0,5).1......T|
000003d0  24 28 39 29 3a 54 24 28  30 29 b2 22 c2 30 3a 46  |$(9):T$(0).".0:F|
000003e0  4f 4f 44 20 20 20 20 22  3a 54 24 28 31 29 b2 22  |OOD    ":T$(1)."|
000003f0  c2 31 3a 4d 45 54 41 4c  53 20 20 22 00 16 14 f0  |.1:METALS  "....|
00000400  00 54 24 28 36 29 b2 22  c2 36 3a 47 45 4d 53 20  |.T$(6).".6:GEMS |
00000410  20 20 20 22 00 42 14 fa  00 54 24 28 32 29 b2 22  |   ".B...T$(2)."|
00000420  c2 32 3a 57 45 41 50 4f  4e 53 20 22 3a 54 24 28  |.2:WEAPONS ":T$(|
00000430  33 29 b2 22 c2 33 3a 43  59 42 4f 52 47 53 20 22  |3).".3:CYBORGS "|
00000440  00 6e 14 04 01 54 24 28  34 29 b2 22 c2 34 3a 55  |.n...T$(4).".4:U|
00000450  52 41 4e 49 55 4d 20 22  3a 54 24 28 35 29 b2 22  |RANIUM ":T$(5)."|
00000460  c2 35 3a 44 52 55 47 53  20 20 20 22 00 9a 14 0e  |.5:DRUGS   "....|
00000470  01 54 24 28 37 29 b2 22  c2 37 3a 46 55 45 4c 20  |.T$(7).".7:FUEL |
00000480  20 20 20 22 3a 54 24 28  38 29 b2 22 c2 38 3a 52  |   ":T$(8).".8:R|
00000490  45 50 41 49 52 53 20 22  00 a8 14 18 01 e7 30 2c  |EPAIRS "......0,|
000004a0  32 3a e7 34 2c 32 00 ce  14 22 01 99 22 93 20 20  |2:.4,2..."..".  |
000004b0  20 20 20 20 57 45 4c 43  4f 4d 45 20 54 4f 20 53  |    WELCOME TO S|
000004c0  54 41 52 20 54 52 41 44  45 52 21 22 00 fc 14 2c  |TAR TRADER!"...,|
000004d0  01 85 22 11 20 20 20 20  20 20 45 4e 54 45 52 20  |..".      ENTER |
000004e0  4e 41 4d 45 20 4f 46 20  59 4f 55 52 20 53 48 49  |NAME OF YOUR SHI|
000004f0  50 22 3b 53 24 3a 99 22  93 22 00 47 15 36 01 47  |P";S$:.".".G.6.G|
00000500  44 28 37 2c 31 29 b2 31  30 3a 43 53 b2 35 30 30  |D(7,1).10:CS.500|
00000510  30 3a 43 52 b2 ab 35 30  30 30 3a 53 44 b2 35 aa  |0:CR..5000:SD.5.|
00000520  b5 28 bb 28 30 29 ac 32  30 30 29 ad 31 30 30 3a  |.(.(0).200).100:|
00000530  8d 32 32 30 30 3a 8d 36  39 30 3a 42 b2 32 ac 43  |.2200:.690:B.2.C|
00000540  53 aa 35 30 30 00 5a 15  40 01 a1 41 24 3a 8b 41  |S.500.Z.@..A$:.A|
00000550  24 b2 22 22 a7 33 32 30  00 6a 15 4a 01 8b 41 24  |$."".320.j.J..A$|
00000560  b2 22 51 22 a7 35 33 30  00 80 15 54 01 8b 41 24  |."Q".530...T..A$|
00000570  b2 22 49 22 a7 8d 36 39  30 3a 89 33 32 30 00 96  |."I"..690:.320..|
00000580  15 5e 01 8b 41 24 b2 22  4d 22 a7 8d 38 37 30 3a  |.^..A$."M"..870:|
00000590  89 33 32 30 00 ac 15 68  01 8b 41 24 b2 22 4a 22  |.320...h..A$."J"|
000005a0  a7 8d 39 39 30 3a 89 33  32 30 00 cb 15 72 01 8b  |..990:.320...r..|
000005b0  41 24 b2 22 42 22 af 4c  b2 30 af 42 b1 30 a7 8d  |A$."B".L.0.B.0..|
000005c0  32 34 30 30 3a 89 33 32  30 00 eb 15 7c 01 8b 41  |2400:.320...|..A|
000005d0  24 b2 22 44 22 af 4c b2  30 af 43 53 b1 30 a7 8d  |$."D".L.0.CS.0..|
000005e0  32 34 38 30 3a 89 33 32  30 00 02 16 86 01 8b 41  |2480:.320......A|
000005f0  24 b2 22 54 22 a7 8d 31  32 37 30 3a 89 33 32 30  |$."T"..1270:.320|
00000600  00 1c 16 90 01 8b 41 24  b2 22 55 22 af 4c b2 30  |......A$."U".L.0|
00000610  a7 8d 35 37 30 3a 89 33  32 30 00 36 16 9a 01 8b  |..570:.320.6....|
00000620  41 24 b2 22 4c 22 af 4c  b2 30 a7 8d 36 33 30 3a  |A$."L".L.0..630:|
00000630  89 33 32 30 00 48 16 a4  01 8b c6 28 41 24 29 b2  |.320.H.....(A$).|
00000640  31 33 a7 33 32 30 00 95  16 ae 01 99 4e 24 3b 22  |13.320......N$;"|
00000650  13 11 11 1c 20 20 20 20  20 20 20 20 20 20 56 41  |....          VA|
00000660  4c 49 44 20 43 4f 4d 4d  41 4e 44 53 20 41 52 45  |LID COMMANDS ARE|
00000670  20 3a 22 3a 99 22 11 20  27 49 27 20 20 43 41 52  | :":.". 'I'  CAR|
00000680  47 4f 20 41 4e 44 20 53  48 49 50 20 53 54 41 54  |GO AND SHIP STAT|
00000690  55 53 22 00 ca 16 b8 01  99 22 11 20 27 4a 27 20  |US"......". 'J' |
000006a0  20 48 59 50 45 52 20 4a  55 4d 50 20 43 48 41 52  | HYPER JUMP CHAR|
000006b0  54 22 3a 99 22 11 20 27  54 27 20 20 54 52 41 44  |T":.". 'T'  TRAD|
000006c0  45 20 54 41 42 4c 45 22  00 e7 16 c2 01 99 22 11  |E TABLE"......".|
000006d0  20 27 4d 27 20 20 53 59  53 54 45 4d 20 4c 49 42  | 'M'  SYSTEM LIB|
000006e0  52 41 52 59 22 00 02 17  cc 01 99 22 11 20 27 51  |RARY"......". 'Q|
000006f0  27 20 20 54 4f 20 51 55  49 54 20 47 41 4d 45 22  |'  TO QUIT GAME"|
00000700  00 29 17 d6 01 99 22 11  20 27 55 27 20 20 55 4e  |.)....". 'U'  UN|
00000710  4c 4f 41 44 20 53 48 49  50 20 54 4f 20 57 41 52  |LOAD SHIP TO WAR|
00000720  45 48 4f 55 53 45 22 00  50 17 e0 01 99 22 11 20  |EHOUSE".P....". |
00000730  27 4c 27 20 20 4c 4f 41  44 20 53 48 49 50 20 46  |'L'  LOAD SHIP F|
00000740  52 4f 4d 20 57 41 52 45  48 4f 55 53 45 22 00 74  |ROM WAREHOUSE".t|
00000750  17 ea 01 99 22 11 20 27  42 27 20 20 42 4f 52 52  |....". 'B'  BORR|
00000760  4f 57 20 43 41 53 48 20  46 52 4f 4d 20 42 41 4e  |OW CASH FROM BAN|
00000770  4b 22 00 97 17 f4 01 99  22 11 20 27 44 27 20 20  |K"......". 'D'  |
00000780  44 45 50 4f 53 49 54 20  43 41 53 48 20 49 4e 20  |DEPOSIT CASH IN |
00000790  42 41 4e 4b 22 00 aa 17  fe 01 a1 41 24 3a 8b 41  |BANK"......A$:.A|
000007a0  24 b2 22 22 a7 35 31 30  00 b3 17 08 02 89 33 33  |$."".510......33|
000007b0  30 00 da 17 12 02 99 22  11 11 11 20 20 20 51 55  |0......"...   QU|
000007c0  49 54 54 49 4e 47 3a 20  41 52 45 20 59 4f 55 20  |ITTING: ARE YOU |
000007d0  53 55 52 45 20 3f 22 3b  00 ed 17 1c 02 a1 41 24  |SURE ?";......A$|
000007e0  3a 8b 41 24 b2 22 22 a7  35 34 30 00 fe 17 26 02  |:.A$."".540...&.|
000007f0  8b 41 24 b2 22 59 22 a7  32 38 36 30 00 0c 18 30  |.A$."Y".2860...0|
00000800  02 8d 36 39 30 3a 89 33  32 30 00 29 18 3a 02 49  |..690:.320.).:.I|
00000810  4e b2 ab 31 3a 49 24 b2  22 22 3a 99 22 13 22 3b  |N..1:I$."":.".";|
00000820  43 59 24 3b 4e 4c 24 00  42 18 44 02 99 43 59 24  |CY$;NL$.B.D..CY$|
00000830  3b 22 96 20 55 4e 4c 4f  41 44 49 4e 47 20 22 3b  |;". UNLOADING ";|
00000840  00 60 18 4e 02 8d 31 36  32 30 3a 8b 49 4e b1 36  |.`.N..1620:.IN.6|
00000850  a7 da 31 2c 32 30 30 2c  35 3a 89 35 39 30 00 96  |..1,200,5:.590..|
00000860  18 58 02 99 c9 28 54 24  28 49 4e 29 2c 38 29 3b  |.X...(T$(IN),8);|
00000870  3a 85 4e 3a 8b b5 28 4e  29 b1 47 44 28 49 4e 2c  |:.N:..(N).GD(IN,|
00000880  31 29 b0 4e b3 30 a7 da  31 2c 32 30 30 2c 35 3a  |1).N.0..1,200,5:|
00000890  89 35 37 30 00 c8 18 62  02 47 44 28 49 4e 2c 30  |.570...b.GD(IN,0|
000008a0  29 b2 47 44 28 49 4e 2c  30 29 aa b5 28 4e 29 3a  |).GD(IN,0)..(N):|
000008b0  47 44 28 49 4e 2c 31 29  b2 47 44 28 49 4e 2c 31  |GD(IN,1).GD(IN,1|
000008c0  29 ab b5 28 4e 29 00 e2  18 6c 02 99 43 59 24 3b  |)..(N)...l..CY$;|
000008d0  4e 4c 24 3a 8d 32 33 36  30 3a 8d 38 35 30 3a 8e  |NL$:.2360:.850:.|
000008e0  00 fb 18 76 02 49 4e b2  ab 31 3a 49 24 b2 22 22  |...v.IN..1:I$.""|
000008f0  3a 99 43 59 24 3b 4e 4c  24 00 12 19 80 02 99 43  |:.CY$;NL$......C|
00000900  59 24 3b 22 96 20 4c 4f  41 44 49 4e 47 20 22 3b  |Y$;". LOADING ";|
00000910  00 30 19 8a 02 8d 31 36  32 30 3a 8b 49 4e b1 36  |.0....1620:.IN.6|
00000920  a7 da 31 2c 32 30 30 2c  35 3a 89 36 35 30 00 66  |..1,200,5:.650.f|
00000930  19 94 02 99 c9 28 54 24  28 49 4e 29 2c 38 29 3b  |.....(T$(IN),8);|
00000940  3a 85 4e 3a 8b b5 28 4e  29 b1 47 44 28 49 4e 2c  |:.N:..(N).GD(IN,|
00000950  30 29 b0 4e b3 30 a7 da  31 2c 32 30 30 2c 35 3a  |0).N.0..1,200,5:|
00000960  89 36 33 30 00 98 19 9e  02 47 44 28 49 4e 2c 31  |.630.....GD(IN,1|
00000970  29 b2 47 44 28 49 4e 2c  31 29 aa b5 28 4e 29 3a  |).GD(IN,1)..(N):|
00000980  47 44 28 49 4e 2c 30 29  b2 47 44 28 49 4e 2c 30  |GD(IN,0).GD(IN,0|
00000990  29 ab b5 28 4e 29 00 b2  19 a8 02 99 43 59 24 3b  |)..(N)......CY$;|
000009a0  4e 4c 24 3a 8d 32 33 36  30 3a 8d 38 35 30 3a 8e  |NL$:.2360:.850:.|
000009b0  00 cf 19 b2 02 99 4e 24  3a 99 22 d5 22 3b 4c 24  |......N$:.".";L$|
000009c0  3b 22 c9 d5 22 3b 4c 24  3b 22 c9 22 3b 00 00 1a  |;"..";L$;".";...|
000009d0  bc 02 99 22 dd 20 20 57  41 52 45 48 4f 55 53 45  |...".  WAREHOUSE|
000009e0  20 28 53 4f 4c 29 20 c2  c2 20 20 20 20 20 20 20  | (SOL) ..       |
000009f0  20 20 20 20 20 20 20 20  20 20 20 c2 22 3b 00 17  |           .";..|
00000a00  1a c6 02 99 22 13 11 11  1d 1d 1d 1d 1d 22 3b 52  |...."........";R|
00000a10  43 24 3b 53 24 00 30 1a  d0 02 99 22 ab 22 3b 4c  |C$;S$.0....".";L|
00000a20  24 3b 22 b3 ab 22 3b 4c  24 3b 22 b3 22 3b 00 63  |$;"..";L$;".";.c|
00000a30  1a da 02 81 49 b2 30 a4  36 3a 99 54 24 28 49 29  |....I.0.6:.T$(I)|
00000a40  3b 22 20 20 20 20 20 20  20 20 c2 22 3b 54 24 28  |;"        .";T$(|
00000a50  49 29 3b 22 20 20 20 20  20 20 20 20 c2 22 3b 3a  |I);"        .";:|
00000a60  82 00 83 1a e4 02 99 22  90 ca 22 3b 4c 24 3b 22  |......."..";L$;"|
00000a70  cb ca 22 3b 4c 24 3b 22  cb 22 3a 99 22 11 11 11  |..";L$;".":."...|
00000a80  22 00 9d 1a ee 02 8d 32  33 36 30 3a 8d 38 34 30  |"......2360:.840|
00000a90  3a 8d 32 34 36 30 3a 8d  38 35 30 00 c7 1a f8 02  |:.2460:.850.....|
00000aa0  99 43 59 24 3b 22 11 11  11 11 11 90 20 20 20 20  |.CY$;"......    |
00000ab0  20 20 20 53 48 49 50 20  44 41 54 41 20 46 4f 52  |   SHIP DATA FOR|
00000ac0  20 22 3b 53 24 00 ef 1a  02 03 99 22 11 9a 20 20  | ";S$......"..  |
00000ad0  54 4f 4e 4e 41 47 45 20  20 20 95 22 3b 3a 99 fb  |TONNAGE   .";:..|
00000ae0  22 23 23 23 23 23 23 23  22 3b 53 53 3b 00 14 1b  |"#######";SS;...|
00000af0  0c 03 99 22 9a 20 20 20  44 41 4d 41 47 45 20 20  |...".   DAMAGE  |
00000b00  20 20 95 22 3b 3a 99 fb  22 23 23 23 23 23 22 3b  |  .";:.."#####";|
00000b10  44 4d 00 51 1b 16 03 99  22 9a 1d 1d 1d 1d 1d 1d  |DM.Q....".......|
00000b20  1d 1d 1d 1d 1d 1d 1d 1d  1d 1d 1d 1d 1d 1d 1d 1d  |................|
00000b30  46 55 45 4c 20 20 20 20  95 22 3b 3a 99 fb 22 23  |FUEL    .";:.."#|
00000b40  23 23 23 23 2e 23 22 3b  47 44 28 37 2c 31 29 00  |####.#";GD(7,1).|
00000b50  7a 1b 20 03 99 3a 99 22  9a 20 20 4c 41 53 45 52  |z. ..:.".  LASER|
00000b60  20 50 4f 44 53 20 20 95  22 3b 3a 99 fb 22 23 23  | PODS  .";:.."##|
00000b70  23 23 23 22 3b 4c 50 3b  00 9f 1b 2a 03 99 22 9a  |###";LP;...*..".|
00000b80  20 20 20 44 45 46 4c 45  43 54 4f 52 53 95 22 3b  |   DEFLECTORS.";|
00000b90  3a 99 fb 22 23 23 23 23  23 22 3b 44 46 00 c6 1b  |:.."#####";DF...|
00000ba0  34 03 99 22 9a 20 20 4d  49 53 53 49 4c 45 53 20  |4..".  MISSILES |
00000bb0  20 95 22 3b 3a 99 fb 22  23 23 23 23 23 23 23 22  | .";:.."#######"|
00000bc0  3b 4d 53 3b 00 cc 1b 3e  03 8e 00 03 1c 48 03 99  |;MS;...>.....H..|
00000bd0  43 59 24 3b 22 1e 20 20  22 3b 50 4c 24 28 4c 29  |CY$;".  ";PL$(L)|
00000be0  3b 22 20 53 54 41 52 44  41 54 45 20 22 3b 3a 99  |;" STARDATE ";:.|
00000bf0  fb 22 23 23 23 23 23 2e  23 23 22 3b 53 44 3b 3a  |."#####.##";SD;:|
00000c00  8e 00 43 1c 52 03 43 43  b2 53 53 3a 81 49 b2 30  |..C.R.CC.SS:.I.0|
00000c10  a4 36 3a 43 43 b2 43 43  ab 47 44 28 49 2c 31 29  |.6:CC.CC.GD(I,1)|
00000c20  3a 82 3a 43 43 b2 43 43  ab b5 28 47 44 28 37 2c  |:.:CC.CC..(GD(7,|
00000c30  31 29 29 ab 31 30 ac 28  4c 50 aa 44 46 29 ab 4d  |1)).10.(LP.DF).M|
00000c40  53 00 77 1c 5c 03 99 43  59 24 3b 22 9a 11 11 11  |S.w.\..CY$;"....|
00000c50  11 11 11 11 11 1d 1d 43  41 52 47 4f 20 43 41 50  |.......CARGO CAP|
00000c60  2e 95 22 3b 3a 99 fb 22  23 23 23 23 23 23 23 22  |..";:.."#######"|
00000c70  3b 43 43 3a 8e 00 ad 1c  66 03 99 4e 24 3a 99 3a  |;CC:....f..N$:.:|
00000c80  99 22 53 59 53 54 45 4d  22 2c 22 50 4f 50 4c 2e  |."SYSTEM","POPL.|
00000c90  20 20 20 20 54 45 43 48  2e 20 20 20 20 41 47 52  |    TECH.    AGR|
00000ca0  49 43 55 4c 54 55 52 45  22 3a 99 00 c5 1c 70 03  |ICULTURE":....p.|
00000cb0  81 49 b2 30 a4 39 3a 99  3a 8b 4c b2 49 a7 99 22  |.I.0.9:.:.L.I.."|
00000cc0  2a 22 3b 00 e8 1c 7a 03  99 50 4c 24 28 49 29 2c  |*";...z..PL$(I),|
00000cd0  50 28 49 2c 33 29 2c 50  28 49 2c 34 29 2c 50 28  |P(I,3),P(I,4),P(|
00000ce0  49 2c 35 29 3a 82 00 ee  1c 84 03 8e 00 fb 1c 8e  |I,5):...........|
00000cf0  03 99 4e 24 3a 4c 31 b2  4c 00 28 1d 98 03 99 22  |..N$:L1.L.(...."|
00000d00  11 99 20 20 20 20 20 20  20 44 45 53 54 49 4e 41  |..       DESTINA|
00000d10  54 49 4f 4e 20 53 59 53  54 45 4d 20 1c 22 3b 50  |TION SYSTEM .";P|
00000d20  4c 24 28 4c 31 29 00 52  1d a2 03 81 49 b2 30 a4  |L$(L1).R....I.0.|
00000d30  34 3a 99 22 11 90 22 3b  c7 28 49 aa 34 38 29 3b  |4:."..";.(I.48);|
00000d40  22 3a 98 22 3b 3a 8b 49  b2 4c a7 99 22 12 22 3b  |":.";:.I.L..".";|
00000d50  00 6d 1d ac 03 99 50 4c  24 28 49 29 3b 22 92 1f  |.m....PL$(I);"..|
00000d60  22 3b 2c 50 28 49 2c 36  29 2c 3b 00 91 1d b6 03  |";,P(I,6),;.....|
00000d70  99 22 90 22 3b c7 28 49  aa 35 33 29 3b 22 3a 98  |.".";.(I.53);":.|
00000d80  22 3b 3a 8b 49 aa 35 b2  4c a7 99 22 12 22 3b 00  |";:.I.5.L..".";.|
00000d90  b1 1d c0 03 99 50 4c 24  28 49 aa 35 29 3b 22 92  |.....PL$(I.5);".|
00000da0  1f 22 3b 2c 50 28 49 aa  35 2c 36 29 3a 82 49 00  |.";,P(I.5,6):.I.|
00000db0  fd 1d ca 03 99 22 11 11  9a 20 20 27 30 27 2e 2e  |....."...  '0'..|
00000dc0  27 39 27 20 54 4f 20 53  45 4c 45 43 54 20 44 45  |'9' TO SELECT DE|
00000dd0  53 54 49 4e 41 54 49 4f  4e 22 3a 99 22 20 20 20  |STINATION":."   |
00000de0  20 20 20 20 54 48 45 4e  20 52 45 54 55 52 4e 20  |    THEN RETURN |
00000df0  54 4f 20 4c 41 55 4e 43  48 2e 22 00 03 1e d4 03  |TO LAUNCH.".....|
00000e00  8e 00 23 1e de 03 8b 43  43 b3 30 b0 47 44 28 37  |..#....CC.0.GD(7|
00000e10  2c 31 29 b3 b2 30 a7 da  31 2c 32 30 30 2c 35 3a  |,1)..0..1,200,5:|
00000e20  8e 00 2c 1e e8 03 8d 39  31 30 00 40 1e f2 03 a1  |..,....910.@....|
00000e30  41 24 3a 8b 41 24 b2 22  22 a7 31 30 31 30 00 50  |A$:.A$."".1010.P|
00000e40  1e fc 03 8b 41 24 b2 22  51 22 a7 35 33 30 00 6f  |....A$."Q".530.o|
00000e50  1e 06 04 8b 4c 31 b2 4c  af c6 28 41 24 29 b2 31  |....L1.L..(A$).1|
00000e60  33 a7 8d 36 39 30 3a 8d  38 34 30 3a 8e 00 83 1e  |3..690:.840:....|
00000e70  10 04 8b c6 28 41 24 29  b3 b1 31 33 a7 31 31 31  |....(A$)..13.111|
00000e80  30 00 c0 1e 1a 04 4b b2  50 28 4c 31 2c 36 29 3a  |0.....K.P(L1,6):|
00000e90  4c b2 4c 31 3a 81 5a b2  31 a4 4b 3a 8d 31 31 34  |L.L1:.Z.1.K:.114|
00000ea0  30 3a 53 44 b2 53 44 aa  2e 30 31 3a 8b 43 52 b1  |0:SD.SD..01:.CR.|
00000eb0  30 a7 43 52 b2 43 52 aa  43 52 ad 35 30 30 00 d7  |0.CR.CR.CR.500..|
00000ec0  1e 24 04 8b 43 52 b3 30  a7 43 52 b2 43 52 aa 43  |.$..CR.0.CR.CR.C|
00000ed0  52 ad 31 35 30 00 de 1e  2e 04 82 5a 00 0a 1f 38  |R.150......Z...8|
00000ee0  04 81 49 b2 30 a4 39 3a  50 28 49 2c 36 29 b2 a5  |..I.0.9:P(I,6)..|
00000ef0  44 53 28 49 29 3a 82 3a  8d 32 32 30 30 3a da 31  |DS(I):.:.2200:.1|
00000f00  2c 31 30 30 30 2c 31 30  00 55 1f 42 04 8b bb 28  |,1000,10.U.B...(|
00000f10  30 29 ac 43 52 ac 43 52  ad 31 30 30 30 30 30 30  |0).CR.CR.1000000|
00000f20  b1 35 30 30 30 30 ad 53  44 a7 99 22 93 90 20 20  |.50000.SD.."..  |
00000f30  20 59 4f 55 52 20 53 48  49 50 20 57 41 53 20 52  | YOUR SHIP WAS R|
00000f40  45 50 4f 53 45 53 53 45  44 2e 2e 2e 22 3a 89 32  |EPOSESSED...":.2|
00000f50  38 36 30 00 71 1f 4c 04  42 b2 32 ac 43 53 aa 35  |860.q.L.B.2.CS.5|
00000f60  30 30 3a 8d 32 35 34 30  3a 8d 36 39 30 3a 8e 00  |00:.2540:.690:..|
00000f70  8d 1f 56 04 8b c6 28 41  24 29 b3 34 38 b0 c6 28  |..V...(A$).48..(|
00000f80  41 24 29 b1 35 37 a7 31  30 31 30 00 ca 1f 60 04  |A$).57.1010...`.|
00000f90  4c 31 b2 c5 28 41 24 29  3a 99 22 1c 13 11 11 1d  |L1..(A$):.".....|
00000fa0  1d 1d 1d 1d 22 3b 52 43  24 3b 22 20 20 20 20 20  |....";RC$;"     |
00000fb0  20 20 20 20 20 9d 9d 9d  9d 9d 9d 9d 9d 9d 22 3b  |     .........";|
00000fc0  50 4c 24 28 4c 31 29 3b  00 d4 1f 6a 04 89 31 30  |PL$(L1);...j..10|
00000fd0  31 30 00 ec 1f 74 04 47  44 28 37 2c 31 29 b2 47  |10...t.GD(7,1).G|
00000fe0  44 28 37 2c 31 29 ab 30  2e 31 00 2e 20 7e 04 8b  |D(7,1).0.1.. ~..|
00000ff0  47 44 28 37 2c 31 29 b3  30 a7 99 22 93 1c 20 20  |GD(7,1).0.."..  |
00001000  20 59 4f 55 20 52 41 4e  20 4f 55 54 20 4f 46 20  | YOU RAN OUT OF |
00001010  46 55 45 4c 20 49 4e 20  4d 49 44 2d 46 4c 49 47  |FUEL IN MID-FLIG|
00001020  48 54 2e 2e 2e 22 3a 89  32 38 36 30 00 3e 20 88  |HT...":.2860.> .|
00001030  04 8b bb 28 30 29 b1 2e  30 36 a7 8e 00 50 20 92  |...(0)..06...P .|
00001040  04 8b bb 28 30 29 b1 2e  33 a7 31 32 32 30 00 70  |...(0)..3.1220.p|
00001050  20 9c 04 44 4d b2 44 4d  aa b5 28 bb 28 30 29 ac  | ..DM.DM..(.(0).|
00001060  35 aa 31 29 3a da 33 2c  34 30 30 2c 32 30 00 a2  |5.1):.3,400,20..|
00001070  20 a6 04 99 43 59 24 3b  22 11 11 11 11 11 11 20  | ...CY$;"...... |
00001080  20 20 20 82 53 50 41 43  45 20 44 45 42 52 49 53  |   .SPACE DEBRIS|
00001090  21 21 84 22 3a 81 4a b2  31 a4 34 30 30 3a 82 4a  |!!.":.J.1.400:.J|
000010a0  00 e0 20 b0 04 8b 44 4d  b1 b2 53 53 a7 99 22 93  |.. ...DM..SS..".|
000010b0  11 11 11 90 59 4f 55 52  20 53 48 49 50 20 57 41  |....YOUR SHIP WA|
000010c0  53 20 44 45 53 54 52 4f  59 45 44 20 42 59 20 41  |S DESTROYED BY A|
000010d0  20 4d 45 54 45 4f 52 22  3a 89 32 38 36 30 00 e6  | METEOR":.2860..|
000010e0  20 ba 04 8e 00 f8 20 c4  04 8b bb 28 30 29 b1 2e  | ..... ....(0)..|
000010f0  31 a7 31 32 35 30 00 24  21 ce 04 47 44 28 37 2c  |1.1250.$!..GD(7,|
00001100  31 29 b2 47 44 28 37 2c  31 29 ab b5 28 bb 28 30  |1).GD(7,1)..(.(0|
00001110  29 ac 31 30 29 ab 31 3a  da 33 2c 31 30 30 30 2c  |).10).1:.3,1000,|
00001120  32 30 00 56 21 d8 04 99  43 59 24 3b 22 11 11 11  |20.V!...CY$;"...|
00001130  11 11 11 11 11 20 20 20  20 82 4d 49 53 2d 4a 55  |.....    .MIS-JU|
00001140  4d 50 21 21 84 22 3a 81  4a b2 31 a4 34 30 30 3a  |MP!!.":.J.1.400:|
00001150  82 4a 3a 8e 00 6a 21 e2  04 8b bb 28 30 29 b1 4c  |.J:..j!....(0).L|
00001160  ae 32 ad 31 32 30 a7 8e  00 76 21 ec 04 8d 31 37  |.2.120...v!...17|
00001170  31 30 3a 8e 00 a7 21 f6  04 99 4e 24 3a 99 22 11  |10:...!...N$:.".|
00001180  90 20 20 20 20 20 20 20  20 20 20 20 54 52 41 44  |.           TRAD|
00001190  45 20 50 52 49 43 45 53  20 46 4f 52 20 22 3b 50  |E PRICES FOR ";P|
000011a0  4c 24 28 4c 29 00 d7 21  00 05 99 22 d5 c3 c3 c3  |L$(L)..!..."....|
000011b0  c3 c3 c3 c3 c3 c3 c3 b2  c3 c3 c3 c3 c3 c3 c3 c3  |................|
000011c0  c3 c3 c3 b2 c3 c3 c3 c3  c3 c3 c3 c3 c3 c3 c3 c3  |................|
000011d0  c3 c3 c3 c9 22 00 08 22  0a 05 99 22 c2 20 49 54  |....".."...". IT|
000011e0  45 4d 20 20 20 20 20 c2  20 20 20 20 50 52 49 43  |EM     .    PRIC|
000011f0  45 20 20 c2 20 20 20 20  20 20 20 20 20 4f 57 4e  |E  .         OWN|
00001200  45 44 20 c2 22 3b 00 19  22 14 05 99 22 ab 22 3b  |ED .";.."...".";|
00001210  4c 31 24 3b 22 b3 22 00  3d 22 1e 05 81 49 b2 30  |L1$;".".="...I.0|
00001220  a4 36 3a 99 c8 28 54 24  28 49 29 2c 33 29 3b 3a  |.6:..(T$(I),3);:|
00001230  8b 49 58 b2 49 a7 99 22  12 22 3b 00 6a 22 28 05  |.IX.I..".";.j"(.|
00001240  99 c9 28 54 24 28 49 29  2c 38 29 3b 22 92 c2 22  |..(T$(I),8);".."|
00001250  3b 3a 99 20 fb 22 23 23  23 23 23 23 23 2e 23 23  |;:. ."#######.##|
00001260  22 3b 54 50 28 49 29 3b  00 86 22 32 05 99 22 20  |";TP(I);.."2.." |
00001270  c2 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |.               |
00001280  c2 22 3a 82 00 97 22 3c  05 99 22 ab 22 3b 4c 31  |.":..."<..".";L1|
00001290  24 3b 22 b3 22 00 d4 22  46 05 99 54 24 28 37 29  |$;".".."F..T$(7)|
000012a0  3b 22 c2 22 3b 3a 99 fb  22 23 23 23 23 23 23 23  |;".";:.."#######|
000012b0  2e 23 23 22 3b 54 50 28  37 29 3b 3a 99 22 20 c2  |.##";TP(7);:." .|
000012c0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 c2  |               .|
000012d0  22 3b 00 e5 22 50 05 99  22 ab 22 3b 4c 31 24 3b  |";.."P..".";L1$;|
000012e0  22 b3 22 00 23 23 5a 05  99 54 24 28 38 29 3b 22  |".".##Z..T$(8);"|
000012f0  c2 22 3b 3a 99 20 fb 22  23 23 23 23 23 23 23 2e  |.";:. ."#######.|
00001300  23 23 22 3b 54 50 28 38  29 3b 3a 99 22 20 c2 20  |##";TP(8);:." . |
00001310  20 20 20 20 20 20 20 20  20 20 20 20 20 20 c2 22  |              ."|
00001320  3b 00 53 23 64 05 99 22  ca c3 c3 c3 c3 c3 c3 c3  |;.S#d.."........|
00001330  c3 c3 c3 b1 c3 c3 c3 c3  c3 c3 c3 c3 c3 c3 c3 b1  |................|
00001340  c3 c3 c3 c3 c3 c3 c3 c3  c3 c3 c3 c3 c3 c3 c3 cb  |................|
00001350  22 00 8f 23 6e 05 99 22  27 42 27 2d 42 55 59 20  |"..#n.."'B'-BUY |
00001360  20 27 53 27 2d 53 45 4c  4c 20 20 27 51 27 2d 51  | 'S'-SELL  'Q'-Q|
00001370  55 49 54 20 20 27 52 27  2d 52 45 50 41 49 52 22  |UIT  'R'-REPAIR"|
00001380  3a 44 4e 24 b2 22 22 3a  8d 31 36 35 30 00 a9 23  |:DN$."":.1650..#|
00001390  78 05 49 4e b2 ab 31 3a  49 24 b2 22 22 3a 47 44  |x.IN..1:I$."":GD|
000013a0  28 38 2c 31 29 b2 30 00  ba 23 82 05 99 43 59 24  |(8,1).0..#...CY$|
000013b0  3b 43 44 24 3b 4e 4c 24  00 ce 23 8c 05 a1 41 24  |;CD$;NL$..#...A$|
000013c0  3a 8b 41 24 b2 22 22 a7  31 34 32 30 00 e1 23 96  |:.A$."".1420..#.|
000013d0  05 8b 41 24 b2 22 51 22  a7 8d 36 39 30 3a 8e 00  |..A$."Q"..690:..|
000013e0  f3 23 a0 05 8b 41 24 b3  b1 22 52 22 a7 31 34 38  |.#...A$.."R".148|
000013f0  30 00 20 24 aa 05 99 43  59 24 3b 43 44 24 3b 22  |0. $...CY$;CD$;"|
00001400  96 20 20 52 45 50 41 49  52 53 20 22 3b 44 4d 3b  |.  REPAIRS ";DM;|
00001410  3a 85 4e 3a 8b 4e b1 44  4d a7 4e b2 44 4d 00 41  |:.N:.N.DM.N.DM.A|
00001420  24 b4 05 8b b5 28 4e 29  ac 54 50 28 38 29 b1 43  |$....(N).TP(8).C|
00001430  53 a7 4e b2 b5 28 43 53  ad 54 50 28 38 29 29 00  |S.N..(CS.TP(8)).|
00001440  6d 24 be 05 44 4d b2 44  4d ab b5 28 4e 29 3a 43  |m$..DM.DM..(N):C|
00001450  53 b2 43 53 ab b5 28 4e  29 ac 54 50 28 38 29 3a  |S.CS..(N).TP(8):|
00001460  8d 31 36 35 30 3a 89 31  34 31 30 00 7f 24 c8 05  |.1650:.1410..$..|
00001470  8b 41 24 b3 b1 22 42 22  a7 31 35 36 30 00 9a 24  |.A$.."B".1560..$|
00001480  d2 05 99 43 59 24 3b 43  44 24 3b 22 98 20 20 42  |...CY$;CD$;".  B|
00001490  55 59 49 4e 47 20 22 3b  00 aa 24 dc 05 8b 49 4e  |UYING ";..$...IN|
000014a0  b3 30 a7 8d 31 36 32 30  00 bc 24 e6 05 99 c9 28  |.0..1620..$....(|
000014b0  49 24 2c 38 29 3b 22 28  22 3b 00 e0 24 f0 05 99  |I$,8);"(";..$...|
000014c0  20 fb 22 23 23 23 23 23  23 22 3b b5 28 43 53 ad  | ."######";.(CS.|
000014d0  54 50 28 49 4e 29 29 3b  3a 99 22 29 22 3b 00 ff  |TP(IN));:.")";..|
000014e0  24 fa 05 99 22 20 20 20  20 20 20 20 20 20 20 20  |$..."           |
000014f0  9d 9d 9d 9d 9d 9d 9d 9d  9d 9d 9d 22 3b 00 25 25  |...........";.%%|
00001500  04 06 85 4e 3a 8b 54 50  28 49 4e 29 ac b5 28 4e  |...N:.TP(IN)..(N|
00001510  29 b1 43 53 a7 4e b2 b5  28 43 53 ad 54 50 28 49  |).CS.N..(CS.TP(I|
00001520  4e 29 29 00 61 25 0e 06  43 53 b2 43 53 ab 54 50  |N)).a%..CS.CS.TP|
00001530  28 49 4e 29 ac b5 28 4e  29 3a 47 44 28 49 4e 2c  |(IN)..(N):GD(IN,|
00001540  31 29 b2 47 44 28 49 4e  2c 31 29 aa 4e 3a 8d 31  |1).GD(IN,1).N:.1|
00001550  36 35 30 3a 49 4e b2 ab  31 3a 89 31 34 31 30 00  |650:IN..1:.1410.|
00001560  7d 25 18 06 8b 41 24 b3  b1 22 53 22 a7 da 31 2c  |}%...A$.."S"..1,|
00001570  32 30 30 2c 35 3a 89 31  34 31 30 00 b3 25 22 06  |200,5:.1410..%".|
00001580  99 43 59 24 3b 43 44 24  3b 22 81 20 20 53 45 4c  |.CY$;CD$;".  SEL|
00001590  4c 49 4e 47 20 22 3b 3a  8b 49 4e b1 b2 30 a7 99  |LING ";:.IN..0..|
000015a0  22 1d 1d 1d 1d 1d 1d 1d  1d 22 3b 3a 89 31 35 39  |"........";:.159|
000015b0  30 00 e2 25 2c 06 8d 31  36 32 30 3a 99 c9 28 49  |0..%,..1620:..(I|
000015c0  24 2c 38 29 3b 3a 8b 49  4e b1 37 a7 da 31 2c 32  |$,8);:.IN.7..1,2|
000015d0  30 30 2c 35 3a 49 4e b2  ab 31 3a 89 31 34 31 30  |00,5:IN..1:.1410|
000015e0  00 0f 26 36 06 99 22 20  20 20 20 20 20 20 20 20  |..&6.."         |
000015f0  20 20 20 20 20 20 20 20  20 9d 9d 9d 9d 9d 9d 9d  |         .......|
00001600  9d 9d 9d 9d 9d 9d 9d 9d  9d 9d 9d 22 3b 00 30 26  |...........";.0&|
00001610  40 06 85 4e 3a 8b b5 28  4e 29 b1 47 44 28 49 4e  |@..N:..(N).GD(IN|
00001620  2c 31 29 a7 4e b2 47 44  28 49 4e 2c 31 29 00 6c  |,1).N.GD(IN,1).l|
00001630  26 4a 06 43 53 b2 43 53  aa 54 50 28 49 4e 29 ac  |&J.CS.CS.TP(IN).|
00001640  b5 28 4e 29 3a 47 44 28  49 4e 2c 31 29 b2 47 44  |.(N):GD(IN,1).GD|
00001650  28 49 4e 2c 31 29 ab 4e  3a 8d 31 36 35 30 3a 49  |(IN,1).N:.1650:I|
00001660  4e b2 ab 31 3a 89 31 34  31 30 00 80 26 54 06 a1  |N..1:.1410..&T..|
00001670  41 24 3a 8b 41 24 b2 22  22 a7 31 36 32 30 00 b1  |A$:.A$."".1620..|
00001680  26 5e 06 8b c6 28 41 24  29 b1 b2 34 38 af c6 28  |&^...(A$)..48..(|
00001690  41 24 29 b3 b2 35 35 a7  49 4e b2 c6 28 41 24 29  |A$)..55.IN..(A$)|
000016a0  ab 34 38 3a 49 24 b2 54  24 28 49 4e 29 3a 8e 00  |.48:I$.T$(IN):..|
000016b0  c4 26 68 06 da 31 2c 32  30 30 2c 35 3a 89 31 36  |.&h..1,200,5:.16|
000016c0  32 30 00 fc 26 72 06 8d  38 35 30 3a 99 43 59 24  |20..&r..850:.CY$|
000016d0  3b 22 1c 11 11 11 11 11  11 11 20 20 43 41 53 48  |;"........  CASH|
000016e0  20 20 20 20 20 20 20 20  20 20 20 20 9d 9d 9d 9d  |            ....|
000016f0  9d 9d 9d 9d 9d 9d 9d 9d  22 3b 00 18 27 7c 06 99  |........";..'|..|
00001700  fb 20 22 24 23 23 23 23  23 23 23 23 23 23 23 2e  |. "$###########.|
00001710  23 23 22 3b 43 53 00 4a  27 86 06 44 4e 24 b2 22  |##";CS.J'..DN$."|
00001720  22 3a 81 49 b2 30 a4 36  3a 99 22 13 1f 11 11 11  |":.I.0.6:.".....|
00001730  11 11 11 1d 1d 1d 1d 1d  1d 1d 1d 1d 1d 1d 22 3b  |..............";|
00001740  44 4e 24 3b 52 43 24 3b  00 84 27 90 06 99 20 fb  |DN$;RC$;..'... .|
00001750  22 23 23 23 23 23 23 23  23 22 3b 47 44 28 49 2c  |"########";GD(I,|
00001760  31 29 3a 44 4e 24 b2 44  4e 24 aa 22 11 22 3a 82  |1):DN$.DN$.".":.|
00001770  3a 44 4e 24 b2 44 4e 24  aa 22 11 11 11 11 11 11  |:DN$.DN$."......|
00001780  11 22 00 b8 27 9a 06 99  22 13 1f 1d 1d 1d 1d 1d  |."..'...".......|
00001790  1d 1d 1d 1d 1d 1d 1d 22  3b 44 4e 24 3b 52 43 24  |.......";DN$;RC$|
000017a0  3b 3a 99 fb 22 23 23 23  23 23 2e 23 22 3b 47 44  |;:.."#####.#";GD|
000017b0  28 37 2c 31 29 3a 00 ea  27 a4 06 99 22 13 1f 11  |(7,1):..'..."...|
000017c0  11 1d 1d 1d 1d 1d 1d 1d  1d 1d 1d 1d 1d 1d 22 3b  |..............";|
000017d0  44 4e 24 3b 52 43 24 3b  3a 99 fb 22 23 23 23 23  |DN$;RC$;:.."####|
000017e0  23 23 22 3b 44 4d 3a 8e  00 15 28 ae 06 99 22 93  |##";DM:...(...".|
000017f0  22 3a e7 31 2c 38 3a e7  30 2c 32 2c 34 3a 44 52  |":.1,8:.0,2,4:DR|
00001800  b2 30 3a 50 53 b2 34 38  30 3a 53 4b b2 30 3a 4f  |.0:PS.480:SK.0:O|
00001810  53 b2 30 00 5c 28 b8 06  53 4e b2 30 3a 42 54 b2  |S.0.\(..SN.0:BT.|
00001820  35 30 30 3a 81 49 b2 31  a4 b5 28 53 53 ad 31 30  |500:.I.1..(SS.10|
00001830  30 29 3a 53 4e b2 53 4e  aa b5 28 bb 28 30 29 ac  |0):SN.SN..(.(0).|
00001840  32 29 3a 42 54 b2 42 54  aa 35 30 30 aa b5 28 bb  |2):BT.BT.500..(.|
00001850  28 30 29 ac 36 30 30 29  3a 82 00 a6 28 c2 06 50  |(0).600):...(..P|
00001860  46 28 30 2c 30 29 b2 53  53 aa b5 28 bb 28 30 29  |F(0,0).SS..(.(0)|
00001870  ac 53 53 ad 31 30 30 aa  32 29 ac 31 30 30 3a 8b  |.SS.100.2).100:.|
00001880  53 4e b1 39 a7 50 46 28  30 2c 30 29 b2 50 46 28  |SN.9.PF(0,0).PF(|
00001890  30 2c 30 29 aa 28 53 4e  ab 39 29 ac 31 30 30 3a  |0,0).(SN.9).100:|
000018a0  53 4e b2 39 00 cf 28 cc  06 50 46 28 30 2c 31 29  |SN.9..(..PF(0,1)|
000018b0  b2 b5 28 bb 28 30 29 ac  53 53 ad 31 30 30 aa 32  |..(.(0).SS.100.2|
000018c0  29 aa b5 28 bb 28 30 29  ac 4c ad 32 29 00 0f 29  |)..(.(0).L.2)..)|
000018d0  d6 06 81 4a b2 31 a4 39  3a 50 46 28 4a 2c 30 29  |...J.1.9:PF(J,0)|
000018e0  b2 b5 28 bb 28 30 29 ac  53 53 ad 31 30 aa 53 53  |..(.(0).SS.10.SS|
000018f0  ad 31 30 29 3a 50 46 28  4a 2c 31 29 b2 b5 28 bb  |.10):PF(J,1)..(.|
00001900  28 30 29 ac 53 53 ad 35  30 30 aa 31 29 00 23 29  |(0).SS.500.1).#)|
00001910  e0 06 8b 4a b1 53 4e a7  50 46 28 4a 2c 30 29 b2  |...J.SN.PF(J,0).|
00001920  30 00 29 29 ea 06 82 00  6c 29 f4 06 81 4a b2 30  |0.))....l)...J.0|
00001930  a4 39 3a 50 46 28 4a 2c  33 29 b2 33 30 aa b5 28  |.9:PF(J,3).30..(|
00001940  bb 28 30 29 ac 39 29 3a  50 46 28 4a 2c 32 29 b2  |.(0).9):PF(J,2).|
00001950  38 aa b5 28 bb 28 30 29  ac 36 29 3a 82 3a 54 47  |8..(.(0).6):.:TG|
00001960  b2 30 3a 4f 53 b2 53 4e  aa 31 00 87 29 fe 06 44  |.0:OS.SN.1..)..D|
00001970  52 b2 44 52 ab 31 30 ac  44 46 3a 8b 44 52 b3 30  |R.DR.10.DF:.DR.0|
00001980  a7 44 52 b2 30 00 a3 29  08 07 44 4d b2 44 4d aa  |.DR.0..)..DM.DM.|
00001990  b5 28 44 52 29 3a 44 52  b2 44 52 ab b5 28 44 52  |.(DR):DR.DR..(DR|
000019a0  29 00 e5 29 12 07 8b 47  44 28 37 2c 31 29 b3 b2  |)..)...GD(7,1)..|
000019b0  30 a7 99 22 13 05 11 11  59 4f 55 20 52 41 4e 20  |0.."....YOU RAN |
000019c0  4f 55 54 20 4f 46 20 46  55 45 4c 2e 2e 2e 22 3a  |OUT OF FUEL...":|
000019d0  44 4d b2 53 53 aa 31 3a  81 49 b2 31 a4 31 30 30  |DM.SS.1:.I.1.100|
000019e0  30 3a 82 00 2c 2a 1c 07  8b 44 4d b1 b2 53 53 a7  |0:..,*...DM..SS.|
000019f0  99 22 93 90 1d 1d 1d 1d  1d 4c 4f 4f 54 45 44 20  |.".......LOOTED |
00001a00  42 59 20 50 49 52 41 54  45 53 21 22 3a 81 49 b2  |BY PIRATES!":.I.|
00001a10  30 a4 36 3a 47 44 28 49  2c 31 29 b2 30 3a 82 3a  |0.6:GD(I,1).0:.:|
00001a20  43 53 b2 30 3a 89 32 38  36 30 00 75 2a 26 07 99  |CS.0:.2860.u*&..|
00001a30  4e 24 3a 99 22 9e 20 27  45 27 20 45 56 41 44 45  |N$:.". 'E' EVADE|
00001a40  20 27 43 27 20 43 4c 4f  53 45 20 27 30 27 2e 2e  | 'C' CLOSE '0'..|
00001a50  27 39 27 20 54 41 52 47  45 54 22 3a 99 22 20 27  |'9' TARGET":." '|
00001a60  4d 27 20 4e 55 4b 45 20  20 27 4c 27 20 4c 41 53  |M' NUKE  'L' LAS|
00001a70  45 52 22 00 84 2a 30 07  8d 37 36 30 3a 8d 32 30  |ER"..*0..760:.20|
00001a80  35 30 00 94 2a 3a 07 8b  53 4e b2 ab 31 a7 31 39  |50..*:..SN..1.19|
00001a90  33 30 00 d5 2a 44 07 99  43 59 24 3b 52 43 24 3b  |30..*D..CY$;RC$;|
00001aa0  43 44 24 3b 22 11 99 20  20 54 41 52 47 45 54 20  |CD$;"..  TARGET |
00001ab0  20 20 20 20 20 20 22 3b  3a 99 fb 22 23 23 22 3b  |      ";:.."##";|
00001ac0  54 47 3b 3a a1 41 24 3a  8b 41 24 b2 22 22 a7 31  |TG;:.A$:.A$."".1|
00001ad0  38 36 30 00 fd 2a 4e 07  8b 41 24 b2 22 4c 22 af  |860..*N..A$."L".|
00001ae0  4c 50 b1 30 af 50 46 28  54 47 2c 30 29 b1 30 a7  |LP.0.PF(TG,0).0.|
00001af0  8d 31 39 37 30 3a 89 31  37 39 30 00 25 2b 58 07  |.1970:.1790.%+X.|
00001b00  8b 41 24 b2 22 4d 22 af  4d 53 b1 30 af 50 46 28  |.A$."M".MS.0.PF(|
00001b10  54 47 2c 30 29 b1 30 a7  8d 32 30 30 30 3a 89 31  |TG,0).0..2000:.1|
00001b20  37 39 30 00 47 2b 62 07  8b 41 24 b2 22 45 22 af  |790.G+b..A$."E".|
00001b30  47 44 28 37 2c 31 29 b1  30 a7 8d 32 30 34 30 3a  |GD(7,1).0..2040:|
00001b40  89 31 37 39 30 00 68 2b  6c 07 8b 41 24 b2 22 43  |.1790.h+l..A$."C|
00001b50  22 a7 8b bb 28 30 29 b3  2e 37 a7 45 56 b2 ab 33  |"...(0)..7.EV..3|
00001b60  3a 89 31 37 39 30 00 91  2b 76 07 8b c6 28 41 24  |:.1790..+v...(A$|
00001b70  29 b1 34 37 af c6 28 41  24 29 b3 35 38 a7 54 47  |).47..(A$).58.TG|
00001b80  b2 c6 28 41 24 29 ab 34  38 3a 89 31 38 36 30 00  |..(A$).48:.1860.|
00001b90  9b 2b 80 07 89 31 38 36  30 00 b3 2b 8a 07 e7 30  |.+...1860..+...0|
00001ba0  2c 32 3a 99 22 93 22 3a  8b 4f 53 b3 b1 53 4b a7  |,2:.".":.OS..SK.|
00001bb0  8e 00 dc 2b 94 07 99 22  93 11 11 90 59 4f 55 20  |...+..."....YOU |
00001bc0  44 45 46 45 41 54 45 44  20 54 48 45 20 50 49 52  |DEFEATED THE PIR|
00001bd0  41 54 45 20 46 4c 45 45  54 22 00 1c 2c 9e 07 43  |ATE FLEET"..,..C|
00001be0  53 b2 43 53 aa 42 54 3a  99 22 11 41 4e 44 20 43  |S.CS.BT:.".AND C|
00001bf0  4f 4c 4c 45 43 54 45 44  20 22 3b 3a 99 fb 22 23  |OLLECTED ";:.."#|
00001c00  23 23 23 23 23 23 23 22  3b 42 54 3b 3a 99 22 20  |#######";BT;:." |
00001c10  49 4e 20 42 4f 4f 54 59  21 22 00 33 2c a8 07 81  |IN BOOTY!".3,...|
00001c20  49 b2 31 a4 32 30 30 30  3a 82 3a 99 22 93 22 3a  |I.1.2000:.:.".":|
00001c30  8e 00 6e 2c b2 07 da 33  2c 31 30 32 30 2c 38 3a  |..n,...3,1020,8:|
00001c40  da 31 2c 39 37 30 2c 38  3a 50 46 28 54 47 2c 30  |.1,970,8:PF(TG,0|
00001c50  29 b2 50 46 28 54 47 2c  30 29 ab 28 31 35 30 ac  |).PF(TG,0).(150.|
00001c60  4c 50 29 ad 50 46 28 54  47 2c 33 29 00 99 2c bc  |LP).PF(TG,3)..,.|
00001c70  07 8b 50 46 28 54 47 2c  30 29 b3 b2 30 a7 da 33  |..PF(TG,0)..0..3|
00001c80  2c 39 30 30 2c 32 30 3a  53 4e b2 53 4e ab 31 3a  |,900,20:SN.SN.1:|
00001c90  53 4b b2 53 4b aa 31 00  9f 2c c6 07 8e 00 ca 2c  |SK.SK.1..,.....,|
00001ca0  d0 07 da 33 2c 36 30 30  2c 32 30 3a 4d 53 b2 4d  |...3,600,20:MS.M|
00001cb0  53 ab 31 3a 8b bb 28 30  29 ac 31 30 30 b3 50 46  |S.1:..(0).100.PF|
00001cc0  28 54 47 2c 33 29 a7 8e  00 00 2d da 07 da 33 2c  |(TG,3)....-...3,|
00001cd0  38 30 30 2c 33 30 3a 50  46 28 54 47 2c 30 29 b2  |800,30:PF(TG,0).|
00001ce0  50 46 28 54 47 2c 30 29  ab b5 28 bb 28 30 29 ac  |PF(TG,0)..(.(0).|
00001cf0  35 30 29 ab b5 28 bb 28  30 29 ac 35 30 29 00 2b  |50)..(.(0).50).+|
00001d00  2d e4 07 8b 50 46 28 54  47 2c 30 29 b3 b2 30 a7  |-...PF(TG,0)..0.|
00001d10  da 33 2c 39 35 30 2c 32  30 3a 53 4e b2 53 4e ab  |.3,950,20:SN.SN.|
00001d20  31 3a 53 4b b2 53 4b aa  31 00 31 2d ee 07 8e 00  |1:SK.SK.1.1-....|
00001d30  59 2d f8 07 47 44 28 37  2c 31 29 b2 47 44 28 37  |Y-..GD(7,1).GD(7|
00001d40  2c 31 29 ab 2e 31 3a 45  56 b2 b5 28 bb 28 30 29  |,1)..1:EV..(.(0)|
00001d50  ac 33 aa 31 29 3a 8e 00  76 2d 02 08 97 33 30 37  |.3.1):..v-...307|
00001d60  32 aa 50 53 2c 34 32 3a  97 32 30 34 38 aa 50 53  |2.PS,42:.2048.PS|
00001d70  2c 31 32 37 00 95 2d 0c  08 81 4a b2 39 a4 30 a9  |,127..-...J.9.0.|
00001d80  ab 31 3a 8b 50 46 28 4a  2c 30 29 b3 b2 30 a7 32  |.1:.PF(J,0)..0.2|
00001d90  31 38 30 00 ce 2d 16 08  4d 56 b2 b5 28 bb 28 30  |180..-..MV..(.(0|
00001da0  29 ac 33 29 3a 8b 50 46  28 4a 2c 33 29 aa 45 56  |).3):.PF(J,3).EV|
00001db0  ab 4d 56 b1 b2 31 a7 50  46 28 4a 2c 33 29 b2 50  |.MV..1.PF(J,3).P|
00001dc0  46 28 4a 2c 33 29 aa 45  56 ab 4d 56 00 f6 2d 20  |F(J,3).EV.MV..- |
00001dd0  08 8b 50 46 28 4a 2c 33  29 b1 33 39 a7 50 46 28  |..PF(J,3).39.PF(|
00001de0  4a 2c 30 29 b2 30 3a 53  4e b2 53 4e ab 31 3a 89  |J,0).0:SN.SN.1:.|
00001df0  32 31 38 30 00 26 2e 2a  08 8b b5 28 50 53 ad 34  |2180.&.*...(PS.4|
00001e00  30 29 b1 50 46 28 4a 2c  32 29 af bb 28 30 29 b3  |0).PF(J,2)..(0).|
00001e10  2e 33 a7 50 46 28 4a 2c  32 29 b2 50 46 28 4a 2c  |.3.PF(J,2).PF(J,|
00001e20  32 29 aa 31 00 56 2e 34  08 8b b5 28 50 53 ad 34  |2).1.V.4...(PS.4|
00001e30  30 29 b3 50 46 28 4a 2c  32 29 af bb 28 30 29 b3  |0).PF(J,2)..(0).|
00001e40  2e 33 a7 50 46 28 4a 2c  32 29 b2 50 46 28 4a 2c  |.3.PF(J,2).PF(J,|
00001e50  32 29 ab 31 00 9e 2e 3e  08 8b 4a b2 30 a7 97 33  |2).1...>..J.0..3|
00001e60  30 37 32 aa 50 46 28 30  2c 32 29 ac 34 30 aa 50  |072.PF(0,2).40.P|
00001e70  46 28 30 2c 33 29 2c 36  35 3a 97 32 30 34 38 aa  |F(0,3),65:.2048.|
00001e80  50 46 28 30 2c 32 29 ac  34 30 aa 50 46 28 30 2c  |PF(0,2).40.PF(0,|
00001e90  33 29 2c 31 32 37 3a 89  32 31 34 30 00 e3 2e 48  |3),127:.2140...H|
00001ea0  08 97 33 30 37 32 aa 50  46 28 4a 2c 32 29 ac 34  |..3072.PF(J,2).4|
00001eb0  30 aa 50 46 28 4a 2c 33  29 ab 34 30 2c 4a aa 34  |0.PF(J,3).40,J.4|
00001ec0  38 3a 97 32 30 34 38 aa  50 46 28 4a 2c 32 29 ac  |8:.2048.PF(J,2).|
00001ed0  34 30 aa 50 46 28 4a 2c  33 29 ab 34 30 2c 31 31  |40.PF(J,3).40,11|
00001ee0  33 00 20 2f 52 08 97 33  30 37 32 aa 50 46 28 4a  |3. /R..3072.PF(J|
00001ef0  2c 32 29 ac 34 30 aa 50  46 28 4a 2c 33 29 2c 38  |,2).40.PF(J,3),8|
00001f00  37 3a 97 32 30 34 38 aa  50 46 28 4a 2c 32 29 ac  |7:.2048.PF(J,2).|
00001f10  34 30 aa 50 46 28 4a 2c  33 29 2c 31 32 37 00 3a  |40.PF(J,3),127.:|
00001f20  2f 5c 08 8b bb 28 30 29  b3 50 46 28 4a 2c 33 29  |/\...(0).PF(J,3)|
00001f30  ad 34 30 a7 32 31 38 30  00 6a 2f 66 08 da 33 2c  |.40.2180.j/f..3,|
00001f40  31 30 32 30 ab 31 30 ac  4a 2c 35 3a 44 58 b2 28  |1020.10.J,5:DX.(|
00001f50  50 46 28 4a 2c 31 29 ac  34 30 30 29 ad 28 50 46  |PF(J,1).400).(PF|
00001f60  28 4a 2c 33 29 ae 32 29  00 ad 2f 70 08 44 52 b2  |(J,3).2)../p.DR.|
00001f70  44 52 aa 44 58 3a 8b bb  28 30 29 b3 44 58 ad 28  |DR.DX:..(0).DX.(|
00001f80  53 53 ab 44 4d aa 44 58  29 af 44 46 b1 30 a7 da  |SS.DM.DX).DF.0..|
00001f90  33 2c 31 30 32 30 2c 31  30 3a da 33 2c 39 39 30  |3,1020,10:.3,990|
00001fa0  2c 31 35 3a 44 46 b2 44  46 ab 31 00 e7 2f 7a 08  |,15:DF.DF.1../z.|
00001fb0  8b bb 28 30 29 b3 44 58  ad 28 53 53 ab 44 4d aa  |..(0).DX.(SS.DM.|
00001fc0  44 58 29 af 4c 50 b1 30  a7 da 33 2c 31 30 30 30  |DX).LP.0..3,1000|
00001fd0  2c 31 30 3a da 33 2c 39  30 30 2c 31 30 3a 4c 50  |,10:.3,900,10:LP|
00001fe0  b2 4c 50 ab 31 00 ee 2f  84 08 82 4a 00 f9 2f 8e  |.LP.1../...J../.|
00001ff0  08 45 56 b2 30 3a 8e 00  10 30 98 08 54 50 28 30  |.EV.0:...0..TP(0|
00002000  29 b2 32 30 ad ba 28 50  28 4c 2c 35 29 29 00 33  |).20..(P(L,5)).3|
00002010  30 a2 08 54 50 28 31 29  b2 32 30 30 30 ad 28 35  |0..TP(1).2000.(5|
00002020  ac 50 28 4c 2c 34 29 aa  50 28 4c 2c 35 29 ad 35  |.P(L,4).P(L,5).5|
00002030  29 00 56 30 ac 08 54 50  28 32 29 b2 34 30 30 30  |).V0..TP(2).4000|
00002040  30 ad 28 31 30 ac 50 28  4c 2c 34 29 aa 50 28 4c  |0.(10.P(L,4).P(L|
00002050  2c 33 29 29 00 82 30 b6  08 54 50 28 33 29 b2 28  |,3))..0..TP(3).(|
00002060  31 32 30 30 30 aa b5 28  bb 28 30 29 ac 32 30 30  |12000..(.(0).200|
00002070  30 29 29 ad ba 28 31 30  ac 50 28 4c 2c 34 29 29  |0))..(10.P(L,4))|
00002080  00 9f 30 c0 08 54 50 28  34 29 b2 31 30 30 30 30  |..0..TP(4).10000|
00002090  30 ad ba 28 34 ac 50 28  4c 2c 34 29 29 00 bc 30  |0..(4.P(L,4))..0|
000020a0  ca 08 54 50 28 35 29 b2  31 30 30 30 30 30 ad ba  |..TP(5).100000..|
000020b0  28 50 28 4c 2c 35 29 ad  32 29 00 de 30 d4 08 54  |(P(L,5).2)..0..T|
000020c0  50 28 36 29 b2 31 35 30  30 30 ac 50 28 4c 2c 33  |P(6).15000.P(L,3|
000020d0  29 ad 28 35 ac 50 28 4c  2c 34 29 29 00 f8 30 de  |).(5.P(L,4))..0.|
000020e0  08 54 50 28 37 29 b2 31  30 30 ad ba 28 32 ac 50  |.TP(7).100..(2.P|
000020f0  28 4c 2c 34 29 29 00 10  31 e8 08 54 50 28 38 29  |(L,4))..1..TP(8)|
00002100  b2 35 30 30 ab 50 28 4c  2c 34 29 ac 32 32 00 4b  |.500.P(L,4).22.K|
00002110  31 f2 08 81 49 b2 30 a4  37 3a 8b bb 28 30 29 b3  |1...I.0.7:..(0).|
00002120  2e 34 a7 54 50 28 49 29  b2 54 50 28 49 29 ab bb  |.4.TP(I).TP(I)..|
00002130  28 30 29 ac 28 54 50 28  49 29 ad 28 37 aa 4c ad  |(0).(TP(I).(7.L.|
00002140  32 29 29 3a 89 32 33 31  30 00 6f 31 fc 08 54 50  |2)):.2310.o1..TP|
00002150  28 49 29 b2 54 50 28 49  29 aa bb 28 30 29 ac 54  |(I).TP(I)..(0).T|
00002160  50 28 49 29 ad 28 31 30  aa 32 ac 4c 29 00 a9 31  |P(I).(10.2.L)..1|
00002170  06 09 82 3a 49 58 b2 b5  28 bb 28 30 29 ac 37 29  |...:IX..(.(0).7)|
00002180  3a 8b b5 28 bb 28 30 29  ac 31 30 29 b3 b1 4c b0  |:..(.(0).10)..L.|
00002190  bb 28 30 29 b3 35 30 ad  28 53 44 ac 31 30 29 a7  |.(0).50.(SD.10).|
000021a0  49 58 b2 ab 31 3a 8e 00  eb 31 10 09 4e 53 b2 28  |IX..1:...1..NS.(|
000021b0  bb 28 30 29 ac 50 28 4c  2c 33 29 aa 38 29 ad 34  |.(0).P(L,3).8).4|
000021c0  3a 47 24 b2 22 53 48 4f  52 54 41 47 45 22 3a 8b  |:G$."SHORTAGE":.|
000021d0  bb 28 30 29 b3 2e 35 a7  47 24 b2 22 47 4c 55 54  |.(0)..5.G$."GLUT|
000021e0  22 3a 4e 53 b2 34 ad 4e  53 00 23 32 1a 09 99 22  |":NS.4.NS.#2..."|
000021f0  93 11 11 11 9a 54 48 45  52 45 20 48 41 53 20 42  |.....THERE HAS B|
00002200  45 45 4e 20 41 20 22 3b  47 24 3b 22 20 4f 46 20  |EEN A ";G$;" OF |
00002210  22 3b c9 28 54 24 28 49  58 29 2c 38 29 3b 22 2e  |";.(T$(IX),8);".|
00002220  22 00 5b 32 24 09 99 22  50 52 49 43 45 53 20 41  |".[2$.."PRICES A|
00002230  52 45 20 82 22 3b 3a 99  fb 22 23 23 2e 23 23 22  |RE .";:.."##.##"|
00002240  3b 4e 53 3b 3a 99 22 84  20 54 49 4d 45 53 20 4e  |;NS;:.". TIMES N|
00002250  4f 52 4d 41 4c 21 21 21  22 00 7e 32 2e 09 81 49  |ORMAL!!!".~2...I|
00002260  b2 31 a4 32 35 30 30 3a  82 3a 54 50 28 49 58 29  |.1.2500:.:TP(IX)|
00002270  b2 54 50 28 49 58 29 ac  4e 53 3a 8e 00 89 32 38  |.TP(IX).NS:...28|
00002280  09 44 4e 24 b2 22 22 00  c8 32 42 09 99 22 1f 22  |.DN$.""..2B.."."|
00002290  3a 81 49 b2 30 a4 36 3a  99 22 13 11 11 11 11 1d  |:.I.0.6:."......|
000022a0  1d 1d 1d 1d 1d 1d 1d 1d  1d 1d 22 3b 44 4e 24 3b  |..........";DN$;|
000022b0  3a 99 20 fb 22 23 23 23  23 23 23 23 23 22 3b 47  |:. ."########";G|
000022c0  44 28 49 2c 30 29 00 ff  32 4c 09 99 22 13 11 11  |D(I,0)..2L.."...|
000022d0  11 11 1d 1d 1d 1d 1d 1d  1d 1d 1d 1d 1d 22 3b 52  |.............";R|
000022e0  43 24 3b 44 4e 24 3b 3a  99 20 fb 22 23 23 23 23  |C$;DN$;:. ."####|
000022f0  23 23 23 23 22 3b 47 44  28 49 2c 31 29 00 13 33  |####";GD(I,1)..3|
00002300  56 09 44 4e 24 b2 44 4e  24 aa 22 11 22 3a 82 3a  |V.DN$.DN$.".":.:|
00002310  8e 00 20 33 60 09 99 43  59 24 3b 4e 4c 24 00 3b  |.. 3`..CY$;NL$.;|
00002320  33 6a 09 99 43 59 24 3b  22 96 20 20 20 42 4f 52  |3j..CY$;".   BOR|
00002330  52 4f 57 49 4e 47 20 22  3b 00 4e 33 74 09 85 4e  |ROWING ";.N3t..N|
00002340  3a 8b b5 28 4e 29 b1 42  a7 4e b2 42 00 77 33 7e  |:..(N).B.N.B.w3~|
00002350  09 43 53 b2 43 53 aa b5  28 4e 29 3a 43 52 b2 43  |.CS.CS..(N):CR.C|
00002360  52 ab b5 28 4e 29 3a 42  b2 42 ab b5 28 4e 29 3a  |R..(N):B.B..(N):|
00002370  8d 32 34 36 30 00 84 33  88 09 99 43 59 24 3b 4e  |.2460..3...CY$;N|
00002380  4c 24 00 8a 33 92 09 8e  00 c1 33 9c 09 99 43 59  |L$..3.....3...CY|
00002390  24 3b 22 1c 11 11 20 20  20 20 43 41 53 48 20 20  |$;"...    CASH  |
000023a0  20 24 20 22 3b 3a 99 20  fb 22 23 23 23 23 23 23  | $ ";:. ."######|
000023b0  23 23 23 23 23 23 23 23  2e 23 23 22 3b 43 53 00  |########.##";CS.|
000023c0  fb 33 a6 09 99 43 59 24  3b 22 1c 11 11 11 20 20  |.3...CY$;"....  |
000023d0  20 20 43 52 45 44 49 54  20 24 20 22 3b 3a 99 20  |  CREDIT $ ";:. |
000023e0  fb 22 23 23 23 23 23 23  23 23 23 23 23 23 23 23  |."##############|
000023f0  2e 23 23 22 3b 43 52 3a  8e 00 08 34 b0 09 99 43  |.##";CR:...4...C|
00002400  59 24 3b 4e 4c 24 00 24  34 ba 09 99 43 59 24 3b  |Y$;NL$.$4...CY$;|
00002410  22 96 20 20 20 44 45 50  4f 53 49 54 49 4e 47 20  |".   DEPOSITING |
00002420  22 3b 00 39 34 c4 09 85  4e 3a 8b b5 28 4e 29 b1  |";.94...N:..(N).|
00002430  43 53 a7 4e b2 43 53 00  62 34 ce 09 43 53 b2 43  |CS.N.CS.b4..CS.C|
00002440  53 ab b5 28 4e 29 3a 43  52 b2 43 52 aa b5 28 4e  |S..(N):CR.CR..(N|
00002450  29 3a 42 b2 42 aa b5 28  4e 29 3a 8d 32 34 36 30  |):B.B..(N):.2460|
00002460  00 6f 34 d8 09 99 43 59  24 3b 4e 4c 24 00 75 34  |.o4...CY$;NL$.u4|
00002470  e2 09 8e 00 8b 34 ec 09  8b bb 28 30 29 b1 50 28  |.....4....(0).P(|
00002480  4c 2c 34 29 ad 34 30 a7  8e 00 9d 34 f6 09 8b bb  |L,4).40....4....|
00002490  28 30 29 b1 2e 32 a7 32  36 32 30 00 d0 34 00 0a  |(0)..2.2620..4..|
000024a0  43 54 b2 50 28 4c 2c 34  29 ac 31 30 30 aa 31 30  |CT.P(L,4).100.10|
000024b0  30 30 ac bb 28 30 29 aa  bb 28 30 29 ac 28 43 53  |00..(0)..(0).(CS|
000024c0  ad 31 30 30 30 29 aa 43  53 ad 31 30 30 30 00 dd  |.1000).CS.1000..|
000024d0  34 0a 0a 8b 43 54 b1 43  53 a7 8e 00 0f 35 14 0a  |4...CT.CS....5..|
000024e0  99 22 93 11 11 11 1e 59  4f 55 20 48 41 56 45 20  |.".....YOU HAVE |
000024f0  42 45 45 4e 20 4f 46 46  45 52 45 44 20 41 20 42  |BEEN OFFERED A B|
00002500  49 47 47 45 52 20 53 50  41 43 45 2d 22 00 36 35  |IGGER SPACE-".65|
00002510  1e 0a 99 22 11 53 48 49  50 20 46 52 4f 4d 20 41  |...".SHIP FROM A|
00002520  20 43 4f 4d 50 41 4e 59  20 4f 4e 20 22 3b 50 4c  | COMPANY ON ";PL|
00002530  24 28 4c 29 00 63 35 28  0a 99 22 11 49 54 20 43  |$(L).c5(..".IT C|
00002540  4f 53 54 53 20 22 3b 3a  99 fb 22 23 23 23 23 23  |OSTS ";:.."#####|
00002550  23 23 23 22 3b 43 54 3b  3a 99 22 20 43 52 2e 22  |###";CT;:." CR."|
00002560  3b 00 8e 35 32 0a 99 22  20 57 49 54 48 20 41 20  |;..52.." WITH A |
00002570  54 52 41 44 45 2d 49 4e  2e 22 3a 8d 32 38 32 30  |TRADE-IN.":.2820|
00002580  3a 53 53 b2 53 53 aa 31  30 30 3a 8e 00 a1 35 3c  |:SS.SS.100:...5<|
00002590  0a 8b bb 28 30 29 b1 2e  32 35 a7 32 36 38 30 00  |...(0)..25.2680.|
000025a0  cf 35 46 0a 43 54 b2 31  36 30 ac 28 32 35 ab 50  |.5F.CT.160.(25.P|
000025b0  28 4c 2c 34 29 29 aa bb  28 30 29 ac 28 43 53 ad  |(L,4))..(0).(CS.|
000025c0  31 30 30 30 29 aa 43 53  ad 31 30 30 30 00 dc 35  |1000).CS.1000..5|
000025d0  50 0a 8b 43 54 b1 43 53  a7 8e 00 10 36 5a 0a 99  |P..CT.CS....6Z..|
000025e0  22 93 11 11 11 1f 54 48  45 52 45 20 49 53 20 41  |".....THERE IS A|
000025f0  20 4e 45 57 20 4c 41 53  45 52 20 50 4f 44 20 46  | NEW LASER POD F|
00002600  4f 52 20 53 41 4c 45 20  48 45 52 45 2e 22 00 43  |OR SALE HERE.".C|
00002610  36 64 0a 99 22 11 49 54  20 43 4f 53 54 53 20 41  |6d..".IT COSTS A|
00002620  20 4d 45 52 45 20 22 3b  3a 99 fb 22 23 23 23 23  | MERE ";:.."####|
00002630  23 23 23 23 22 3b 43 54  3b 3a 99 22 20 43 52 2e  |####";CT;:." CR.|
00002640  22 00 57 36 6e 0a 8d 32  38 32 30 3a 4c 50 b2 4c  |".W6n..2820:LP.L|
00002650  50 aa 31 3a 8e 00 6a 36  78 0a 8b bb 28 30 29 b1  |P.1:..j6x...(0).|
00002660  2e 31 35 a7 32 37 34 30  00 96 36 82 0a 43 54 b2  |.15.2740..6..CT.|
00002670  32 30 30 ac 28 32 35 ab  50 28 4c 2c 34 29 29 aa  |200.(25.P(L,4)).|
00002680  bb 28 30 29 ac 28 43 53  ad 38 30 30 29 aa 43 53  |.(0).(CS.800).CS|
00002690  ad 38 30 30 00 a3 36 8c  0a 8b 43 54 b1 43 53 a7  |.800..6...CT.CS.|
000026a0  8e 00 d5 36 96 0a 99 22  93 11 11 11 1c 54 48 45  |...6...".....THE|
000026b0  52 45 20 49 53 20 41 20  44 45 46 4c 45 43 54 4f  |RE IS A DEFLECTO|
000026c0  52 20 53 48 49 45 4c 44  20 41 56 41 49 4c 41 42  |R SHIELD AVAILAB|
000026d0  4c 45 22 00 05 37 a0 0a  99 22 11 43 4f 53 54 49  |LE"..7...".COSTI|
000026e0  4e 47 20 4a 55 53 54 20  22 3b 3a 99 fb 22 23 23  |NG JUST ";:.."##|
000026f0  23 23 23 23 23 23 22 3b  43 54 3b 3a 99 22 20 43  |######";CT;:." C|
00002700  52 2e 22 00 19 37 aa 0a  8d 32 38 32 30 3a 44 46  |R."..7...2820:DF|
00002710  b2 44 46 aa 31 3a 8e 00  64 37 b4 0a 43 54 b2 37  |.DF.1:..d7..CT.7|
00002720  30 ac 28 32 35 ab 50 28  4c 2c 34 29 29 aa bb 28  |0.(25.P(L,4))..(|
00002730  30 29 ac 28 43 53 ad 31  30 30 30 29 aa 43 53 ad  |0).(CS.1000).CS.|
00002740  31 30 30 30 3a 4e b2 b5  28 bb 28 30 29 ac 50 28  |1000:N..(.(0).P(|
00002750  4c 2c 34 29 ad 32 aa 50  28 4c 2c 34 29 ad 33 aa  |L,4).2.P(L,4).3.|
00002760  31 29 00 7c 37 be 0a 8b  43 54 ac 4e b1 43 53 a7  |1).|7...CT.N.CS.|
00002770  4e b2 b5 28 43 53 ad 43  54 29 00 87 37 c8 0a 8b  |N..(CS.CT)..7...|
00002780  4e b2 30 a7 8e 00 b7 37  d2 0a 99 22 93 11 11 11  |N.0....7..."....|
00002790  22 3b 4e 3b 22 1c 20 4e  55 43 4c 45 41 52 20 4d  |";N;". NUCLEAR M|
000027a0  49 53 53 49 4c 45 53 20  41 52 45 20 4f 46 46 45  |ISSILES ARE OFFE|
000027b0  52 45 44 2e 22 00 e9 37  dc 0a 99 22 11 54 4f 54  |RED."..7...".TOT|
000027c0  41 4c 20 43 4f 53 54 20  49 53 22 3b 3a 99 fb 22  |AL COST IS";:.."|
000027d0  23 23 23 23 23 23 23 23  22 3b 43 54 ac 4e 3b 3a  |########";CT.N;:|
000027e0  99 22 20 43 52 2e 22 00  1b 38 e6 0a 85 22 11 48  |." CR."..8...".H|
000027f0  4f 57 20 4d 41 4e 59 20  44 4f 20 59 4f 55 20 57  |OW MANY DO YOU W|
00002800  49 53 48 20 54 4f 20 42  55 59 22 3b 4e 4d 3a 8b  |ISH TO BUY";NM:.|
00002810  4e 4d b3 30 a7 4e 4d b2  30 00 2a 38 f0 0a 8b 4e  |NM.0.NM.0.*8...N|
00002820  4d b1 4e a7 4e 4d b2 4e  00 45 38 fa 0a 4d 53 b2  |M.N.NM.N.E8..MS.|
00002830  4d 53 aa 4e 4d 3a 43 53  b2 43 53 ab 4e 4d ac 43  |MS.NM:CS.CS.NM.C|
00002840  54 3a 8e 00 74 38 04 0b  99 22 11 41 52 45 20 59  |T:..t8...".ARE Y|
00002850  4f 55 20 57 49 4c 4c 49  4e 47 20 54 4f 20 4d 41  |OU WILLING TO MA|
00002860  4b 45 20 54 48 45 20 50  55 52 43 48 41 53 45 20  |KE THE PURCHASE |
00002870  3f 22 00 92 38 0e 0b a1  41 24 3a 8b 41 24 b3 b1  |?"..8...A$:.A$..|
00002880  22 59 22 af 41 24 b3 b1  22 4e 22 a7 32 38 33 30  |"Y".A$.."N".2830|
00002890  00 a7 38 18 0b 8b 41 24  b2 22 59 22 a7 43 53 b2  |..8...A$."Y".CS.|
000028a0  43 53 ab 43 54 00 b2 38  22 0b 99 22 93 22 3a 8e  |CS.CT..8"..".":.|
000028b0  00 f5 38 2c 0b 99 22 1c  11 11 20 20 20 20 20 20  |..8,.."...      |
000028c0  20 20 43 41 53 48 20 50  4f 53 45 53 53 45 44 20  |  CASH POSESSED |
000028d0  22 3b 43 53 3a 99 22 11  20 20 20 20 20 20 20 20  |";CS:.".        |
000028e0  42 41 4e 4b 20 42 41 4c  41 4e 43 45 20 22 3b 43  |BANK BALANCE ";C|
000028f0  52 3b 22 00 17 39 36 0b  99 22 96 11 11 20 20 20  |R;"..96.."...   |
00002900  20 20 20 20 20 47 4f 4f  44 53 20 50 4f 53 45 53  |     GOODS POSES|
00002910  53 45 44 11 22 00 4c 39  40 0b 81 49 b2 30 a4 36  |SED.".L9@..I.0.6|
00002920  3a 99 22 1e 20 20 20 20  20 20 20 20 22 3b 54 24  |:.".        ";T$|
00002930  28 49 29 3b 22 3a 9a 22  3b 47 44 28 49 2c 30 29  |(I);":.";GD(I,0)|
00002940  aa 47 44 28 49 2c 31 29  3a 82 00 00 00           |.GD(I,1):....|
0000294d

© Dominic Ford 2021–2025.

Our privacy policy is here.
Last updated: 18 Aug 2025, 13:06 UTC
Website designed by .