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

REM MC

FILE INFORMATION

FILENAME(S): REM MC

FILE TYPE(S): PRG

FILE SIZE: 599b

FIRST SEEN: 2025-11-30 21:27:02

APPEARS ON: 1 disk(s)

FILE HASH

25e0c5ed434526eb5509f0a0c8604e1f2a5f6dd043ded8ed5e47990f82baeaf8

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
BASICCOMPILER REM MC PRG DuncanTwain 15 4 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 25 08 0A 00 8F 20  54 48 49 53 20 50 52 4F  |..%.... THIS PRO|
00000010: 47 52 41 4D 20 44 45 4D  4F 4E 53 54 52 41 54 45  |GRAM DEMONSTRATE|
00000020: 53 20 48 4F 57 00 4A 08  14 00 8F 20 54 4F 20 49  |S HOW.J.... TO I|
00000030: 4E 43 4C 55 44 45 20 4D  41 43 48 49 4E 45 20 43  |NCLUDE MACHINE C|
00000040: 4F 44 45 20 49 4E 54 4F  20 41 00 67 08 1E 00 8F  |ODE INTO A.g....|
00000050: 20 43 4F 4D 50 49 4C 45  44 20 42 41 53 49 43 20  | COMPILED BASIC |
00000060: 50 52 4F 47 52 41 4D 00  6D 08 28 00 8F 00 93 08  |PROGRAM.m.(.....|
00000070: 32 00 8F 20 54 48 45 20  43 4F 44 45 20 41 54 20  |2.. THE CODE AT |
00000080: 4C 49 4E 45 53 20 31 30  30 30 2D 31 30 35 30 20  |LINES 1000-1050 |
00000090: 49 53 3A 00 99 08 3C 00  8F 00 AA 08 46 00 8F 20  |IS:...<.....F.. |
000000A0: 20 20 20 20 20 20 20 53  45 49 00 C0 08 50 00 8F  |       SEI...P..|
000000B0: 20 20 20 20 20 20 20 20  4C 44 58 20 23 24 30 30  |        LDX #$00|
000000C0: 00 E3 08 5A 00 8F 20 20  20 4C 4F 4F 50 20 4C 44  |...Z..   LOOP LD|
000000D0: 41 20 24 44 30 31 32 20  3B 47 45 54 20 52 41 53  |A $D012 ;GET RAS|
000000E0: 54 45 52 00 04 09 5B 00  8F 20 20 20 20 20 20 20  |TER...[..       |
000000F0: 20 4C 53 52 20 41 20 20  20 20 20 3B 50 4F 53 49  | LSR A     ;POSI|
00000100: 54 49 4F 4E 00 17 09 5C  00 8F 20 20 20 20 20 20  |TION...\..      |
00000110: 20 20 4C 53 52 20 41 00  2A 09 5D 00 8F 20 20 20  |  LSR A.*.]..   |
00000120: 20 20 20 20 20 4C 53 52  20 41 00 3D 09 5E 00 8F  |     LSR A.=.^..|
00000130: 20 20 20 20 20 20 20 20  4C 53 52 20 41 00 63 09  |        LSR A.c.|
00000140: 5F 00 8F 20 20 20 20 20  20 20 20 53 54 41 20 35  |_..        STA 5|
00000150: 33 32 38 31 20 3B 43 48  41 4E 47 45 20 43 4F 4C  |3281 ;CHANGE COL|
00000160: 4F 55 52 00 86 09 60 00  8F 20 20 20 20 20 20 20  |OUR...`..       |
00000170: 20 44 45 58 20 20 20 20  20 20 20 3B 52 45 50 45  | DEX       ;REPE|
00000180: 41 54 20 32 35 36 00 A4  09 61 00 8F 20 20 20 20  |AT 256...a..    |
00000190: 20 20 20 20 42 4E 45 20  4C 4F 4F 50 20 20 3B 54  |    BNE LOOP  ;T|
000001A0: 49 4D 45 53 00 B5 09 62  00 8F 20 20 20 20 20 20  |IMES...b..      |
000001B0: 20 20 43 4C 49 00 BB 09  63 00 8F 00 C5 09 64 00  |  CLI...c.....d.|
000001C0: 8D 31 30 30 30 00 D8 09  6E 00 A1 41 24 3A 8B 41  |.1000...n..A$:.A|
000001D0: 24 B2 22 22 A7 31 30 30  00 E7 09 78 00 97 35 33  |$."".100...x..53|
000001E0: 32 38 31 2C 30 3A 80 00  F9 09 E8 03 8F 23 24 37  |281,0:.......#$7|
000001F0: 38 2C 24 41 32 2C 24 30  30 00 0B 0A F2 03 8F 23  |8,$A2,$00......#|
00000200: 24 41 44 2C 24 31 32 2C  24 44 30 00 21 0A FC 03  |$AD,$12,$D0.!...|
00000210: 8F 23 24 34 41 2C 24 34  41 2C 24 34 41 2C 24 34  |.#$4A,$4A,$4A,$4|
00000220: 41 00 32 0A 06 04 8F 23  24 38 44 2C 44 35 33 32  |A.2....#$8D,D532|
00000230: 38 31 00 44 0A 10 04 8F  23 24 43 41 2C 24 44 30  |81.D....#$CA,$D0|
00000240: 2C 24 46 33 00 4E 0A 1A  04 8F 23 24 35 38 00 54  |,$F3.N....#$58.T|
00000250: 0A 24 04 8E 00 00 00                              |.$.....         |
..%.... THIS PROGRAM DEMONSTRATES HOW.J.
... TO INCLUDE MACHINE CODE INTO A.G....
 COMPILED BASIC PROGRAM.M.(.....2.. THE 
CODE AT LINES 1000-1050 IS:...<.....F.. 
       SEI...P..        LDX #$00...Z..  
 LOOP LDA $D012 ;GET RASTER...[..       
 LSR A     ;POSITION...\..        LSR A.
*.]..        LSR A.=.^..        LSR A.C.
_..        STA 53281 ;CHANGE COLOUR...`.
.        DEX       ;REPEAT 256...A..    
    BNE LOOP  ;TIMES...B..        CLI...
C...E.D..1000.X.N..A$:.A$."".100...X..53
281,0:.......#$78,$A2,$00......#$AD,$12,
$D0.!....#$4A,$4A,$4A,$4A.2....#$8D,D532
81.D....#$CA,$D0,$F3.N....#$58.T.$.....
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL