home *** CD-ROM | disk | FTP | other *** search
/ Golden Disk / Golden_Disk_91-08_1991_-_de_Side_A.d64 / merkur.boot (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  1KB  |  25 lines

  1. 0 poke53280,0:poke53281,0:x=x+1
  2. 2 ifx=1thengosub30:load"merkur.base",8,1
  3. 3 ifx=2thengosub40:load"merkur.musc",8,1
  4. 4 ifx=3thengosub50:load"merkur.text",8,1
  5. 6 ifx=4thenload"merkur.pict",8,1
  6. 8 ifx=5thenload"merkur.chrs",8,1
  7. 10 sys49152:poke4121,6:sys4096:sys4096+6:sys49155:sys4096+3
  8. 12 poke53276,0:poke56325,64:poke53277,0:poke53276,0:sys65409
  9. 14 poke53280,0:poke53281,0:print"[147][144]l[207]"chr$(34)"merkur.qbot"chr$(34)",8:":print"r[213]:"
  10. 16 poke631,19:poke632,13:poke633,13:poke198,3:end
  11. 20 open1,8,15,"s:merkur.boot":close1:save"merkur.boot",8:end
  12. 30 print"[151]presents":return
  13. 40 print"[151]>>[152]>>[155]>> operation merkur [155]<<[152]<<[151]<<":return
  14. 50 print"lieber strategiespieler,"
  15. 62 print"da sie den namen unserer firma in diesem";
  16. 64 print"verlag (und natuerlich auch anderswo)"
  17. 66 print"noch oefter hoeren bzw. lesen werden,"
  18. 68 print"moechten wir sie bitten, sich auf"
  19. 70 print"unseren neuen namen einzustellen und den";
  20. 72 print"alten, den sie auch noch teilweise in"
  21. 74 print"diesem spiel finden werden, zu verges-"
  22. 76 print"sen. vielen dank."
  23. 78 print"und hier unser neuer name:"
  24. 80 print"[158]     r.o.m. software developements":return
  25.