home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1988 April / 64er_Magazin_88-04_1988_Markt__Technik_de_Side_A.d64 / demo.kopfzeilen (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  568b  |  24 lines
  1. 10 rem demo fuer 'kopfzeilen'
  2. 20 rem
  3. 30 rem (w) bernd schuller 1987
  4. 40 rem
  5. 50 ifa=0thena=1:load"kopfzeilen",8,1
  6. 60 in=49152:of=49152+3
  7. 70 gt=49152+6:zl=49152+9
  8. 80 pokezl,3
  9. 90 poke53280,0:poke53281,0:sys of
  10. 100 print"[147][154]demo fuer das programm 'kopfzeilen'"
  11. 110 print"[154]bis zu [158]drei[154] statuszeilen moeglich !"
  12. 120 fort=0to39:print"*";:next
  13. 130 sys gt:sys in
  14. 140 poke198,0
  15. 150 print"a)[146] durch raster-irq keine speicher-     platzverschwendung"
  16. 160 gosub 230
  17. 170 print"b)[146] betriebssystem kopieren unnoetig !!"
  18. 180 gosub 230
  19. 190 print"c)[146] 1-3 statuszeilen,  flackerfrei"
  20. 200 gosub 230
  21. 210 if peek(198)=0then150
  22. 220 sys of:end
  23. 230 fort=0to100:next:return
  24.