home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / commodore-scene-files / Seriousutility / Compresion / TOOLS.D81 / superramtest (.txt) < prev    next >
Encoding:
Commodore BASIC  |  2019-04-13  |  3.6 KB  |  114 lines
  1. 5 PRINT"[147]":POKE53280,0:POKE53281,0:IFPEEK(65533)=255THEN(null)&:IFPEEK(215)=128THEN(null)20,0,59,24
  2. 10 PRINT CHR$(14)"[147]    [195][205][196] [211]UPER[195][208][213] [211]UPER[210][193][205][160][212]EST [214]1.00"
  3. 20 PRINT"[154]           (C) 1997 [195][205][196], [201]NC.
  4. 22 [153]" TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANSYS"
  5. 24 SA[178][194](174)[170][194](175)[172]256[171]3
  6. 25 [158] SA
  7. 30 ML[178]3[172]4096:SB[178]250:RS[178]251
  8. 31 Z0[178]251:ZF[178]252:O0[178]253:OF[178]254
  9. 32 H$[178]"0123456789ABCDEF"
  10. 34 T$(0)[178]"9/9":T$(1)[178]"10/10":T$(2)[178]"11/10":T$(3)[178]"12/10":T$(4)[178]"11/11"
  11. 42 [139][182](([194](53433)[175]128)[178]128)[178]1[167]1140
  12. 44 [158] ML[170]18:[139][194](SB)[179][177]0[167]1000
  13. 50 :
  14. 52 [141]1200:[158] ML
  15. 62 [139][194](53887)[178]0[167]2000
  16. 64 SZ[178][181]([194](53887)[173]16)
  17. 66 [139]SZ[178]15[167]SZ[178]16
  18. 68 [141]1100
  19. 70 :
  20. 100 [153]"OPEN (null)ESTING PEEKIT ASCILL (null)ATTERN      : ";
  21. 101 [129]I[178]0[164]255 [169] 17:[151]SB,I
  22. 102 LN$[178][202](H$,(I[175]15)[170]1,1):HN$[178][202](H$,[181](I[173]16)[170]1,1)
  23. 103 [153]"CMDCMDCMDCMDCMDCMDCMD("HN$LN$") : ";
  24. 104 [158] ML[170]9:[139][194](SB)[179][177]0[167]1500
  25. 105 [130]
  26. 106 [153]"(null)(null)"
  27. 107 :
  28. 120 [153]"OPEN (null)ESTING PEEKLOCK/(null)AGE ATNDDRESSING : ";
  29. 122 [158] ML[170]3:[139][194](SB)[179][177]0[167]1500
  30. 124 [153]"(null)(null)"
  31. 126 :
  32. 130 [153]"OPEN (null)ESTING PEEKYTE ATNDDRESSING       : ";
  33. 140 [158] ML[170]6:[139][194](SB)[179][177]0[167]1500
  34. 142 [153]"(null)(null)"
  35. 149 :
  36. 180 [153]"OPEN (null)ESTING LENPEEK(null) (null)EFRESH RIGHT$NTEGRITY : ";
  37. 181 [151]SB,170:[158] ML[170]12
  38. 182 TI$[178]"000000"
  39. 183 T[178][181](TI[173]60):[139]T[179]10[167]183
  40. 184 [158] ML[170]15:[139][194](SB)[179][177]0[167]1500
  41. 186 [153]"(null)(null)"
  42. 187 :
  43. 200 [153]"SYS (null)EST (null)UCCESSFUL! (null)O VALRRORS VALNCOUNTERED"
  44. 900 [153]:[137]1600
  45. 999 :
  46. 1000 [153]"SYS VAL(null)(null)(null)(null): (null)HE (null)(null)(null) IN YOUR (null)UPERLEN(null)(null) DOES  "
  47. 1010 [153]" NOT INCLUDE SUPPORT FOR THE (null)UPER(null)ATN(null)  "
  48. 1012 [153]" LENARD. (null)LEASE INSTALL THE UPDATED (null)(null)(null)  "
  49. 1014 [153]" INCLUDED IN THE (null)UPER(null)ATN(null) LENARD PACKAGE"
  50. 1016 [153]" BY FOLLOWING THE INSTRUCTIONS FOUND IN"
  51. 1018 [153]" THE (null)UPER(null)ATN(null) LENARD MANUAL.             "
  52. 1020 [153]:[137]1600
  53. 1099 :
  54. 1100 [153]"SYS (null)RIGHT$(null)(null) LENAPACITY:";
  55. 1110 I[178][194](53883)
  56. 1120 [153] SZ"CMD(null)PEEK  SYSATNDDRESSING: "T$(I)
  57. 1122 [153]" TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTAN"
  58. 1130 [142]
  59. 1139 :
  60. 1140 [153]"SYS VAL(null)(null)(null)(null): LEN(null)STR$ (null)UPERLEN(null)(null) NOT FOUND! (null)OU"
  61. 1150 [153]" MUST HAVE YOUR (null)UPERLEN(null)(null) INSTALLED AND"
  62. 1152 [153]" ENABLED IN ORDER TO RUN THIS TEST."
  63. 1160 [153]:[137]1600
  64. 1169 :
  65. 1199 :
  66. 1200 [153]"SYS (null)ATN(null)(null)RIGHT$(null)CHR$: ATNNY DATA OR PROGRAMS LOCATED"
  67. 1210 [153]" IN THE (null)UPER(null)ATN(null) LENARD WILL BE ERASED!"
  68. 1212 [153]" LENONTINUE? (Y/N)"
  69. 1220 [161]A$:[139]A$[178]""[167]1220
  70. 1230 [139]A$[179][177]"Y"[167][137]1600
  71. 1240 [153]"                                       "
  72. 1250 [153]"                                       "
  73. 1252 [153]"                                       "
  74. 1254 [153]"                                       "
  75. 1260 [142]
  76. 1299 :
  77. 1500 [153]"VALRROR!"
  78. 1510 [153]"SYS (null)HE (null)UPER(null)ATN(null) CARD OR (null)RIGHT$(null)(null) MAY NOT BE"
  79. 1520 [153]" SEATED PROPERLY. RIGHT$F YOU INSTALLED  "
  80. 1530 [153]" YOUR OWN (null)RIGHT$(null)(null), MAKE SURE IT IS ASCAST   "
  81. 1540 [153]" (null)AGE (null)ODE TYPE (NOTCLOSEVALSTR$(null)). LENONSULT THE "
  82. 1550 [153]" (null)UPER(null)ATN(null) DOCUMENTATION FOR MORE       "
  83. 1560 [153]" INFORMATION.                        "
  84. 1590 [153]
  85. 1600 [153]" (null)RESS <(null)VAL(null)(null)(null)(null)> TO END PROGRAM"
  86. 1610 [161]A$:[139]A$[179][177][199](13)[167]1610
  87. 1620 [153]"LOAD"
  88. 1630 [162]
  89. 1699 :
  90. 2000 [153]"SYS VAL(null)(null)(null)(null): (null)O EXPANDED MEMORY FOUND! "
  91. 2010 [137]1510
  92. 2012 V[178][181]([194](Z0)[173]16):[141]2100:Z0$[178]V$
  93. 2013 V[178][194](Z0):[141]2100:Z1$[178]V$
  94. 2014 V[178][181]([194](O0)[173]16):[141]2100:Z2$[178]V$
  95. 2015 V[178][194](O0):[141]2100:Z3$[178]V$
  96. 2016 V[178][181]([194](ZF)[173]16):[141]2100:Z4$[178]V$
  97. 2017 V[178][194](ZF):[141]2100:Z5$[178]V$
  98. 2018 V[178][181]([194](OF)[173]16):[141]2100:Z6$[178]V$
  99. 2019 V[178][194](OF):[141]2100:Z7$[178]V$
  100. 2020 [153]"           7654    3210    7654    3210"
  101. 2024 [153]"           ----    ----    ----    ----"
  102. 2026 [153]" WROTE  U4:0000 U2:0000 U5:0000 U3:0000"
  103. 2030 [153]" READ   U4:"Z0$" U2:"Z1$" U5:"Z2$" U3:"Z3$
  104. 2042 [153]
  105. 2050 [153]" WROTE  U4:1111 U2:1111 U5:1111 U3:1111"
  106. 2060 [153]" READ   U4:"Z4$" U2:"Z5$" U5:"Z6$" U3:"Z7$
  107. 2070 [137]1510
  108. 2099 :
  109. 2100 V$[178]"":[129]J[178]0[164]3
  110. 2110 [139](V[175](2[174]J))[179][177]0[167]V$[178]"1"[170]V$:[137]2130
  111. 2120 V$[178]"0"[170]V$
  112. 2130 [130]
  113. 2140 [142]
  114.