home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disc 8 / Commodore_Disc_08_19xx_-_de.d64 / titelbild (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1990-01-01  |  1.3 KB  |  30 lines
  1. 1000 poke53280,0:poke53281,0:print"[147]"
  2. 1010 printtab(5)"[145][169][223]";spc(25)"[169][223]"
  3. 1020 printtab(4)"[169]  [223]";spc(23)"[169]  [223]"
  4. 1030 printtab(3)"[169]    [223]";spc(21)"[169]    [223]"
  5. 1040 printtab(2)"[169]      [223]";spc(19)"[169]      [223]"
  6. 1050 printtab(1)"@ [146][166][166]  [146][166][166] [146][191]";spc(17)"@ [146][166][166]  [146][166][166] [146][191]"
  7. 1060 printtab(2)" [146][166][166]  [146][166][166] [149]                    [146][166][166]  [146][166][166] "
  8. 1070 printtab(2)"        [149]                           "
  9. 1080 printtab(2)"        [149]                           "
  10. 1090 printtab(2)" [146][166][166]  [146][166][166]                     [146][166][166]  [146][166][166] "
  11. 1110 printtab(2)" [146][166][166]  [146][166][166]  [146][166][166]  [146][166][166] [146][166][166]  [146][166][166]  [146][166][166]  [146]";
  12. 1115 print"[166][166]  [146][166][166] "
  13. 1120 printtab(2)"         [146][166][166]  [146][166][166] [146][166][166]  [146][166][166]  [146][166][166]         "
  14. 1130 printtab(2)"                                   "
  15. 1140 print" [146][166] [146][149][167][168] [146][166]  [146][166][166]  [146][166][166] [146][166][166]  [146][166][166]  [146][166][166]  [146]";
  16. 1145 print"[166][146] [146][149][167][168] [146][166] [146]"
  17. 1150 print" [146][166] [146][149][167][168] [146][166]  [146][166][166]  [146][166][166] [146][166][166]  [146][166][166]  [146][166][166]  [146]";
  18. 1155 print"[166][146] [146][149][167][168] [146][166] [146]"
  19. 1160 printtab(2)"   [146][149][167][168]                         [146][149][167][168]   "
  20. 1170 print"von stefan bels , uelzen 1"
  21. 1200 print"[155]    [146][182]         [146][180] [146][182]       "
  22. 1210 print"  [146][183]      [146][183]    "
  23. 1220 print"  [146][184]      [146][181] [146][184]     "
  24. 1230 print"  [146][185]    [146][188][187] [146][185]    "
  25. 1240 print"    [146][186]      [146][190][189] [146][186]    "
  26. 1250 geta$:ifa$<>" "then1250
  27. 2500 print"[147][144]load"chr$(34)"internat.prg"chr$(34)",8"
  28. 2510 print"run"
  29. 2520 fori=636to640:pokei,13:nexti:poke198,10
  30.