💾 Archived View for mirrors.apple2.org.za › archive › ground.icaen.uiowa.edu › Emulators › Old.files… captured on 2023-01-29 at 09:26:08.
-=-=-=-=-=-=-
ADTCK (ADT CHECK)
for ADT versions 1.21 and 1.22 and ADTGS versions .90 and .91
Usually, the transfer of the Apple II ADT program from
the PC-- the transfer you do at 300 baud-- will go fine and
ADT will get BSAVED and work like it should.
In case ADT does not seem to be working correctly, you
may want to check that the transferred program was not
corrupted. ADTCK is a short program you can type in and run
to check that you have a good copy of ADT on your Apple II.
Type in the program below and save it as ADTCK on the same
disk as ADT. Then, RUN ADTCK and check the numbers you get
against the checksums listed after the program. (The program
displays intermediate sums and a final sum.)
10 TEXT : HOME
20 PRINT CHR$ (4)"BLOAD ADT,A$4000"
40 FOR I = 0 TO 2579
50 Z = Z + PEEK (16384 + I)
55 IF I / 500 = INT (I / 500) THEN PRINT "CURRENT SUM= ";Z
60 NEXT I
70 PRINT "CHECKSUM= ";Z
Checksums
ADT v1.21 ADT v1.22 ADTGS (v .90)
76 76 76
53958 53958 39865
101079 101079 89559
158919 158919 142200
224503 224504 206728
307268 307117 289377
313020 312869 295079 <-- final sums
ADTgs (v.91)
76
48588
97886
151354
201728
284376
290904 <-- final sum
Rubywand