home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / commodore-users-of-norman / CUON_xx_(04-1986).d64 / boot-grads (.txt) < prev    next >
Commodore BASIC  |  2019-04-13  |  4KB  |  69 lines
  1. 800 REM "+++ SRT/DATA - SUBROUTINE MACHINE CODES +++"
  2. 900 POKE53280,0:POKE53281,0:PRINT"[147]        LO[159]A[156]DIN[158]G[129] ..."
  3. 910 PRINT"             GR[159]A[156]DS [158]..."
  4. 915 PRINT"                  DR[159]A[156]WIN[158]G[129]-":REM "[149]B[150]O[151]A[152]R[153]D[154] ..."
  5. 920 PRINT"                       B[150]O[151]A[152]R[153]D[154] ..."
  6. 925 PRINT"            * PLEASE WAIT * [146]"
  7. 998 FORI=0TO893:READA:POKE49174+I,A:NEXT
  8. 999 GOTO5000
  9. 1000 DATA169,0,141,18,192,173,0,192,141,19,192,160,0,173,18,192,133,251,173,19
  10. 1010 DATA192,133,252,169,0,145,251,238,18,192,208,3,238,19,192,173,18,192
  11. 1020 DATA201,64,208,225,173,0,192,24,105,31,205,19,192,208,214,96,169,0
  12. 1030 DATA141,18,192,169,4,141,19,192,160,0,173,18,192,133,251,173,19,192
  13. 1040 DATA133,252,173,1,192,145,251,238,18,192,208,3,238,19,192,173,18,192,201
  14. 1050 DATA232,208,224,173,19,192,201,7,208,217,96,173,24,208,9,8,141
  15. 1060 DATA24,208,173,17,208,9,32,141,17,208,96,173,24,208,41,247,141,24
  16. 1070 DATA208,173,17,208,41,223,141,17,208,96,169,0,141,21,192,141,11
  17. 1080 DATA192,32,228,255,201,77,208,6,169,1,141,20,192,96,173,1,220,74,144,28
  18. 1090 DATA74,144,43,74,144,60,74,144,98,74,144,8,169,0,141,17,192,76,77
  19. 1100 DATA193,169,1,141,17,192,76,77,193,168,173,16,192,208,5,169,200,141
  20. 1110 DATA16,192,206,16,192,152,76,187,192,168,173,16,192,201
  21. 1120 DATA199,208,5,169,255,141,16,192,238,16,192,152,76,190,192,168,173,15,192
  22. 1130 DATA240,16,173,14,192,208,5,169,0,141,15,192,206,14,192,76,34,193
  23. 1140 DATA173,14,192,208,245,169,63,141,14,192,169,1,141,15,192,152,76
  24. 1150 DATA193,192,168,173,15,192,240,21,238,14,192,173,14,192,201,64,208,19
  25. 1160 DATA169,0,141,14,192,141,15,192,76,73,193
  26. 1200 DATA238,14,192,208,3,238,15,192,152,76,196,192,169,248,45,14,192,141,2,192
  27. 1210 DATA173,15,192,24,109,0,192,141,3,192,169,7,45,16,192,24,109,2,192
  28. 1220 DATA141,2,192,169,0,141,19,192,160,3,162,5,169,248,45,16,192,141,18
  29. 1230 DATA192,14,19,192,24,14,18,192,144,3,238,19,192,136
  30. 1240 DATA208,25,173,18,192,24,109,2,192,141,2,192,144,3,238,3,192,173,19,192,24
  31. 1250 DATA109,3,192,141,3,192,202,208,213,173,18,192,24,109,2,192,141,2
  32. 1260 DATA192,144,3,238,3,192,173,19,192,24,109,3,192,141,3,192,173,21,192
  33. 1270 DATA240,3,76,115,194,169,1,141,4,192,173,14,192,41,7,141,18,192,169
  34. 1280 DATA7,56,237,18,192,141,18,192,240,11,14,4,192,206,18,192,173,18,192
  35. 1290 DATA208,245,160,0,173,2,192,133,251,173,3,192,133,252,177,251,13,4,192,145
  36. 1300 DATA251,173,17,192,240,1,96,177,251,77,4,192,145,251,96,162,4,32,201
  37. 1310 DATA255,169,8,32,210,255,169,1,141,21,192,169,0,141,9,192,173,9,192
  38. 1320 DATA10,10,10,56,237,9,192,141,10,192,169,0,141,14,192,141,15,192,141
  39. 1330 DATA5,192,169,197,141,12,192,141,6,192,169,1,141,4,192,173,14,192,41
  40. 1340 DATA7,141,18,192,169,7,56,237,18
  41. 1341 DATA192,141,7,192,240,8,14,4,192,206,7,192,208
  42. 1350 DATA248,169,7,141,8,192,173,10,192,141,16,192,169,1,141,13,192,76,77
  43. 1360 DATA193,173,2,192,133,251,173,3,192,133,252,160,0,177,251,45,4,192
  44. 1370 DATA240,33,173,16,192,56,237,10,192,141,18,192,240,11,14,13,192,206
  45. 1380 DATA18,192,173,18,192,208,245,173,13,192,24,109,11,192,141,11,192,238,16
  46. 1390 DATA192,206,8,192,173,8,192,240,3,76,107,194,173,14,192,133,251,173
  47. 1400 DATA12,192,133,252,160,0,169,128,24,109,11,192,145,251,169,0,141,11
  48. 1410 DATA192,238,14,192,173,14,192,208,6,238,15,192,238,12,192,173,15,192
  49. 1420 DATA240,7,173,14,192,201,64,240,3,76,64,194,160,0,173,5,192,133,251
  50. 1430 DATA173,6,192,133,252,177,251,32,210,255,238,5,192,208,3,238,6,192,173,5
  51. 1440 DATA192,201,64,208,224,173,6,192,201,198,208,217,169,13,32,210,255
  52. 1450 DATA238,9,192,173,9,192,201,29,240,3,76,32,194,96,169,1,141,8,192
  53. 1460 DATA169,17,32,210,255,169,62,32,210,255,206,8,192,32,228,255,201,0
  54. 1470 DATA240,249,201,13,240,27,201,20,240,235,201,157,240,231,174,8,192,157,0
  55. 1480 DATA196,32,210,255,238,8,192,173,8,192,201,18,208,218,173,8,192,162
  56. 1490 DATA0,160,196,32,189,255,169,5,162,8,160,1,32,186,255,173,19,192
  57. 1500 DATA240,21,169,0,133,251,173,0,192,133,252
  58. 1510 DATA24,105,31,168,162,63,169,251,32,216,255,96,169,0,162,255,160
  59. 1520 DATA255,32,213,255,96
  60. 1700 REM ++++ RUN MAG - 10/85 ++++++++++
  61. 1710 REM ++++ THIS PRG GOES WITH -------
  62. 1720 REM ++++ THE 'GRADS' PROGRAM ------
  63. 5000 D$=CHR$(17)
  64. 5030 R$=CHR$(147)+D$+D$+D$+"LOAD"
  65. 5040 N$=CHR$(34)+"GRADS"+CHR$(34)
  66. 5050 PRINTR$+N$+",8"+D$+D$
  67. 5060 PRINT D$+D$+"RUN"+CHR$(19)
  68. 5070 POKE198,2:POKE631,13:POKE632,13
  69.