home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 30 / Tiger_Disk_030_1996-09_Tiger-Crew-Disk_de_Side_B.d64 / ende !!!!!!!!!!! (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1996-01-01  |  626 b   |  17 lines
  1. 10 data162,255,142,032,208,202,165,203
  2. 20 data201,060,240,005,208,244,076,000
  3. 30 data192,96
  4. 40 forn=49152to49169:readw:poken,w:next
  5. 300 printchr$(147):poke53280,11:poke53281,11:printchr$(14)
  6. 302 print"[156][215]as, glaubst [196]u, kommt jetzt noch?":ti$="000002":wait161,1:print"[147]"
  7. 304 poke19,64:print"[200][197]!  [215]arum schweigst [196]u?":poke161,0:poke162,0:wait161,1
  8. 306 print"[147][150]    [215]as ist, weisst [196]u's oder nicht?    ";
  9. 308 ti$="000003":wait161,1
  10. 310 print"[147][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162] [193][200][193]! [162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162][162]";
  11. 312 print"[155]         [196]u weisst es also nicht!      ";:poke161,0:poke162,0:wait161,1
  12. 314 print"[147][153]         nun kommt nur noch das        [146]"
  13. 316 leta$="           [197][159][206][156][196][158][197][129]!"
  14. 318 forl=1to20:letb$=right$(a$,l):printb$
  15. 320 nextl
  16. 350 sys49152
  17.