_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

ARRAY.DEMO

FILE INFORMATION

FILENAME(S): ARRAY.DEMO

FILE TYPE(S): PRG

FILE SIZE: 506b

FIRST SEEN: 2025-11-30 21:12:51

APPEARS ON: 1 disk(s)

FILE HASH

8ded0414e99ed7e252abd0b9dd7578ccbaa7be29144f7cb0a4217101066c13cb

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
TRANSACTOR DISK ARRAY.DEMO PRG DuncanTwain 10 9 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 1C 08 0A 00 53 41  B2 35 31 38 30 30 3A 86  |......SA.51800:.|
00000010: 20 41 28 31 30 29 2C 42  28 31 30 29 00 36 08 14  | A(10),B(10).6..|
00000020: 00 99 3A 81 20 49 B2 30  20 A4 20 31 30 3A 41 28  |..:. I.0 . 10:A(|
00000030: 49 29 B2 49 3A 82 00 59  08 1E 00 99 3A 99 20 22  |I).I:..Y....:. "|
00000040: 53 45 54 20 42 3D 41 22  3A 9E 20 53 41 AA 33 2C  |SET B=A":. SA.3,|
00000050: 41 28 30 29 2C 42 28 30  29 00 77 08 28 00 99 3A  |A(0),B(0).w.(..:|
00000060: 81 20 49 20 B2 20 30 20  A4 20 31 30 3A 20 99 20  |. I . 0 . 10: . |
00000070: 42 28 49 29 3B 3A 82 00  9F 08 32 00 56 31 B2 32  |B(I);:....2.V1.2|
00000080: 3A 9E 20 53 41 AA 36 2C  56 31 2C 42 28 30 29 3A  |:. SA.6,V1,B(0):|
00000090: 99 3A 99 20 22 53 45 54  20 42 3D 42 2B 32 22 00  |.:. "SET B=B+2".|
000000A0: B8 08 3C 00 81 20 49 B2  30 20 A4 20 31 30 20 3A  |..<.. I.0 . 10 :|
000000B0: 99 42 28 49 29 3B 3A 82  00 EA 08 46 00 56 32 B2  |.B(I);:....F.V2.|
000000C0: 32 35 3A 99 3A 99 22 20  49 4E 53 45 52 54 20 32  |25:.:." INSERT 2|
000000D0: 35 20 41 54 20 41 28 35  29 22 3A 9E 20 53 41 AA  |5 AT A(5)":. SA.|
000000E0: 35 31 2C 56 32 2C 41 28  35 29 00 02 09 50 00 81  |51,V2,A(5)...P..|
000000F0: 20 49 B2 30 20 A4 20 31  30 3A 99 41 28 49 29 3B  | I.0 . 10:.A(I);|
00000100: 3A 82 00 2A 09 5A 00 99  3A 20 20 99 22 53 45 54  |:..*.Z..:  ."SET|
00000110: 20 42 3D 42 2A 41 22 3A  20 9E 20 53 41 AA 32 31  | B=B*A": . SA.21|
00000120: 2C 41 28 30 29 2C 42 28  30 29 00 43 09 64 00 81  |,A(0),B(0).C.d..|
00000130: 20 49 B2 30 20 A4 20 31  30 3A 99 20 42 28 49 29  | I.0 . 10:. B(I)|
00000140: 3B 3A 82 00 60 09 6E 00  99 3A 99 20 22 53 51 55  |;:..`.n..:. "SQU|
00000150: 41 52 45 20 42 20 2D 20  28 42 3D 42 5E 32 29 22  |ARE B - (B=B^2)"|
00000160: 00 8F 09 82 00 99 20 22  53 54 41 52 54 49 4E 47  |...... "STARTING|
00000170: 20 57 49 54 48 20 45 4C  45 4D 45 4E 54 20 58 3D  | WITH ELEMENT X=|
00000180: 34 22 3A 9E 20 53 41 AA  34 38 2C 42 28 34 29 00  |4":. SA.48,B(4).|
00000190: A8 09 8C 00 81 20 49 B2  30 20 A4 20 31 30 3A 99  |..... I.0 . 10:.|
000001A0: 20 42 28 49 29 3B 3A 82  00 DC 09 96 00 99 3A 20  | B(I);:.......: |
000001B0: 99 20 22 55 53 49 4E 47  20 41 4E 20 55 4E 44 45  |. "USING AN UNDE|
000001C0: 46 49 4E 45 44 20 56 41  52 49 41 42 4C 45 22 3A  |FINED VARIABLE":|
000001D0: 9E 20 53 41 2C 56 33 2C  41 28 30 29 00 F7 09 A0  |. SA,V3,A(0)....|
000001E0: 00 99 3A 20 81 20 49 B2  30 20 A4 20 31 30 3A 99  |..: . I.0 . 10:.|
000001F0: 41 28 49 29 3B 3A 82 00  00 00                    |A(I);:....      |
......SA.51800:. A(10),B(10).6....:. I.0
 . 10:A(I).I:..Y....:. "SET B=A":. SA.3,
A(0),B(0).W.(..:. I . 0 . 10: . B(I);:..
..2.V1.2:. SA.6,V1,B(0):.:. "SET B=B+2".
..<.. I.0 . 10 :.B(I);:....F.V2.25:.:." 
INSERT 25 AT A(5)":. SA.51,V2,A(5)...P..
 I.0 . 10:.A(I);:..*.Z..:  ."SET B=B*A":
 . SA.21,A(0),B(0).C.D.. I.0 . 10:. B(I)
;:..`.N..:. "SQUARE B - (B=B^2)"...... "
STARTING WITH ELEMENT X=4":. SA.48,B(4).
..... I.0 . 10:. B(I);:.......: . "USING
 AN UNDEFINED VARIABLE":. SA,V3,A(0)... 
..: . I.0 . 10:.A(I);:....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL