home *** CD-ROM | disk | FTP | other *** search
/ 64'er 1994 October / 64er_Magazin_94-10_1994_Markt__Technik_de_Side_A.d64 / ramfree (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  816b  |  26 lines
  1. 100 rem ramfree
  2. 180 printchr$(147)
  3. 190 fori=1to10:print:nexti:printspc(15)"einen moment ..."
  4. 210 rem data-zeilen lesen
  5. 220 s=0:fori=49152to49255
  6. 230 readx:s=s+x:pokei,x:nexti
  7. 240 ifs=11235thengoto290
  8. 250 printchr$(147)
  9. 260 fori=1to5:print:nexti
  10. 270 print"fehler in datazeilen !!!"
  11. 280 print:print"differenz = "11235-s:end
  12. 290 printchr$(147)
  13. 300 fori=1to5:print:nexti
  14. 310 print"bedienung von ramfree:"
  15. 320 print"[195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195][195]"
  16. 340 print:print"einschalten: sys 49152,1
  17. 350 [153]"ausschalten: sys 49152,0
  18. 355 sys49152,1:new
  19. 360 rem assembler-programm
  20. 370 data32,253,174,32,158,183,138,208,11,169,131,141,2,3,169,164,141,3,3
  21. 380 data96,169,31,141,2,3,169,192,141,3,3,96,56,165,55,229,45,170,165,56
  22. 390 data229,46,133,98,134,99,162,144,56,32,73,188,32,221,189,162,0,160,35
  23. 400 data189,1,1,240,16,9,128,153,0,4,173,134,2,153,0,216,200,232,76,58,192
  24. 410 data224,5,208,3,76,131,164,169,32,9,128,153,0,4,173,134,2,153,0,216,200
  25. 420 data232,76,79,192
  26.