CAD 3 D
FILE INFORMATION
FILENAME(S): CAD 3 D
FILE TYPE(S): SEQ
FILE SIZE: 7K
FIRST SEEN: 2025-11-30 18:12:27
APPEARS ON: 1 disk(s)
FILE HASH
6625adf7ddf7c7a43d925817d99175a13a6a208758300152cb454cbce80c1164
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DATARICH | CAD 3 D | SEQ | Sailor, Ganheden | 20 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 20 20 20 20 C9 46 20 59 4F 55 52 20 50 52 4F 47 | .F YOUR PROG| 00000010: 52 41 4D 20 43 52 41 53 48 45 53 20 44 55 52 49 |RAM CRASHES DURI| 00000020: 4E 47 20 44 45 42 55 47 20 43 4C 45 41 52 20 54 |NG DEBUG CLEAR T| 00000030: 48 45 20 53 43 52 45 45 4E 20 57 49 54 48 20 28 |HE SCREEN WITH (| 00000040: 53 48 49 46 54 20 43 4C 52 2D 48 4F 4D 45 29 20 |SHIFT CLR-HOME) | 00000050: 20 41 4E 44 20 54 59 50 45 20 54 48 45 20 46 4F | AND TYPE THE FO| 00000060: 4C 4C 4F 57 49 4E 47 2E 20 0D 20 20 20 20 47 4F |LLOWING. . GO| 00000070: 54 4F 36 30 30 30 30 0D 20 20 20 20 2D 2D 2D 2D |TO60000. ----| 00000080: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 0D 20 |--------------. | 00000090: 20 20 20 CE CF D4 C5 3A 20 D4 48 45 52 45 20 57 | ....: .HERE W| 000000A0: 49 4C 4C 20 42 45 20 47 41 52 42 41 47 45 20 4F |ILL BE GARBAGE O| 000000B0: 4E 20 54 48 45 20 53 43 52 45 45 4E 20 57 48 49 |N THE SCREEN WHI| 000000C0: 4C 45 20 59 4F 55 20 41 52 45 20 54 59 50 49 4E |LE YOU ARE TYPIN| 000000D0: 47 20 54 48 49 53 20 53 4F 20 54 59 50 45 20 43 |G THIS SO TYPE C| 000000E0: 41 52 45 46 55 4C 4C 59 21 0D 0D 20 20 20 20 28 |AREFULLY!.. (| 000000F0: 32 29 2E 20 C1 4C 4C 20 4E 55 4D 42 45 52 53 20 |2). .LL NUMBERS | 00000100: 50 41 53 53 45 44 20 54 4F 20 54 48 45 20 D5 D3 |PASSED TO THE ..| 00000110: D2 20 50 52 4F 47 52 41 4D 20 4D 55 53 54 20 42 |. PROGRAM MUST B| 00000120: 45 20 49 4E 20 54 48 45 20 52 41 4E 47 45 20 4F |E IN THE RANGE O| 00000130: 46 20 30 20 54 4F 20 36 35 35 33 35 20 28 44 45 |F 0 TO 65535 (DE| 00000140: 43 49 4D 41 4C 53 20 57 49 4C 4C 20 42 45 20 54 |CIMALS WILL BE T| 00000150: 52 55 4E 43 41 54 45 44 29 20 4F 52 20 54 48 45 |RUNCATED) OR THE| 00000160: 52 45 20 57 49 4C 4C 20 42 45 20 41 4E 20 49 4C |RE WILL BE AN IL| 00000170: 4C 45 47 41 4C 20 51 55 41 4E 54 49 54 59 20 45 |LEGAL QUANTITY E| 00000180: 52 52 4F 52 0D 0D 28 33 29 2E 20 C9 46 20 54 48 |RROR..(3). .F TH| 00000190: 45 20 45 58 50 45 43 54 45 44 20 4E 55 4D 42 45 |E EXPECTED NUMBE| 000001A0: 52 20 4F 46 20 56 41 52 49 41 42 4C 45 53 20 41 |R OF VARIABLES A| 000001B0: 52 45 20 4E 4F 54 20 50 41 53 53 45 44 20 54 4F |RE NOT PASSED TO| 000001C0: 20 54 48 45 20 D5 D3 D2 20 43 41 4C 4C 20 54 48 | THE ... CALL TH| 000001D0: 45 52 45 20 57 49 4C 4C 20 42 45 20 41 20 D3 D9 |ERE WILL BE A ..| 000001E0: CE D4 C1 D8 20 C5 D2 D2 CF D2 2E 0D 0D 20 20 20 |.... ........ | 000001F0: 20 28 34 29 2E 20 C9 46 20 54 48 45 20 56 41 52 | (4). .F THE VAR| 00000200: 49 41 42 4C 45 20 49 53 20 41 20 42 59 54 45 20 |IABLE IS A BYTE | 00000210: 4F 52 20 46 4C 41 47 20 54 59 50 45 20 54 48 45 |OR FLAG TYPE THE| 00000220: 20 50 52 4F 47 52 41 4D 20 57 49 4C 4C 20 41 55 | PROGRAM WILL AU| 00000230: 54 4F 4D 41 54 49 43 41 4C 4C 59 20 4D 41 53 4B |TOMATICALLY MASK| 00000240: 20 4F 46 46 20 55 4E 57 41 4E 54 45 44 20 42 49 | OFF UNWANTED BI| 00000250: 54 53 2E 20 20 20 0D 20 20 20 20 28 35 29 2E 20 |TS. . (5). | 00000260: D8 2D D9 20 50 4C 4F 54 54 49 4E 47 20 57 49 4C |.-. PLOTTING WIL| 00000270: 4C 20 41 4C 4C 4F 57 20 46 4F 52 20 50 4F 53 49 |L ALLOW FOR POSI| 00000280: 54 49 56 45 20 57 52 41 50 2D 41 52 4F 55 4E 44 |TIVE WRAP-AROUND| 00000290: 2E 20 D8 2D D9 20 4D 41 59 20 42 45 20 41 4E 59 |. .-. MAY BE ANY| 000002A0: 20 56 41 4C 55 45 20 42 45 54 57 45 45 4E 20 30 | VALUE BETWEEN 0| 000002B0: 20 41 4E 44 20 36 35 35 33 35 20 41 4E 44 20 54 | AND 65535 AND T| 000002C0: 48 45 20 D5 D3 D2 20 52 4F 55 54 49 4E 45 53 20 |HE ... ROUTINES | 000002D0: 57 49 4C 4C 20 41 55 54 4F 4D 41 54 49 43 41 4C |WILL AUTOMATICAL| 000002E0: 4C 59 20 0D 20 20 20 20 20 50 4C 4F 54 58 3D 4D |LY . PLOTX=M| 000002F0: 4F 44 28 33 32 30 2C 58 29 0D 20 20 20 20 20 50 |OD(320,X). P| 00000300: 4C 4F 54 59 3D 4D 4F 44 28 32 30 30 2C 59 29 0D |LOTY=MOD(200,Y).| 00000310: 0D 20 20 20 20 28 36 29 2E 20 D4 48 45 20 D3 C9 |. (6). .HE ..| 00000320: C4 20 52 4F 55 54 49 4E 45 53 20 4D 41 49 4E 54 |. ROUTINES MAINT| 00000330: 41 49 4E 20 41 4E 20 49 4E 54 45 52 4E 41 4C 20 |AIN AN INTERNAL | 00000340: 49 4D 41 47 45 20 4F 46 20 54 48 45 20 57 52 49 |IMAGE OF THE WRI| 00000350: 54 45 20 4F 4E 4C 59 20 53 49 44 20 52 45 47 49 |TE ONLY SID REGI| 00000360: 53 54 45 52 53 2E 20 D4 48 49 53 20 41 4C 4C 4F |STERS. .HIS ALLO| 00000370: 57 53 20 46 4F 52 20 53 49 4D 50 4C 49 46 49 45 |WS FOR SIMPLIFIE| 00000380: 44 20 43 4F 4D 4D 41 4E 44 53 20 53 55 43 48 20 |D COMMANDS SUCH | 00000390: 41 53 20 56 4F 49 43 45 20 4F 4E 20 4F 52 20 56 |AS VOICE ON OR V| 000003A0: 4F 49 43 45 20 4F 46 46 2E 0D 0D 20 20 20 20 20 |OICE OFF... | 000003B0: C3 CF CE D6 C5 CE D4 C9 CF CE D3 20 20 20 20 20 |........... | 000003C0: 0D 20 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |. ----------| 000003D0: 2D 2D 2D 2D 2D 2D 0D 0D 20 20 20 20 20 2C 42 20 |------.. ,B | 000003E0: 20 20 30 20 54 4F 20 32 35 35 20 28 42 59 54 45 | 0 TO 255 (BYTE| 000003F0: 29 0D 20 20 20 20 20 2C 44 42 20 20 30 20 54 4F |). ,DB 0 TO| 00000400: 20 36 35 35 33 35 20 28 44 4F 55 42 4C 45 2D 42 | 65535 (DOUBLE-B| 00000410: 59 54 45 29 0D 20 20 20 20 20 2C 46 4C 20 20 3D |YTE). ,FL =| 00000420: 20 30 20 20 46 4C 41 47 20 4F 46 46 2F 43 4C 52 | 0 FLAG OFF/CLR| 00000430: 0D 20 20 20 20 20 2C 46 4C 20 20 3C 3E 30 20 20 |. ,FL <>0 | 00000440: 46 4C 41 47 20 53 45 54 2F 4F 4E 0D 20 20 20 20 |FLAG SET/ON. | 00000450: 20 0D 20 20 20 20 20 D3 D9 CE D4 C1 D8 0D 20 20 | . ....... | 00000460: 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | -------------| 00000470: 2D 2D 2D 0D 0D 20 20 20 20 20 41 3D 55 53 52 28 |---.. A=USR(| 00000480: 31 29 20 20 20 20 20 20 28 49 4D 50 4C 49 45 44 |1) (IMPLIED| 00000490: 20 46 55 4E 43 54 49 4F 4E 29 0D 20 20 20 20 20 | FUNCTION). | 000004A0: 41 3D 55 53 52 28 33 32 29 2C 42 0D 20 20 20 20 |A=USR(32),B. | 000004B0: 20 41 3D 55 53 52 28 39 29 2C 44 42 0D 20 20 20 | A=USR(9),DB. | 000004C0: 20 20 41 3D 55 53 52 28 39 30 29 2C 42 2C 46 4C | A=USR(90),B,FL| 000004D0: 2C 46 4C 2C 46 4C 0D 20 20 20 20 20 41 3D 55 53 |,FL,FL. A=US| 000004E0: 52 28 30 29 2C 30 2C 31 2C 34 0D 20 20 20 20 20 |R(0),0,1,4. | 000004F0: 41 3D 55 53 52 28 41 41 29 0D 20 20 20 20 20 41 |A=USR(AA). A| 00000500: 3D 55 53 52 28 42 42 28 43 29 29 0D 20 20 20 20 |=USR(BB(C)). | 00000510: 20 41 3D 55 53 52 28 41 41 25 29 0D 0D 20 20 20 | A=USR(AA%).. | 00000520: 20 20 D5 D3 D2 20 C3 CF CD CD C1 CE C4 20 CC C9 | ... ....... ..| 00000530: D3 D4 0D 20 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D |... --------| 00000540: 2D 2D 2D 2D 2D 2D 2D 2D 0D 0D 20 41 3D 55 53 52 |--------.. A=USR| 00000550: 28 30 29 2C 42 2C 42 2C 42 20 20 20 20 20 50 52 |(0),B,B,B PR| 00000560: 45 53 45 54 20 56 49 43 20 4D 41 50 20 54 4F 20 |ESET VIC MAP TO | 00000570: 42 41 4E 4B 20 30 2D 33 2C 0D 20 20 20 20 20 20 |BANK 0-3,. | 00000580: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 49 | VI| 00000590: 44 45 4F 20 4D 45 4D 20 30 2D 31 35 2C 20 56 49 |DEO MEM 0-15, VI| 000005A0: 44 45 4F 20 42 41 53 45 20 30 20 54 4F 20 31 34 |DEO BASE 0 TO 14| 000005B0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 000005C0: 20 20 20 20 20 53 54 45 50 20 42 59 20 32 0D 20 | STEP BY 2. | 000005D0: 41 3D 55 53 52 28 31 29 20 20 20 20 20 20 20 20 |A=USR(1) | 000005E0: 20 20 20 45 58 45 43 55 54 45 20 50 52 45 53 45 | EXECUTE PRESE| 000005F0: 54 20 4D 41 50 0D 20 41 3D 55 53 52 28 32 29 20 |T MAP. A=USR(2) | 00000600: 20 20 20 20 20 20 20 20 20 20 52 45 53 45 54 20 | RESET | 00000610: 50 52 45 56 49 4F 55 53 20 4D 41 50 0D 20 41 3D |PREVIOUS MAP. A=| 00000620: 55 53 52 28 33 29 2C 42 20 20 20 20 20 20 20 20 |USR(3),B | 00000630: 20 53 45 54 20 42 49 54 20 4D 41 50 20 54 4F 20 | SET BIT MAP TO | 00000640: 42 20 28 42 20 30 2D 32 35 35 29 0D 20 41 3D 55 |B (B 0-255). A=U| 00000650: 53 52 28 34 29 2C 42 20 20 20 20 20 20 20 20 20 |SR(4),B | 00000660: 53 45 54 20 43 4F 4C 4F 52 20 52 41 4D 20 54 4F |SET COLOR RAM TO| 00000670: 20 43 4F 4C 0D 20 41 3D 55 53 52 28 35 29 2C 42 | COL. A=USR(5),B| 00000680: 2C 42 20 20 20 20 20 20 20 53 45 54 20 50 4C 4F |,B SET PLO| 00000690: 54 20 43 4F 4C 4F 52 53 20 46 47 2C 42 47 0D 20 |T COLORS FG,BG. | 000006A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000006B0: 20 20 20 28 46 47 20 30 2D 31 35 2C 42 47 20 30 | (FG 0-15,BG 0| 000006C0: 2D 31 35 29 0D 20 41 3D 55 53 52 28 36 29 2C 42 |-15). A=USR(6),B| 000006D0: 2C 42 20 20 20 20 20 20 20 53 45 54 20 42 47 43 |,B SET BGC| 000006E0: 20 52 45 47 20 42 4B 47 44 2C 43 4F 4C 0D 20 20 | REG BKGD,COL. | 000006F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000700: 20 20 28 42 4B 47 44 20 30 2D 33 2C 43 4F 4C 20 | (BKGD 0-3,COL | 00000710: 30 2D 31 35 29 0D 20 41 3D 55 53 52 28 37 29 2C |0-15). A=USR(7),| 00000720: 42 20 20 20 20 20 20 20 20 20 53 45 54 20 42 4F |B SET BO| 00000730: 52 44 45 52 20 43 4F 4C 0D 20 41 3D 55 53 52 28 |RDER COL. A=USR(| 00000740: 38 29 2C 42 2C 42 20 20 20 20 20 20 20 43 4F 50 |8),B,B COP| 00000750: 59 20 43 48 41 52 20 52 4F 4D 20 52 4F 4D 2C 42 |Y CHAR ROM ROM,B| 00000760: 41 53 45 0D 20 20 20 20 20 20 20 20 20 20 20 20 |ASE. | 00000770: 20 20 20 20 20 20 20 20 52 4F 4D 20 30 2D 31 0D | ROM 0-1.| 00000780: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000790: 20 20 20 20 42 41 53 45 20 30 2D 31 34 20 53 54 | BASE 0-14 ST| 000007A0: 45 50 20 32 0D 20 41 3D 55 53 52 28 39 29 2C 44 |EP 2. A=USR(9),D| 000007B0: 42 20 20 20 20 20 20 20 20 53 45 54 20 54 4F 50 |B SET TOP| 000007C0: 20 4F 46 20 42 41 53 49 43 0D 20 41 3D 55 53 52 | OF BASIC. A=USR| 000007D0: 28 31 30 29 2C 44 42 20 20 20 20 20 20 20 53 45 |(10),DB SE| 000007E0: 54 20 53 54 41 52 54 20 4F 46 20 42 41 53 49 43 |T START OF BASIC| 000007F0: 0D 20 41 3D 55 53 52 28 31 36 29 20 20 20 20 20 |. A=USR(16) | 00000800: 20 20 20 20 20 53 45 54 20 42 4D 4D 0D 20 41 3D | SET BMM. A=| 00000810: 55 53 52 28 31 37 29 20 20 20 20 20 20 20 20 20 |USR(17) | 00000820: 20 43 4C 52 20 42 4D 4D 0D 20 41 3D 55 53 52 28 | CLR BMM. A=USR(| 00000830: 31 38 29 20 20 20 20 20 20 20 20 20 20 53 45 54 |18) SET| 00000840: 20 45 43 4D 0D 20 41 3D 55 53 52 28 31 39 29 20 | ECM. A=USR(19) | 00000850: 20 20 20 20 20 20 20 20 20 43 4C 52 20 45 43 4D | CLR ECM| 00000860: 0D 20 41 3D 55 53 52 28 32 30 29 20 20 20 20 20 |. A=USR(20) | 00000870: 20 20 20 20 20 53 45 54 20 4D 43 4D 0D 20 41 3D | SET MCM. A=| 00000880: 55 53 52 28 32 31 29 20 20 20 20 20 20 20 20 20 |USR(21) | 00000890: 20 43 4C 52 20 4D 43 4D 0D 20 41 3D 55 53 52 28 | CLR MCM. A=USR(| 000008A0: 32 32 29 20 20 20 20 20 20 20 20 20 20 53 45 54 |22) SET| 000008B0: 20 33 38 20 43 4F 4C 55 4D 4E 53 0D 20 41 3D 55 | 38 COLUMNS. A=U| 000008C0: 53 52 28 32 33 29 20 20 20 20 20 20 20 20 20 20 |SR(23) | 000008D0: 53 45 54 20 34 30 20 43 4F 4C 55 4D 4E 53 0D 20 |SET 40 COLUMNS. | 000008E0: 41 3D 55 53 52 28 32 34 29 20 20 20 20 20 20 20 |A=USR(24) | 000008F0: 20 20 20 54 55 52 4E 20 4F 46 46 20 56 49 44 45 | TURN OFF VIDE| 00000900: 4F 0D 20 41 3D 55 53 52 28 32 35 29 20 20 20 20 |O. A=USR(25) | 00000910: 20 20 20 20 20 20 54 55 52 4E 20 4F 4E 20 20 56 | TURN ON V| 00000920: 49 44 45 4F 0D 20 41 3D 55 53 52 28 32 36 29 20 |IDEO. A=USR(26) | 00000930: 20 20 20 20 20 20 20 20 20 53 45 54 20 32 34 20 | SET 24 | 00000940: 52 4F 57 53 0D 20 41 3D 55 53 52 28 32 37 29 20 |ROWS. A=USR(27) | 00000950: 20 20 20 20 20 20 20 20 20 53 45 54 20 32 35 20 | SET 25 | 00000960: 52 4F 57 53 0D 20 41 3D 55 53 52 28 32 38 29 2C |ROWS. A=USR(28),| 00000970: 42 20 20 20 20 20 20 20 20 53 43 52 4F 4C 4C 20 |B SCROLL | 00000980: 59 20 20 30 2D 37 0D 20 41 3D 55 53 52 28 32 39 |Y 0-7. A=USR(29| 00000990: 29 2C 42 20 20 20 20 20 20 20 20 53 43 52 4F 4C |),B SCROL| 000009A0: 4C 20 58 20 20 30 2D 37 0D 20 41 3D 55 53 52 28 |L X 0-7. A=USR(| 000009B0: 33 30 29 2C 42 2C 42 2C 42 20 20 20 20 43 4F 50 |30),B,B,B COP| 000009C0: 59 20 53 50 52 49 54 45 20 54 4F 20 42 49 54 20 |Y SPRITE TO BIT | 000009D0: 4D 41 50 20 58 20 30 2D 33 39 20 59 20 30 2D 32 |MAP X 0-39 Y 0-2| 000009E0: 34 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |4. | 000009F0: 20 20 20 20 20 20 53 50 52 49 54 45 20 41 52 45 | SPRITE ARE| 00000A00: 41 20 30 2D 32 35 35 0D 20 41 3D 55 53 52 28 33 |A 0-255. A=USR(3| 00000A10: 32 29 2C 42 20 20 20 20 20 20 20 20 53 50 52 49 |2),B SPRI| 00000A20: 54 45 20 4F 4E 20 20 30 2D 37 0D 20 41 3D 55 53 |TE ON 0-7. A=US| 00000A30: 52 28 33 33 29 2C 42 20 20 20 20 20 20 20 20 53 |R(33),B S| 00000A40: 50 52 49 54 45 20 4F 46 46 20 30 2D 37 0D 20 41 |PRITE OFF 0-7. A| 00000A50: 3D 55 53 52 28 33 34 29 2C 44 42 2C 42 2C 42 20 |=USR(34),DB,B,B | 00000A60: 20 20 4D 4F 56 45 20 53 50 52 49 54 45 20 58 2C | MOVE SPRITE X,| 00000A70: 59 2C 53 50 52 49 54 45 0D 20 20 20 20 20 20 20 |Y,SPRITE. | 00000A80: 20 20 20 20 20 20 20 20 20 20 20 20 20 58 20 30 | X 0| 00000A90: 2D 33 31 39 0D 20 20 20 20 20 20 20 20 20 20 20 |-319. | 00000AA0: 20 20 20 20 20 20 20 20 20 59 20 30 2D 31 39 39 | Y 0-199| 00000AB0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00000AC0: 20 20 20 20 20 53 50 52 49 54 45 20 30 2D 37 0D | SPRITE 0-7.| 00000AD0: 20 41 3D 55 53 52 28 33 35 29 2C 42 2C 42 20 20 | A=USR(35),B,B | 00000AE0: 20 20 20 20 53 45 54 20 53 50 52 49 54 45 2C 43 | SET SPRITE,C| 00000AF0: 4F 4C 4F 52 0D 20 20 20 20 20 20 20 20 20 20 20 |OLOR. | 00000B00: 20 20 20 20 20 20 20 20 20 53 50 52 49 54 45 20 | SPRITE | 00000B10: 30 2D 37 0D 20 20 20 20 20 20 20 20 20 20 20 20 |0-7. | 00000B20: 20 20 20 20 20 20 20 20 43 4F 4C 4F 52 20 20 30 | COLOR 0| 00000B30: 2D 31 35 0D 20 41 3D 55 53 52 28 33 36 29 2C 42 |-15. A=USR(36),B| 00000B40: 20 20 20 20 20 20 20 20 53 45 54 20 53 50 52 49 | SET SPRI| 00000B50: 54 45 20 4D 43 4D 20 4F 4E 0D 20 20 20 20 20 20 |TE MCM ON. | 00000B60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 53 50 | SP| 00000B70: 52 49 54 45 20 30 2D 37 0D 20 41 3D 55 53 52 28 |RITE 0-7. A=USR(| 00000B80: 33 37 29 2C 42 20 20 20 20 20 20 20 20 53 45 54 |37),B SET| 00000B90: 20 53 50 52 49 54 45 20 4D 43 4D 20 4F 46 46 0D | SPRITE MCM OFF.| 00000BA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000BB0: 20 20 20 20 53 50 52 49 54 45 20 30 2D 37 0D 20 | SPRITE 0-7. | 00000BC0: 41 3D 55 53 52 28 33 38 29 2C 42 2C 42 20 20 20 |A=USR(38),B,B | 00000BD0: 20 20 20 4D 43 4D 20 52 45 47 49 53 54 45 52 20 | MCM REGISTER | 00000BE0: 30 2D 31 2C 0D 20 20 20 20 20 20 20 20 20 20 20 |0-1,. | 00000BF0: 20 20 20 20 20 20 20 20 20 43 4F 4C 4F 52 20 30 | COLOR 0| 00000C00: 2D 31 35 0D 20 41 3D 55 53 52 28 33 39 29 2C 42 |-15. A=USR(39),B| 00000C10: 2C 42 20 20 20 20 20 20 53 45 54 20 53 50 52 49 |,B SET SPRI| 00000C20: 54 45 2C 4D 41 50 0D 20 20 20 20 20 20 20 20 20 |TE,MAP. | 00000C30: 20 20 20 20 20 20 20 20 20 20 20 53 50 52 49 54 | SPRIT| 00000C40: 45 20 30 2D 37 0D 20 20 20 20 20 20 20 20 20 20 |E 0-7. | 00000C50: 20 20 20 20 20 20 20 20 20 20 4D 41 50 20 30 2D | MAP 0-| 00000C60: 32 35 35 0D 20 41 3D 55 53 52 28 34 30 29 2C 42 |255. A=USR(40),B| 00000C70: 2C 42 20 20 20 20 20 20 43 4F 50 59 20 53 50 52 |,B COPY SPR| 00000C80: 49 54 45 20 4D 41 50 2C 28 54 4F 29 4D 41 50 0D |ITE MAP,(TO)MAP.| 00000C90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000CA0: 20 20 20 20 4D 41 50 20 30 2D 32 35 35 2C 28 46 | MAP 0-255,(F| 00000CB0: 52 4F 4D 29 0D 20 20 20 20 20 20 20 20 20 20 20 |ROM). | 00000CC0: 20 20 20 20 20 20 20 20 20 4D 41 50 20 30 2D 32 | MAP 0-2| 00000CD0: 35 35 0D 20 41 3D 55 53 52 28 34 31 29 20 20 20 |55. A=USR(41) | 00000CE0: 20 20 20 20 20 20 20 4B 49 4C 4C 20 41 4E 44 20 | KILL AND | 00000CF0: 48 4F 4D 45 20 53 50 52 49 54 45 53 0D 20 41 3D |HOME SPRITES. A=| 00000D00: 55 53 52 28 34 32 29 20 20 20 20 20 20 20 20 20 |USR(42) | 00000D10: 20 52 45 41 44 20 42 41 43 4B 47 52 4F 55 4E 44 | READ BACKGROUND| 00000D20: 20 52 45 47 2E 0D 20 41 3D 55 53 52 28 34 33 29 | REG.. A=USR(43)| 00000D30: 20 20 20 20 20 20 20 20 20 20 52 45 41 44 20 53 | READ S| 00000D40: 50 52 49 54 45 20 43 4F 4C 4C 49 53 49 4F 4E 20 |PRITE COLLISION | 00000D50: 52 45 47 49 53 54 45 52 0D 20 41 3D 55 53 52 28 |REGISTER. A=USR(| 00000D60: 34 34 29 2C 42 20 20 20 20 20 20 20 20 53 50 52 |44),B SPR| 00000D70: 49 54 45 20 48 4F 52 5A 20 4F 4E 0D 20 20 20 20 |ITE HORZ ON. | 00000D80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000D90: 53 50 52 49 54 45 20 30 2D 37 0D 20 41 3D 55 53 |SPRITE 0-7. A=US| 00000DA0: 52 28 34 35 29 2C 42 20 20 20 20 20 20 20 20 53 |R(45),B S| 00000DB0: 50 52 49 54 45 20 48 4F 52 5A 20 4F 46 46 0D 20 |PRITE HORZ OFF. | 00000DC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000DD0: 20 20 20 53 50 52 49 54 45 20 30 2D 37 0D 20 41 | SPRITE 0-7. A| 00000DE0: 3D 55 53 52 28 34 36 29 2C 42 20 20 20 20 20 20 |=USR(46),B | 00000DF0: 20 20 53 50 52 49 54 45 20 56 45 52 54 20 4F 4E | SPRITE VERT ON| 00000E00: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00000E10: 20 20 20 20 20 53 50 52 49 54 45 20 30 2D 37 0D | SPRITE 0-7.| 00000E20: 20 41 3D 55 53 52 28 34 37 29 2C 42 20 20 20 20 | A=USR(47),B | 00000E30: 20 20 20 20 53 50 52 49 54 45 20 56 45 52 54 20 | SPRITE VERT | 00000E40: 4F 46 46 0D 20 20 20 20 20 20 20 20 20 20 20 20 |OFF. | 00000E50: 20 20 20 20 20 20 20 20 53 50 52 49 54 45 20 30 | SPRITE 0| 00000E60: 2D 37 0D 20 41 3D 55 53 52 28 34 38 29 20 20 20 |-7. A=USR(48) | 00000E70: 20 20 20 20 20 20 20 53 50 52 49 54 45 20 42 43 | SPRITE BC| 00000E80: 4B 47 44 20 53 45 54 0D 20 41 3D 55 53 52 28 34 |KGD SET. A=USR(4| 00000E90: 39 29 20 20 20 20 20 20 20 20 20 20 53 50 52 49 |9) SPRI| 00000EA0: 54 45 20 42 43 4B 47 44 20 43 4C 52 0D 20 41 3D |TE BCKGD CLR. A=| 00000EB0: 55 53 52 28 35 30 29 2C 42 2C 42 20 20 20 20 20 |USR(50),B,B | 00000EC0: 20 4D 4F 56 45 20 43 55 52 53 4F 52 20 58 2C 59 | MOVE CURSOR X,Y| 00000ED0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 00000EE0: 20 20 20 20 20 58 20 30 2D 33 39 0D 20 20 20 20 | X 0-39. | 00000EF0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000F00: 59 20 30 2D 32 34 0D 20 41 3D 55 53 52 28 35 31 |Y 0-24. A=USR(51| 00000F10: 29 20 20 20 20 20 20 20 20 20 20 52 45 54 55 52 |) RETUR| 00000F20: 4E 20 43 55 52 53 4F 52 20 58 20 50 4F 53 2E 0D |N CURSOR X POS..| 00000F30: 20 41 3D 55 53 52 28 35 32 29 20 20 20 20 20 20 | A=USR(52) | 00000F40: 20 20 20 20 52 45 54 55 52 4E 20 43 55 52 53 4F | RETURN CURSO| 00000F50: 52 20 59 20 50 4F 53 2E 0D 20 41 3D 55 53 52 28 |R Y POS.. A=USR(| 00000F60: 35 37 29 2C 42 2C 42 2C 42 20 20 20 20 53 45 54 |57),B,B,B SET| 00000F70: 20 43 4F 4C 4F 52 20 4E 49 42 42 4C 45 20 58 20 | COLOR NIBBLE X | 00000F80: 59 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |Y. | 00000F90: 20 20 20 20 20 20 58 20 30 2D 33 39 0D 20 20 20 | X 0-39. | 00000FA0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000FB0: 20 59 20 30 2D 32 34 0D 20 20 20 20 20 20 20 20 | Y 0-24. | 00000FC0: 20 20 20 20 20 20 20 20 20 20 20 20 43 4F 4C 4F | COLO| 00000FD0: 52 20 30 2D 31 35 0D 20 41 3D 55 53 52 28 35 38 |R 0-15. A=USR(58| 00000FE0: 29 2C 42 2C 42 2C 42 2C 42 20 20 53 45 54 20 48 |),B,B,B,B SET H| 00000FF0: 49 52 45 53 20 43 4F 4C 4F 52 20 4E 49 42 42 4C |IRES COLOR NIBBL| 00001000: 45 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |E. | 00001010: 20 20 20 20 20 20 58 20 30 2D 33 39 0D 20 20 20 | X 0-39. | 00001020: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001030: 20 59 20 30 2D 32 34 0D 20 20 20 20 20 20 20 20 | Y 0-24. | 00001040: 20 20 20 20 20 20 20 20 20 20 20 20 48 49 20 43 | HI C| 00001050: 4F 4C 4F 52 20 30 2D 31 35 0D 20 20 20 20 20 20 |OLOR 0-15. | 00001060: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4C 4F | LO| 00001070: 20 43 4F 4C 4F 52 20 30 2D 31 35 0D 20 41 3D 55 | COLOR 0-15. A=U| 00001080: 53 52 28 35 39 29 2C 42 2C 42 2C 42 20 20 20 20 |SR(59),B,B,B | 00001090: 53 45 54 20 42 49 54 53 20 36 26 37 20 56 49 44 |SET BITS 6&7 VID| 000010A0: 45 4F 20 42 41 53 45 0D 20 20 20 20 20 20 20 20 |EO BASE. | 000010B0: 20 20 20 20 20 20 20 20 20 20 20 20 58 20 30 2D | X 0-| 000010C0: 33 39 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 |39. | 000010D0: 20 20 20 20 20 20 20 59 20 30 2D 32 34 0D 20 20 | Y 0-24. | 000010E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000010F0: 20 20 42 49 54 20 50 41 49 52 20 30 2D 33 0D 20 | BIT PAIR 0-3. | 00001100: 41 3D 55 53 52 28 36 30 29 2C 44 42 2C 44 42 20 |A=USR(60),DB,DB | 00001110: 20 20 20 52 45 54 55 52 4E 20 55 4E 53 49 47 4E | RETURN UNSIGN| 00001120: 45 44 20 45 4F 52 0D 20 41 3D 55 53 52 28 36 31 |ED EOR. A=USR(61| 00001130: 29 2C 44 42 2C 44 42 20 20 20 20 52 45 54 55 52 |),DB,DB RETUR| 00001140: 4E 20 55 4E 53 49 47 4E 45 44 20 41 4E 44 0D 20 |N UNSIGNED AND. | 00001150: 41 3D 55 53 52 28 36 32 29 2C 44 42 2C 44 42 20 |A=USR(62),DB,DB | 00001160: 20 20 20 52 45 54 55 52 4E 20 55 4E 53 49 47 4E | RETURN UNSIGN| 00001170: 45 44 20 4F 52 0D 20 41 3D 55 53 52 28 36 33 29 |ED OR. A=USR(63)| 00001180: 2C 42 2C 42 2C 42 2C 42 20 20 43 4F 50 59 20 43 |,B,B,B,B COPY C| 00001190: 48 41 52 20 54 4F 20 42 49 54 20 4D 41 50 0D 20 |HAR TO BIT MAP. | 000011A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000011B0: 20 20 20 58 20 30 2D 33 39 0D 20 20 20 20 20 20 | X 0-39. | 000011C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 59 20 | Y | 000011D0: 30 2D 32 34 0D 20 20 20 20 20 20 20 20 20 20 20 |0-24. | 000011E0: 20 20 20 20 20 20 20 20 20 56 49 44 45 4F 20 42 | VIDEO B| 000011F0: 41 53 45 20 30 2D 31 34 20 53 54 45 50 20 32 0D |ASE 0-14 STEP 2.| 00001200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001210: 20 20 20 20 43 48 41 52 20 49 4E 44 45 58 20 30 | CHAR INDEX 0| 00001220: 2D 32 35 35 0D 20 41 3D 55 53 52 28 36 34 29 2C |-255. A=USR(64),| 00001230: 44 42 2C 44 42 20 20 20 20 53 45 54 20 58 20 59 |DB,DB SET X Y| 00001240: 20 48 49 52 45 53 0D 20 41 3D 55 53 52 28 36 35 | HIRES. A=USR(65| 00001250: 29 2C 44 42 2C 44 42 20 20 20 20 43 4C 52 20 58 |),DB,DB CLR X| 00001260: 20 59 20 48 49 52 45 53 0D 20 41 3D 55 53 52 28 | Y HIRES. A=USR(| 00001270: 36 36 29 2C 44 42 2C 44 42 2C 44 42 2C 44 42 20 |66),DB,DB,DB,DB | 00001280: 20 44 52 41 57 20 48 49 52 45 53 20 4C 49 4E 45 | DRAW HIRES LINE| 00001290: 20 53 45 54 0D 20 20 20 20 20 20 20 20 20 20 20 | SET. | 000012A0: 20 20 20 20 20 20 20 20 20 58 31 2C 59 31 2C 58 | X1,Y1,X| 000012B0: 32 2C 59 32 0D 20 41 3D 55 53 52 28 36 37 29 2C |2,Y2. A=USR(67),| 000012C0: 44 42 2C 44 42 2C 44 42 2C 44 42 20 20 44 52 41 |DB,DB,DB,DB DRA| 000012D0: 57 20 48 49 52 45 53 20 4C 49 4E 45 20 43 4C 52 |W HIRES LINE CLR| 000012E0: 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. | 000012F0: 20 20 20 20 20 58 31 2C 59 31 2C 58 32 2C 59 32 | X1,Y1,X2,Y2| 00001300: 0D 20 41 3D 55 53 52 28 36 38 29 2C 44 42 2C 44 |. A=USR(68),DB,D| 00001310: 42 20 20 20 20 50 4C 4F 54 20 4C 49 4E 45 20 54 |B PLOT LINE T| 00001320: 4F 20 58 32 2C 59 32 20 53 45 54 0D 20 41 3D 55 |O X2,Y2 SET. A=U| 00001330: 53 52 28 36 39 29 2C 44 42 2C 44 42 20 20 20 20 |SR(69),DB,DB | 00001340: 50 4C 4F 54 20 4C 49 4E 45 20 54 4F 20 58 32 2C |PLOT LINE TO X2,| 00001350: 59 32 20 43 4C 52 0D 20 41 3D 55 53 52 28 37 30 |Y2 CLR. A=USR(70| 00001360: 29 2C 44 42 2C 44 42 2C 42 20 20 50 4C 4F 54 20 |),DB,DB,B PLOT | 00001370: 50 4F 49 4E 54 20 58 2C 59 2C 42 49 54 20 50 41 |POINT X,Y,BIT PA| 00001380: 49 52 0D 20 41 3D 55 53 52 28 37 31 29 2C 44 42 |IR. A=USR(71),DB| 00001390: 2C 44 42 2C 44 42 2C 44 42 2C 42 0D 20 20 20 20 |,DB,DB,DB,B. | 000013A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000013B0: 44 52 41 57 20 4C 49 4E 45 20 58 31 2C 59 31 54 |DRAW LINE X1,Y1T| 000013C0: 4F 58 32 2C 59 32 2C 0D 20 20 20 20 20 20 20 20 |OX2,Y2,. | 000013D0: 20 20 20 20 20 20 20 20 20 20 20 20 42 49 54 20 | BIT | 000013E0: 50 41 49 52 0D 20 41 3D 55 53 52 28 37 32 29 2C |PAIR. A=USR(72),| 000013F0: 44 42 2C 44 42 2C 42 20 20 44 52 41 57 20 4C 49 |DB,DB,B DRAW LI| 00001400: 4E 45 20 54 4F 20 58 32 2C 59 32 2C 42 49 54 20 |NE TO X2,Y2,BIT | 00001410: 50 41 49 52 0D 20 41 3D 55 53 52 28 39 30 29 2C |PAIR. A=USR(90),| 00001420: 42 2C 46 4C 2C 46 4C 2C 46 4C 20 20 53 45 54 20 |B,FL,FL,FL SET | 00001430: 56 4F 49 43 45 0D 20 20 20 20 20 20 20 20 20 20 |VOICE. | 00001440: 20 20 20 20 20 20 20 20 20 20 42 49 54 2C 52 49 | BIT,RI| 00001450: 4E 47 2C 53 59 4E 43 2C 20 56 4F 49 43 45 20 30 |NG,SYNC, VOICE 0| 00001460: 2D 32 0D 20 41 3D 55 53 52 28 39 31 29 2C 42 2C |-2. A=USR(91),B,| 00001470: 42 2C 42 20 20 20 20 53 45 54 20 56 4F 49 43 45 |B,B SET VOICE| 00001480: 20 45 4E 56 45 4C 4F 50 45 0D 20 20 20 20 20 20 | ENVELOPE. | 00001490: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 56 4F | VO| 000014A0: 49 43 45 20 30 2D 32 0D 20 20 20 20 20 20 20 20 |ICE 0-2. | 000014B0: 20 20 20 20 20 20 20 20 20 20 20 20 41 54 54 41 | ATTA| 000014C0: 43 4B 20 30 2D 31 35 0D 20 20 20 20 20 20 20 20 |CK 0-15. | 000014D0: 20 20 20 20 20 20 20 20 20 20 20 20 44 45 43 41 | DECA| 000014E0: 59 20 20 30 2D 31 35 0D 20 41 3D 55 53 52 28 39 |Y 0-15. A=USR(9| 000014F0: 32 29 2C 42 2C 42 2C 42 20 20 20 20 53 45 54 20 |2),B,B,B SET | 00001500: 56 4F 49 43 45 20 45 4E 56 45 4C 4F 50 45 0D 20 |VOICE ENVELOPE. | 00001510: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001520: 20 20 20 56 4F 49 43 45 20 30 2D 32 0D 20 20 20 | VOICE 0-2. | 00001530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001540: 20 53 55 53 54 41 49 4E 20 30 2D 31 35 0D 20 20 | SUSTAIN 0-15. | 00001550: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001560: 20 20 52 45 4C 45 41 53 45 20 30 2D 31 35 0D 20 | RELEASE 0-15. | 00001570: 41 3D 55 53 52 28 39 33 29 2C 42 2C 44 42 20 20 |A=USR(93),B,DB | 00001580: 20 20 20 53 45 54 20 56 4F 49 43 45 20 46 52 45 | SET VOICE FRE| 00001590: 51 0D 20 41 3D 55 53 52 28 39 34 29 2C 42 2C 44 |Q. A=USR(94),B,D| 000015A0: 42 20 20 20 20 20 53 45 54 20 56 4F 49 43 45 20 |B SET VOICE | 000015B0: 50 55 4C 53 45 20 57 49 44 54 48 0D 20 41 3D 55 |PULSE WIDTH. A=U| 000015C0: 53 52 28 39 35 29 2C 44 42 20 20 20 20 20 20 20 |SR(95),DB | 000015D0: 53 45 54 20 43 55 54 4F 46 46 20 46 52 45 51 20 |SET CUTOFF FREQ | 000015E0: 3F 3F 3F 0D 20 41 3D 55 53 52 28 39 36 29 2C 4C |???. A=USR(96),L| 000015F0: 4C 2C 46 4C 2C 46 4C 2C 46 4C 20 20 53 45 54 20 |L,FL,FL,FL SET | 00001600: 46 49 4C 54 45 52 20 42 49 54 53 0D 20 20 20 20 |FILTER BITS. | 00001610: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001620: 45 58 54 45 52 4E 41 4C 20 30 2D 31 0D 20 20 20 |EXTERNAL 0-1. | 00001630: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001640: 20 56 4F 49 43 45 20 30 20 20 30 2D 31 0D 20 20 | VOICE 0 0-1. | 00001650: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001660: 20 20 56 4F 49 43 45 20 31 20 20 30 2D 31 0D 20 | VOICE 1 0-1. | 00001670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00001680: 20 20 20 56 4F 49 43 45 20 32 20 20 30 2D 31 0D | VOICE 2 0-1.| 00001690: 20 41 3D 55 53 52 28 39 37 29 2C 42 20 20 20 20 | A=USR(97),B | 000016A0: 20 20 20 20 53 45 54 20 53 49 44 20 46 49 4C 54 | SET SID FILT| 000016B0: 45 52 20 51 0D 20 41 3D 55 53 52 28 39 38 29 2C |ER Q. A=USR(98),| 000016C0: 42 2C 42 2C 42 2C 42 20 20 53 45 54 20 53 49 44 |B,B,B,B SET SID| 000016D0: 20 46 49 4C 54 45 52 20 4D 4F 44 45 53 0D 20 20 | FILTER MODES. | 000016E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000016F0: 20 20 43 55 54 20 56 4F 49 43 45 20 33 20 30 2D | CUT VOICE 3 0-| 00001700: 31 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |1. | 00001710: 20 20 20 20 20 20 48 49 47 48 20 50 41 53 53 20 | HIGH PASS | 00001720: 20 20 30 2D 31 0D 20 20 20 20 20 20 20 20 20 20 | 0-1. | 00001730: 20 20 20 20 20 20 20 20 20 20 42 41 4E 44 20 50 | BAND P| 00001740: 41 53 53 20 20 20 30 2D 31 0D 20 20 20 20 20 20 |ASS 0-1. | 00001750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 4C 4F | LO| 00001760: 57 20 20 50 41 53 53 20 20 20 30 2D 31 0D 20 41 |W PASS 0-1. A| 00001770: 3D 55 53 52 28 39 39 29 20 20 20 20 20 20 20 20 |=USR(99) | 00001780: 20 20 56 4F 49 43 45 20 47 41 54 45 20 4F 4E 0D | VOICE GATE ON.| 00001790: 20 41 3D 55 53 52 28 31 30 30 29 20 20 20 20 20 | A=USR(100) | 000017A0: 20 20 20 20 56 4F 49 43 45 20 47 41 54 45 20 4F | VOICE GATE O| 000017B0: 46 46 0D 20 41 3D 55 53 52 28 31 30 31 29 2C 42 |FF. A=USR(101),B| 000017C0: 20 20 20 20 20 20 20 53 45 54 20 53 49 44 20 56 | SET SID V| 000017D0: 4F 4C 55 4D 4E 20 30 2D 31 35 0D 20 41 3D 55 53 |OLUMN 0-15. A=US| 000017E0: 52 28 31 30 32 29 2C 42 20 20 20 20 20 20 20 53 |R(102),B S| 000017F0: 45 54 20 56 4F 49 43 45 20 57 41 56 45 46 4F 52 |ET VOICE WAVEFOR| 00001800: 4D 0D 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |M. | 00001810: 20 20 20 20 20 20 57 41 56 45 46 4F 52 4D 20 30 | WAVEFORM 0| 00001820: 2D 33 0D 20 41 3D 55 53 52 28 31 30 33 29 20 20 |-3. A=USR(103) | 00001830: 20 20 20 20 20 20 20 43 4C 45 41 52 20 53 49 44 | CLEAR SID| 00001840: 20 26 20 50 53 45 55 44 4F 20 52 45 47 53 0D 20 | & PSEUDO REGS. | 00001850: 41 3D 55 53 52 28 31 30 34 29 20 20 20 20 20 20 |A=USR(104) | 00001860: 20 20 20 52 45 54 55 52 4E 20 4F 53 43 33 20 4F | RETURN OSC3 O| 00001870: 53 43 49 4C 41 54 4F 52 0D 20 41 3D 55 53 52 28 |SCILATOR. A=USR(| 00001880: 31 30 35 29 20 20 20 20 20 20 20 20 20 52 45 54 |105) RET| 00001890: 55 52 4E 20 4F 53 43 33 20 57 41 56 45 46 4F 52 |URN OSC3 WAVEFOR| 000018A0: 4D 0D 20 41 3D 55 53 52 28 31 30 39 29 20 20 20 |M. A=USR(109) | 000018B0: 20 20 20 20 20 20 58 20 4A 4F 59 20 50 4F 52 54 | X JOY PORT| 000018C0: 32 0D 20 41 3D 55 53 52 28 31 31 30 29 20 20 20 |2. A=USR(110) | 000018D0: 20 20 20 20 20 20 59 20 4A 4F 59 20 50 4F 52 54 | Y JOY PORT| 000018E0: 32 0D 20 41 3D 55 53 52 28 31 31 31 29 20 20 20 |2. A=USR(111) | 000018F0: 20 20 20 20 20 20 58 20 4A 4F 59 20 50 4F 52 54 | X JOY PORT| 00001900: 31 0D 20 41 3D 55 53 52 28 31 31 32 29 20 20 20 |1. A=USR(112) | 00001910: 20 20 20 20 20 20 59 20 4A 4F 59 20 50 4F 52 54 | Y JOY PORT| 00001920: 31 0D 20 41 3D 55 53 52 28 31 31 33 29 20 20 20 |1. A=USR(113) | 00001930: 20 20 20 20 20 20 58 20 50 41 44 44 4C 45 20 50 | X PADDLE P| 00001940: 4F 52 54 32 0D 20 41 3D 55 53 52 28 31 31 34 29 |ORT2. A=USR(114)| 00001950: 20 20 20 20 20 20 20 20 20 59 20 50 41 44 44 4C | Y PADDL| 00001960: 45 20 50 4F 52 54 32 0D 20 41 3D 55 53 52 28 31 |E PORT2. A=USR(1| 00001970: 31 35 29 20 20 20 20 20 20 20 20 20 58 20 50 41 |15) X PA| 00001980: 44 44 4C 45 20 50 4F 52 54 31 0D 20 41 3D 55 53 |DDLE PORT1. A=US| 00001990: 52 28 31 31 36 29 20 20 20 20 20 20 20 20 20 59 |R(116) Y| 000019A0: 20 50 41 44 44 4C 45 20 50 4F 52 54 31 0D 20 41 | PADDLE PORT1. A| 000019B0: 3D 55 53 52 28 31 31 37 29 20 20 20 20 20 20 20 |=USR(117) | 000019C0: 20 20 46 49 52 45 20 42 55 54 54 4F 4E 20 50 4F | FIRE BUTTON PO| 000019D0: 52 54 32 0D 20 41 3D 55 53 52 28 31 31 38 29 20 |RT2. A=USR(118) | 000019E0: 20 20 20 20 20 20 20 20 46 49 52 45 20 42 55 54 | FIRE BUT| 000019F0: 54 4F 4E 20 50 4F 52 54 31 0D 20 41 3D 55 53 52 |TON PORT1. A=USR| 00001A00: 28 31 31 39 29 20 20 20 20 20 20 20 20 20 50 4F |(119) PO| 00001A10: 52 54 31 20 58 28 2D 31 20 30 20 31 29 0D 20 41 |RT1 X(-1 0 1). A| 00001A20: 3D 55 53 52 28 31 32 30 29 20 20 20 20 20 20 20 |=USR(120) | 00001A30: 20 20 50 4F 52 54 31 20 59 28 2D 31 20 30 20 31 | PORT1 Y(-1 0 1| 00001A40: 29 0D 20 41 3D 55 53 52 28 31 32 31 29 20 20 20 |). A=USR(121) | 00001A50: 20 20 20 20 20 20 50 4F 52 54 32 20 58 28 2D 31 | PORT2 X(-1| 00001A60: 20 30 20 31 29 0D 20 41 3D 55 53 52 28 31 32 32 | 0 1). A=USR(122| 00001A70: 29 20 20 20 20 20 20 20 20 20 50 4F 52 54 32 20 |) PORT2 | 00001A80: 59 28 2D 31 20 30 20 31 29 0D 20 2A 2A 2A 2A 2A |Y(-1 0 1). *****| 00001A90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001AA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 20 D4 48 |************. .H| 00001AB0: 45 20 46 4F 4C 4C 4F 57 49 4E 47 20 D5 D3 D2 20 |E FOLLOWING ... | 00001AC0: 43 41 4C 4C 53 20 41 52 45 20 52 45 53 45 52 56 |CALLS ARE RESERV| 00001AD0: 45 44 0D 20 49 4E 54 45 52 4E 41 4C 20 54 4F 20 |ED. INTERNAL TO | 00001AE0: 54 48 45 20 D5 D3 D2 20 50 52 4F 47 52 41 4D 3A |THE ... PROGRAM:| 00001AF0: 0D 20 55 53 52 31 32 33 0D 20 55 53 52 31 32 34 |. USR123. USR124| 00001B00: 0D 20 55 53 52 31 32 35 0D 20 55 53 52 31 32 36 |. USR125. USR126| 00001B10: 0D 20 55 53 52 31 32 37 0D 20 2A 2A 2A 2A 2A 2A |. USR127. ******| 00001B20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001B30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 0D 20 D4 48 45 |***********. .HE| 00001B40: 20 50 52 45 43 45 44 49 4E 47 20 49 4E 46 4F 52 | PRECEDING INFOR| 00001B50: 4D 41 54 49 4F 4E 20 57 41 53 20 45 58 54 52 41 |MATION WAS EXTRA| 00001B60: 43 54 45 44 20 46 52 4F 4D 20 54 48 45 20 CD 41 |CTED FROM THE .A| 00001B70: 59 20 31 39 38 33 20 C3 CF CD CD C1 CE C4 C5 D2 |Y 1983 .........| 00001B80: 20 4D 41 47 41 5A 49 4E 45 20 41 52 54 49 43 4C | MAGAZINE ARTICL| 00001B90: 45 20 27 D0 45 45 4B 20 26 20 D0 4F 4B 45 20 41 |E '.EEK & .OKE A| 00001BA0: 20 D5 D3 D2 20 C9 4E 53 54 52 55 43 54 49 4F 4E | ... .NSTRUCTION| 00001BB0: 20 D3 48 45 45 54 27 20 42 59 20 C7 45 4F 52 47 | .HEET' BY .EORG| 00001BC0: 45 20 C7 41 55 4B 45 4C 20 4F 46 20 D4 41 43 4F |E .AUKEL OF .ACO| 00001BD0: 4D 41 2C D7 C1 2E 0D 0D 0D 0D 0D |MA,........ |
IF YOUR PROGRAM CRASHES DURING DEBUG
CLEAR THE SCREEN WITH (SHIFT CLR-HOME)
AND TYPE THE FOLLOWING. . GOTO60000.
------------------. NOTE: THERE W
ILL BE GARBAGE ON THE SCREEN WHILE YOU A
RE TYPING THIS SO TYPE CAREFULLY!.. (
2). ALL NUMBERS PASSED TO THE USR PROGRA
M MUST BE IN THE RANGE OF 0 TO 65535 (DE
CIMALS WILL BE TRUNCATED) OR THERE WILL
BE AN ILLEGAL QUANTITY ERROR..(3). IF TH
E EXPECTED NUMBER OF VARIABLES ARE NOT P
ASSED TO THE USR CALL THERE WILL BE A SY
NTAX ERROR... (4). IF THE VARIABLE IS
A BYTE OR FLAG TYPE THE PROGRAM WILL AU
TOMATICALLY MASK OFF UNWANTED BITS. .
(5). X-Y PLOTTING WILL ALLOW FOR POSI
TIVE WRAP-AROUND. X-Y MAY BE ANY VALUE B
ETWEEN 0 AND 65535 AND THE USR ROUTINES
WILL AUTOMATICALLY . PLOTX=MOD(320,X
). PLOTY=MOD(200,Y).. (6). THE SI
D ROUTINES MAINTAIN AN INTERNAL IMAGE OF
THE WRITE ONLY SID REGISTERS. THIS ALLO
WS FOR SIMPLIFIED COMMANDS SUCH AS VOICE
ON OR VOICE OFF... CONVENTIONS
. ----------------.. ,B 0 TO 2
55 (BYTE). ,DB 0 TO 65535 (DOUBLE-B
YTE). ,FL = 0 FLAG OFF/CLR. ,F
L <>0 FLAG SET/ON. . SYNTAX.
----------------.. A=USR(1)
(IMPLIED FUNCTION). A=USR(32),B.
A=USR(9),DB. A=USR(90),B,FL,FL,FL.
A=USR(0),0,1,4. A=USR(AA). A
=USR(BB(C)). A=USR(AA%).. USR CO
MMAND LIST. ----------------.. A=USR
(0),B,B,B PRESET VIC MAP TO BANK 0-3
,. VIDEO MEM 0-15, VI
DEO BASE 0 TO 14. STE
P BY 2. A=USR(1) EXECUTE PRESE
T MAP. A=USR(2) RESET PREVIOUS
MAP. A=USR(3),B SET BIT MAP TO
B (B 0-255). A=USR(4),B SET COLO
R RAM TO COL. A=USR(5),B,B SET PLO
T COLORS FG,BG. (FG 0
-15,BG 0-15). A=USR(6),B,B SET BGC
REG BKGD,COL. (BKGD
0-3,COL 0-15). A=USR(7),B SET BO
RDER COL. A=USR(8),B,B COPY CHAR R
OM ROM,BASE. ROM 0-1.
BASE 0-14 STEP 2. A=
USR(9),DB SET TOP OF BASIC. A=USR
(10),DB SET START OF BASIC. A=USR(
16) SET BMM. A=USR(17)
CLR BMM. A=USR(18) SET ECM. A=
USR(19) CLR ECM. A=USR(20)
SET MCM. A=USR(21) CLR MCM
. A=USR(22) SET 38 COLUMNS. A=U
SR(23) SET 40 COLUMNS. A=USR(24
) TURN OFF VIDEO. A=USR(25)
TURN ON VIDEO. A=USR(26)
SET 24 ROWS. A=USR(27) SET 25
ROWS. A=USR(28),B SCROLL Y 0-7.
A=USR(29),B SCROLL X 0-7. A=USR(
30),B,B,B COPY SPRITE TO BIT MAP X 0-
39 Y 0-24. SPRITE ARE
A 0-255. A=USR(32),B SPRITE ON 0
-7. A=USR(33),B SPRITE OFF 0-7. A
=USR(34),DB,B,B MOVE SPRITE X,Y,SPRITE
. X 0-319.
Y 0-199. SPR
ITE 0-7. A=USR(35),B,B SET SPRITE,C
OLOR. SPRITE 0-7.
COLOR 0-15. A=USR(36),B
SET SPRITE MCM ON.
SPRITE 0-7. A=USR(37),B SET
SPRITE MCM OFF. SPRI
TE 0-7. A=USR(38),B,B MCM REGISTER
0-1,. COLOR 0-15. A=U
SR(39),B,B SET SPRITE,MAP.
SPRITE 0-7.
MAP 0-255. A=USR(40),B,B COPY SPR
ITE MAP,(TO)MAP. MAP
0-255,(FROM). MAP 0-2
55. A=USR(41) KILL AND HOME SPR
ITES. A=USR(42) READ BACKGROUND
REG.. A=USR(43) READ SPRITE CO
LLISION REGISTER. A=USR(44),B SPR
ITE HORZ ON. SPRITE 0
-7. A=USR(45),B SPRITE HORZ OFF.
SPRITE 0-7. A=USR(46)
,B SPRITE VERT ON.
SPRITE 0-7. A=USR(47),B SPRI
TE VERT OFF. SPRITE 0
-7. A=USR(48) SPRITE BCKGD SET.
A=USR(49) SPRITE BCKGD CLR. A=
USR(50),B,B MOVE CURSOR X,Y.
X 0-39.
Y 0-24. A=USR(51) RETURN CURSOR
X POS.. A=USR(52) RETURN CURSO
R Y POS.. A=USR(57),B,B,B SET COLOR N
IBBLE X Y. X 0-39.
Y 0-24.
COLOR 0-15. A=USR(58),B,B,B,B SET H
IRES COLOR NIBBLE. X
0-39. Y 0-24.
HI COLOR 0-15.
LO COLOR 0-15. A=USR(59),B,B,B
SET BITS 6&7 VIDEO BASE.
X 0-39. Y 0-24.
BIT PAIR 0-3. A=USR(60
),DB,DB RETURN UNSIGNED EOR. A=USR(61
),DB,DB RETURN UNSIGNED AND. A=USR(62
),DB,DB RETURN UNSIGNED OR. A=USR(63)
,B,B,B,B COPY CHAR TO BIT MAP.
X 0-39. Y
0-24. VIDEO BASE 0-14
STEP 2. CHAR INDEX 0
-255. A=USR(64),DB,DB SET X Y HIRES.
A=USR(65),DB,DB CLR X Y HIRES. A=USR(
66),DB,DB,DB,DB DRAW HIRES LINE SET.
X1,Y1,X2,Y2. A=USR(67),
DB,DB,DB,DB DRAW HIRES LINE CLR.
X1,Y1,X2,Y2. A=USR(68),DB,D
B PLOT LINE TO X2,Y2 SET. A=USR(69),D
B,DB PLOT LINE TO X2,Y2 CLR. A=USR(70
),DB,DB,B PLOT POINT X,Y,BIT PAIR. A=US
R(71),DB,DB,DB,DB,B.
DRAW LINE X1,Y1TOX2,Y2,.
BIT PAIR. A=USR(72),DB,DB,B DRAW LI
NE TO X2,Y2,BIT PAIR. A=USR(90),B,FL,FL,
FL SET VOICE. BIT,RI
NG,SYNC, VOICE 0-2. A=USR(91),B,B,B S
ET VOICE ENVELOPE. VO
ICE 0-2. ATTACK 0-15.
DECAY 0-15. A=USR(9
2),B,B,B SET VOICE ENVELOPE.
VOICE 0-2.
SUSTAIN 0-15. RELEAS
E 0-15. A=USR(93),B,DB SET VOICE FRE
Q. A=USR(94),B,DB SET VOICE PULSE WI
DTH. A=USR(95),DB SET CUTOFF FREQ
???. A=USR(96),LL,FL,FL,FL SET FILTER B
ITS. EXTERNAL 0-1.
VOICE 0 0-1.
VOICE 1 0-1.
VOICE 2 0-1. A=USR(97),B SET
SID FILTER Q. A=USR(98),B,B,B,B SET SID
FILTER MODES. CUT VO
ICE 3 0-1. HIGH PASS
0-1. BAND PASS 0-
1. LOW PASS 0-1. A
=USR(99) VOICE GATE ON. A=USR(1
00) VOICE GATE OFF. A=USR(101),B
SET SID VOLUMN 0-15. A=USR(102),B
SET VOICE WAVEFORM.
WAVEFORM 0-3. A=USR(103) C
LEAR SID & PSEUDO REGS. A=USR(104)
RETURN OSC3 OSCILATOR. A=USR(105)
RETURN OSC3 WAVEFORM. A=USR(109)
X JOY PORT2. A=USR(110) Y
JOY PORT2. A=USR(111) X JOY PORT
1. A=USR(112) Y JOY PORT1. A=USR
(113) X PADDLE PORT2. A=USR(114)
Y PADDLE PORT2. A=USR(115)
X PADDLE PORT1. A=USR(116) Y
PADDLE PORT1. A=USR(117) FIRE B
UTTON PORT2. A=USR(118) FIRE BUT
TON PORT1. A=USR(119) PORT1 X(-1
0 1). A=USR(120) PORT1 Y(-1 0 1
). A=USR(121) PORT2 X(-1 0 1). A
=USR(122) PORT2 Y(-1 0 1). *****
****************************. THE FOLLOW
ING USR CALLS ARE RESERVED. INTERNAL TO
THE USR PROGRAM:. USR123. USR124. USR125
. USR126. USR127. **********************
***********. THE PRECEDING INFORMATION W
AS EXTRACTED FROM THE MAY 1983 COMMANDER
MAGAZINE ARTICLE 'PEEK & POKE A USR INS
TRUCTION SHEET' BY GEORGE GAUKEL OF TACO
MA,WA......
> CLICK IMAGE PREVIEW FOR FULL MODAL