home *** CD-ROM | disk | FTP | other *** search
- 0 :FORD=1TO100*A:NEXT:IFA>0THEN RETURN: :*:*:*:*:*:*:*:*:*:*:*:*:*:*:*:*:*:*:
- 2 REM"[141][145] [154]::::::::::::::::::::::::::::::::::::::
- 4 [143]"GOSUBON CONT:::::: ::::::
- 6 REM"[141][145] [154]:::::: [150][193] [211][212][213][208][201][196] CARTOON.... [154]::::::
- 8 [143]"GOSUBON CONT:::::: ::::::
- 10 REM"[141][145] [154]:::::: [150][194]Y THAT STUPID JERK - [154]::::::
- 12 [143]"GOSUBON CONT:::::: ::::::
- 14 REM"[141][145] [154]:::::: [150][202]IM [199]REEN, WHO DOSN'T [154]::::::
- 16 [143]"GOSUBON CONT:::::: ::::::
- 18 REM"[141][145][154] :::::: [150]KNOW ANY BETTER! [154]::::::
- 20 [143]"GOSUBON CONT:::::: ::::::
- 22 REM"[141][145] [154]::::::::::::::::::::::::::::::::::::::[154]
- 24 Z[178]828:[129]J[178]Z[164]843:[135]X:[151]J,X:[130]
- 26 [131] 32,155,183,138,72,32,155,183,104,170,164,101,24,76,240,255
- 28 [153]"LOADRETURN":[151]53280,11:[151]53281,11:[158]Z,8,0:S[178]54272:[141]162
- 30 [158]Z,15,7:[153]"THE GREAT ADVENTURE OF....
- 32 PRINT" AMIGA, THE SEXY LITTLE AMOEBA.":A=40:GOSUB:PRINT"[147]"
- 34 SYSZ,20,0:GOSUB162
- 36 R$="[157][157][157][157][157][157][157][157]":J$=R$+"[157]":S$=J$+"[157][157]":W$=S$+"[157][157]":V$=W$+"[157][157]"
- 38 A$=" "+S$+" [213][196][201] [213][196][196][201] "+S$+" [213][203] [202][198][203][160][160][200] "+S$+" [200] [150][209] [213][203] "+S$
- 40 A$=A$+" [202][198][198][201] [200] "+S$+" [202][198][210][198][203] "+S$+" "
- 42 C$=" "+W$+" [213][201][213][201] [213][201] "+W$+" [213][198][203][202][203][199][213][196][203][200] "+W$+" [199] [202][203] [200] "
- 44 C$=C$+W$+" [202][198][201] [150][209][192][209] [202][201] "+W$+" [199] [213][201] [200] "+W$+" [202][198][198][203][202][198][210][198][203] "+W$
- 46 C$=C$+" ":
- 48 B$=" "+W$+" [213][201] [213][201] [213][201] "+W$+" [213][196][203][202][198][203][202][198][203][199] "+W$+" [202][201] [202][201] "
- 50 B$=B$+W$+" [202][201] [150] [215]-[215] [213][203] "+W$+" [200] [213][201] [202][201] "+W$+" [202][198][210][198][203][202][198][198][203] "+W$
- 52 B$=B$+" "
- 54 N$=" "+S$+" [213][201] [213][196][201] "+S$+" [213][196][203][202][198][203] [202][201] "+S$+" [202][201] [150][209] [200] "+S$
- 56 N$=N$+" [202][198][201] [213][198][203] "+S$+" [202][198][198][203] "+S$+" "
- 58 E$=" "+V$+" [213][196][196][201] [213][196][196][201] "+V$+" [200] [202][201] [213][203] [160][202][192][201] "+V$
- 60 E$=E$+" [202][201] [202][198][203] [150][215] [200] "+V$+" [213][203] [150]- [213][203] "+V$+" [202][201] [150][215] [213][196][201] [200] "
- 62 E$=E$+V$+" [202][198][210][198][203] [202][198][210][198][203] "+V$+" "
- 64 F$=" "+V$+" [213][196][197][196][201] [213][196][197][197][196][201] "+V$+" [199] [202][198][203] [160] [200] "+V$
- 66 F$=F$+" [202][201] [150][209] [202][201] "+V$+" [199] [150][209] [213][198][203] "+V$+" [200] [213][201] [200] "
- 68 F$=F$+V$+" [202][198][192][198][192][203][202][198][198][203] "+V$+" "
- 70 G$=" "+R$+" [213][196][196][201] "+R$+" [199] [202][201] "+R$
- 72 G$=G$+" [202][201] [202][201] "+R$+" [213][203] [150][215] [200] "+R$+" [202][201] [199] "+R$
- 74 G$=G$+" [160][202][198][210][198][203] "+R$+" "
- 76 I$=" "+J$+" [213][196][196][201] "+J$+" [213][203] [202][192][201] "+J$
- 78 I$=I$+" [202][201] [200] "+J$
- 80 I$=I$+" [213][203] [150][215] [213][203] "+J$+" [202][201] [200] "+J$+" [202][198][210][198][203] "+J$+" "
- 82 K$=" "+R$+" [213][196][201] "+R$+" [202][201][202][198][201] "+R$
- 84 K$=K$+" [213][203] [202][201] "+R$+" [199] [150][215][213][203] "+R$+" [202][201][213][201][202][201] "+R$
- 86 K$=K$+" [160][202][203][202][198][203] "+R$+" "
- 88 L$=" "+J$+" [213][196][201] "+J$+" [213][203] [202][196][201] "+J$+" [199] [150][215] [200] "+J$
- 90 L$=L$+" [202][201] [202][201] "+J$+" [213][203][213][196][201][213][203] "+J$+" [202][198][203] [202][203] "+J$+" "
- 92 GOSUB172:X=4:FORT=1TO11:SYSZ,5,X:PRINTA$:A=1.5:GOSUB:X=X+1
- 94 IFT=1THENPRINT""TAB(16)"[158]AAH! AAH!
- 96 [139]T[178]3[167][153]""[163]16)"SYSOOO-AHH! "
- 98 [139]T[178]7[167][153]""[163]15)"OPENOOH! OOH!
- 100 IFT=10THENPRINT""TAB(13)"[150]UH!UH!UHH!!
- 102 [158]Z,4,X:[153]N$:[141]:X[178]X[170]1:[130]
- 104 [153]"SYS GEE! I'M FEELING A BIT ROMANTIC!CONT"
- 106 X[178]26:[129]T[178]1[164]7:[158]Z,5,X:[153]A$:A[178]2:[141]:X[178]X[171]1
- 108 [158]Z,5,X:[153]N$:[141]:X[178]X[171]1:[130]
- 110 [151]781,1:[158]59903:[158]Z,6,14:[153]N$:[141]:[158]Z,9,19:[153]"DEF(null) (null)":A[178]3:[141]
- 112 A[178]2.5:[129]T[178]1[164]6
- 114 [139][181](T[173]2)[178]T[173]2[167][158]Z,6,13:[153]C$:[141]:[158]Z,5,12:[153]B$:[137]118
- 116 [158]Z,6,12:[153]C$:[141]:[158]Z,5,13:[153]B$
- 118 [139]T[178]3[167][158]Z,15,3:[153]"DEFI'M SO EXCITED I COULD JUST SPLIT!
- 120 GOSUB:NEXT
- 122 H=11:FORT=1TO10:SYSZ,5,H:PRINTE$:A=2:GOSUB:POKE781,15:SYS59903
- 124 SYSZ,5,H:PRINTF$:H=H+1:GOSUB:NEXT
- 126 H=19:FORT=1TO8:SYSZ,5,H:PRINTF$:GOSUB
- 128 SYSZ,5,H:PRINTE$:H=H-1:GOSUB:NEXT
- 130 SYSZ,8,17:PRINT"[200] [199][157][157][157][202][201][200][157][157][199][202]":GOSUB:I=11:H=19:FORT=1TO7
- 132 IFINT(T/2)=T/2THENSYSZ,4,I:PRINTG$:GOSUB:SYSZ,5,I-1:PRINTK$:GOTO136
- 134 SYSZ,5,I:PRINTG$:GOSUB:SYSZ,4,I-1:PRINTK$
- 136 GOSUB
- 138 IFINT(T/2)<>T/2THENSYSZ,5,H:PRINTI$:A=1:GOSUB:SYSZ,4,H+1:PRINTL$:GOTO142
- 140 SYSZ,4,H:PRINTI$:GOSUB:SYSZ,5,H+1:PRINTL$
- 142 GOSUB:H=H+1:I=I-1:NEXT
- 144 FORT=1TO10:SYSZ,4,4:PRINTG$:GOSUB:SYSZ,5,25:PRINTI$:GOSUB
- 146 PRINT"[150]HOW' BOUT IT BABY... "
- 148 PRINT"[158]WAS IT AS GOOD FOR ME AS IT WAS FOR ME!":GOSUB
- 150 SYSZ,5,5:PRINTK$:GOSUB:SYSZ,4,26:PRINTL$:GOSUB:IFT>7THENGOSUB172
- 152 NEXT:POKES+4,130:GOSUB:PRINT"[150]"
- 154 PRINT" SEE AMIGA AGAIN OR LET HIM GO A/G [163] [163]
- 156 [161]G$:[139]G$[179][177]"A"[175]G$[179][177]"G"[167]156
- 158 [139]G$[178]"A"[167][138]
- 160 A[178]30:[139]G$[178]"G"[167] [141]:[151]53280,14:[151]53281,6:[153]"LOADCONT"
- 161 [128]
- 162 [153]"OPENORTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN^";
- 164 [153]"(null) DEF WAITUSR(null) WAIT(null)(null) WAITUSR(null) WAITUSR(null) WAITUSR(null) WAITUSR(null) OPEN(null)";
- 166 [153]"(null) SYS WAITDEFANDSQR SYS WAITDEFTHENTHEN SYS WAIT DEFTHEN SYS WAITDEFAND SYS WAITDEFANDSQR SYS WAITDEFANDSQR OPEN(null)";
- 168 [153]"(null) DEF WAIT THEN WAITTHENTHEN WAITANDSQR WAITANDSQR WAITANDSQR WAIT THEN OPEN(null)";
- 170 [153]"/TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANEXPCMDSAVETAN";:[142]
- 172 [151]S,20:[151]S[170]1,5:[151]S[170]23,1
- 174 [151]S[170]24,79:[151]S[170]5,15:[151]S[170]6,246:[151]S[170]15,30:[151]S[170]14,30
- 176 [129]TS[178]1[164]4:[151]S[170]4,131:[129]F[178]250[164]50[169][171]1.5:[151]S[170]22,F:[151]S[170]1,F:[130]:[142]
-