home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh2x / sh25.d64 / ultraformat (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  6KB  |  145 lines

  1. 0 REM
  2. 100 REM"[141][142]
  3. 102 [143]"(null)TANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANTANRIGHT$
  4. 103 REM"[221]         WRITTEN BY          [221]
  5. 104 [143]"(null)RALPH GAUER                  (null)
  6. 105 REM"[221]WEILERSTR. 8                 [221]
  7. 106 [143]"(null)7968 WILFERTSWEILER          (null)
  8. 107 REM"[171][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179]
  9. 108 [143]"(null)DATUM: 17. JUNI 1987         (null)
  10. 109 REM"[202][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][203]
  11. 110 [153]"LOAD"[199](142):[151]53280,0:[151]53281,0
  12. 112 [143]                                 ************* ENTSCHEIDUNG *************
  13. 114 GG$(0)[178]"GANZE DISKETTE FORMATIERENWAIT"
  14. 116 GG$(1)[178]"NUR SPUR 36-41 FORMATIERENWAIT"
  15. 118 GG[178]0:[153]GG$(0);GG$(1)
  16. 120 [153]"AUSWAHL MIT CURSORTASTEN UND [RETURNWAIT]"
  17. 122 [153]""GG$(GG)
  18. 124 [146]198,1:[161]GG$
  19. 126 [139]GG$[178][199](13)[167]136
  20. 128 [139]GG$[178]""[167][139]GG[178]0[167][153]GG$(GG):GG[178]1:[137]122
  21. 130 [139]GG$[178]"ON"[167][139]GG[178]1[167][153]GG$(GG):GG[178]0:[137]122
  22. 132 [137]124
  23. 134 [143]                                 ************* INITIALISIERUNG **********
  24. 136 [159]1,8,15,"UI"
  25. 138 [150][165]HI(X)[178][181](X[173]256):[150][165]LO(X)[178][181](X[171][165]HI(X)[172]256)
  26. 140 [145]GG[137]200
  27. 142 [143]                                 ************* NORMAL FORMATIEREN *******
  28. 144 I$[178]"":[153]I$"                                        ";
  29. 146 II$[178]I$[170]"DISKETTENNAME: ":[153]II$"                WAIT"
  30. 148 [153]II$"TAN";:NA$[178]""
  31. 150 [146]198,1:[161]O$:[151]198,0
  32. 152 [139]O$[178][199](13)[175]NA$[179][177]""[167]164
  33. 154 [139]O$[178][199](20)[176]O$[178]"CMD"[167]146
  34. 156 [139][198](O$)[177]31[175][198](O$)[179]128[175][195](NA$)[179]16[167]NA$[178]NA$[170]O$
  35. 158 [139][198](O$)[177]159[175][195](NA$)[179]16[167]NA$[178]NA$[170]O$
  36. 160 [153]II$""NA$"WAIT";:[139][195](NA$)[179]16[167][153]"TAN";
  37. 162 [137]150
  38. 164 [153]II$NA$"               ":[153]II$"TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB("
  39. 166 I$[178]"":[153]I$"                                        ";
  40. 168 II$[178]I$[170]"DISKETTEN-ID: ":[153]II$"     WAIT"
  41. 170 [153]II$"TAN";:DI$[178]""
  42. 172 [146]198,1:[161]O$:[151]198,0
  43. 174 [139]O$[178][199](13)[175]DI$[179][177]""[167]DI$[178]DI$[170]"    ":DI$[178][200](DI$,5):[137]186
  44. 176 [139]O$[178][199](20)[176]O$[178]"CMD"[167]168
  45. 178 [139][198](O$)[177]31[175][198](O$)[179]128[175][195](DI$)[179]5[167]DI$[178]DI$[170]O$
  46. 180 [139][198](O$)[177]159[175][195](DI$)[179]5[167]DI$[178]DI$[170]O$
  47. 182 [153]II$""DI$"WAIT";:[139][195](DI$)[179]5[167][153]"TAN";
  48. 184 [137]172
  49. 186 [153]II$DI$:[153]II$"TAB(TAB(TAB(TAB(TAB(":ID$[178][200](DI$,2)
  50. 188 [152]1,"N:"[170]NA$[170]","[170]ID$
  51. 190 [159]2,8,2,"#2"
  52. 192 [152]1,"U1"2;0;18;0
  53. 194 [152]1,"B-P"2;162:[152]2,DI$;
  54. 196 [152]1,"U2"2;0;18;0:[160]2
  55. 198 [143]                                 ************ VORBEREITUNG **************
  56. 200 [152]1,"M-W"[199](81)[199](0)[199](1)[199](255):[152]1,"I"
  57. 202 [152]1,"M-W"[199](8)[199](0)[199](2)[199](36)[199](0)
  58. 204 [143]                                 ************ UEBERTRAGUNG **************
  59. 206 [129]X[178]1024[164]1024[170]32:[135]A:[152]1,"M-W"[199]([165]LO(X))[199]([165]HI(X))[199](1)[199] (A)
  60. 208 [130]
  61. 210 [143]                                 ************ FORMATIERE ****************
  62. 212 [152]1,"M-W"[199](1)[199](0)[199](1)[199](224)
  63. 214 [143]                                 ************ WARTEN ********************
  64. 216 [152]1,"M-R"[199](1)[199](0)[199](1):[161]#1,A$:[139][198](A$[170][199](0))[177]127[167]216
  65. 218 [143]                                 ************ FORMAT-DATAS **************
  66. 220 [131]165, 81,201,255,240, 24,165, 81,201,  1,208,  6,169, 18,133, 81,133, 34
  67. 222 [131]165, 81,201, 25,208,  6,169, 36,133, 81,133, 34, 76,199,250
  68. 224 [143]                                 ************ TWO BUMPS *****************
  69. 226 [129]BU[178]1[164]2:[152]1,"M-W"[199](0)[199](0)[199](1)[199](192)
  70. 228 [152]1,"M-R"[199](0)[199](0)[199](1):[161]#1,A$:[139][198](A$[170][199](0))[177]127[167]228
  71. 230 [130]
  72. 232 [143]                                 ************ SPURSCHALTPROGRAMME *******
  73. 234 [137]254
  74. 236 [152]1,"M-W"[199](6)[199](0)[199](2)[199](1)[199](0)
  75. 238 [152]1,"M-W"[199](0)[199](0)[199](1)[199](128)
  76. 240 [152]1,"M-R"[199](0)[199](0)[199](1):[161]#1,A$:[139][198](A$[170][199](0))[177]127[167]240
  77. 242 [142]
  78. 244 [141]236:[152]1,"M-W"[199](6)[199](0)[199](2)[199](36)[199](0)
  79. 246 [152]1,"M-W"[199](0)[199](0)[199](1)[199](176)
  80. 248 [152]1,"M-R"[199](0)[199](0)[199](1):[161]#1,A$:[139][198](A$[170][199](0))[177]127[167]248
  81. 250 [142]
  82. 252 [143]                                 ************ DIRECTORY GENERATOR *******
  83. 254 [141]236:[159]2,8,2,"#2"
  84. 256 [152]1,"U1"2;0;18;0
  85. 258 [129]X[178]4[164]71:[152]1,"B-P"2;X
  86. 260 [152]2,[199](0);:[130]
  87. 262 [152]1,"B-P"2;72:[152]2,[199](17)[199](252)[199](255)[199](7);:
  88. 264 [129]X[178]76[164]95[169]4:[152]1,"B-P"2;X
  89. 266 [152]2,[199](19)[199](255)[199](255)[199](7);:[130]
  90. 268 [129]X[178]96[164]143:[152]1,"B-P"2;X
  91. 270 [152]2,[199](0);:[130]
  92. 272 [152]1,"B-P"2;162:[152]2,"OBEN ";
  93. 274 [141]244:[152]1,"U2"2;0;18;0
  94. 276 [141]236
  95. 278 [143]                                 ************ TEXT GENERIEREN ***********
  96. 280 [152]1,"U1"2;0;18;1
  97. 282 [141]244
  98. 284 [129]X[178]0[164]255:[152]1,"B-P"2;X:[152]2,[199](0);:[130]
  99. 286 [152]1,"B-P";2;0
  100. 288 [152]2,[199](0)[199](255)[199](192)[199](0)[199](0)"NICHT VALIDIEREN";
  101. 290 [152]1,"U2"2;0;18;1
  102. 292 [160]2:[141]236:[152]1,"I"
  103. 294 [143]                                 ************ DISKSWITCH C000 ***********
  104. 296 [159]2,8,2,"DISKSWITCH C000,P,W"
  105. 298 [132]1,A,B$,C,D:[139]A[179][177]0[167][160]2:[160]1:[153]A;B$;C;D:[128]
  106. 300 [152]2,[199]([165]LO(49152))[199]([165]HI(49152));
  107. 302 [129]X[178]0[164]195:[135]A:[152]2,[199](A);:[130]
  108. 304 [160]2
  109. 306 [132]1,A,B$,C,D:[139]A[179][177]0[167][160]2:[160]1:[153]A;B$;C;D:[128]
  110. 308 [143]                                 ************ DISKSWITCH 033C ***********
  111. 310 [159]2,8,2,"DISKSWITCH 033C,P,W"
  112. 312 [132]1,A,B$,C,D:[139]A[179][177]0[167][160]2:[160]1:[153]A;B$;C;D:[128]
  113. 314 [152]2,[199]([165]LO(828))[199]([165]HI(828));
  114. 316 [129]X[178]0[164]195:[135]A:[152]2,[199](A);:[130]
  115. 318 [160]2
  116. 320 [143]                                 ************ ENDE **********************
  117. 322 [132]1,A,B$,C,D:[153]A;B$;C;D
  118. 324 [160]1
  119. 326 [143] VON 49152 BIS 49347             ************ DS C000 DATA **************
  120. 328 [131]169, 11,141, 24,  3,169,192,141, 25,  3, 96,120,169,161,141, 24,  3
  121. 330 [131]169,  2,133,183,169, 20,133,184,169, 15,133,185,169,  8,133,186,169
  122. 332 [131]193,133,187,169,192,133,188, 32,192,255,169, 20, 32,195,255,173,162
  123. 334 [131]192,240, 11, 32,109,192,169,  0,141,162,192, 76,142,192, 32, 76,192
  124. 336 [131]169,  1,141,162,192, 76,142,192,169,  9,133,183,169,163,133,187, 32
  125. 338 [131]192,255,169, 20, 32,195,255,169,  8,133,183,169,171,133,187, 32,192
  126. 340 [131]255,169, 20, 32,195,255, 96,169,  9,133,183,169,178,133,187, 32,192
  127. 342 [131]255,169, 20, 32,195,255,169,  8,133,183,169,186,133,187, 32,192,255
  128. 344 [131]169, 20, 32,195,255, 96,169,  2,133,183,169,193,133,187, 32,192,255
  129. 346 [131]169, 20, 32,195,255, 32,  0,192, 64,  1, 77, 45, 87,  6,  0,  2, 36
  130. 348 [131]  0, 77, 45, 87,  0,  0,  1,176, 77, 45, 87,  6,  0,  2,  1,  0, 77
  131. 350 [131] 45, 87,  0,  0,  1,128, 73, 68, 78
  132. 352 [143] VON 828 BIS 1023                ************ DS 033C DATA **************
  133. 354 [131]169, 71,141, 24,  3,169,  3,141, 25,  3, 96,120,169,221,141, 24,  3
  134. 356 [131]169,  2,133,183,169, 20,133,184,169, 15,133,185,169,  8,133,186,169
  135. 358 [131]253,133,187,169,  3,133,188, 32,192,255,169, 20, 32,195,255,173,222
  136. 360 [131]  3,240, 11, 32,169,  3,169,  0,141,222,  3, 76,202,  3, 32,136,  3
  137. 362 [131]169,  1,141,222,  3, 76,202,  3,169,  9,133,183,169,223,133,187, 32
  138. 364 [131]192,255,169, 20, 32,195,255,169,  8,133,183,169,231,133,187, 32,192
  139. 366 [131]255,169, 20, 32,195,255, 96,169,  9,133,183,169,238,133,187, 32,192
  140. 368 [131]255,169, 20, 32,195,255,169,  8,133,183,169,246,133,187, 32,192,255
  141. 370 [131]169, 20, 32,195,255, 96,169,  2,133,183,169,253,133,187, 32,192,255
  142. 372 [131]169, 20, 32,195,255, 32, 60,  3, 64,  1, 77, 45, 87,  6,  0,  2, 36
  143. 374 [131]  0, 77, 45, 87,  0,  0,  1,176, 77, 45, 87,  6,  0,  2,  1,  0, 77
  144. 376 [131] 45, 87,  0,  0,  1,128, 73, 68,  0
  145.