home *** CD-ROM | disk | FTP | other *** search
/ Millennium Time Capsule / AC2000.BIN / disks / ac6_disk / gemma / gemmaacc / autoexec.bas (.txt) next >
Encoding:
Atari STOS Basic  |  1997-06-19  |  1.4 KB  |  39 lines
  1. 10 VARNAME
  2. 100 VARNAME
  3. 110 TRAP
  4. 111 VARNAME
  5. 120 LOKE
  6. 130 REM oke $4CE+4,leek(BSE+12)
  7. 140 REM oke $4CE+8,leek(BSE+16)
  8. 150 REM oke $4CE+12,leek(BSE+20)
  9. 160 REM oke $4CE+16,leek(BSE+24)
  10. 170 REM oke $4CE+20,leek(BSE+28)
  11. 180 REM oke $4CE+24,leek(BSE+32)
  12. 190 VARNAME
  13. 20 VARNAME
  14. 200 VARNAME
  15. 210 TRAP
  16. 220 TRAP
  17. 230 REM dreg(0) contains system memory free
  18. 240 HIDE
  19. 250 REM ode leek(BSE+36)
  20. 251 REM Poke 0 into the malloc buffer of GEMMA acc so it will realise we've nicked it's memory!!!
  21. 252 LOKE
  22. 260 REM attempts to set colours to be like those of the desktop
  23. 270 IF
  24. 280 DATA
  25. 290 IF
  26. 295 REM trap 14,5,.lleek(bse+48),.lleek(bse+44),.w3,.wdeek(bse+66)
  27. 30 VARNAME
  28. 300 REM SET=76
  29. 310 REM or ADDR=$400 to $600 step 4
  30. 320 REM oke (BSE+OSET),ADDR
  31. 330 REM SET=OSET+4
  32. 340 REM ext
  33. 40 KEY
  34. 50 CURS
  35. 60 DIM
  36. 70 VARNAME
  37. 80 VARNAME
  38. 90 VARNAME
  39.