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

SCR6

FILE INFORMATION

FILENAME(S): SCR6

FILE TYPE(S): SEQ

FILE SIZE: 1K

FIRST SEEN: 2025-11-30 21:15:31

APPEARS ON: 1 disk(s)

FILE HASH

36ff58f0f1a8a634523bcb3de692465aa00703f48c4fb18ce500a72bec603f28

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
FORTH 64 1 SCR6 SEQ DuncanTwain 23 3 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 28 20 53 54 41 52 54 20  4F 46 20 41 53 53 45 4D  |( START OF ASSEM|
00000010: 42 4C 45 52 20 53 43 52  45 45 4E 53 20 29 20 48  |BLER SCREENS ) H|
00000020: 45 58 20 20 20 20 20 20  20 20 56 4F 43 41 42 55  |EX        VOCABU|
00000030: 4C 41 52 59 20 41 53 53  45 4D 42 4C 45 52 20 49  |LARY ASSEMBLER I|
00000040: 4D 4D 45 44 49 41 54 45  20 20 20 20 20 20 20 20  |MMEDIATE        |
00000050: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000060: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000070: 20 20 20 20 20 20 20 20  20 20 41 53 53 45 4D 42  |          ASSEMB|
00000080: 4C 45 52 20 44 45 46 49  4E 49 54 49 4F 4E 53 20  |LER DEFINITIONS |
00000090: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000C0: 20 20 20 20 20 20 20 20  28 20 41 44 44 52 45 53  |        ( ADDRES|
000000D0: 53 45 53 20 49 4E 20 46  4F 52 54 48 20 4B 45 52  |SES IN FORTH KER|
000000E0: 4E 41 4C 20 29 20 20 20  20 20 20 20 20 20 20 20  |NAL )           |
000000F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000100: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000110: 20 20 20 20 20 20 20 20  27 20 43 4F 4C 44 20 20  |        ' COLD  |
00000120: 20 20 20 20 20 20 20 20  20 20 20 43 4F 4E 53 54  |           CONST|
00000130: 41 4E 54 20 43 4F 4C 44  20 20 20 20 20 20 20 20  |ANT COLD        |
00000140: 20 20 43 4F 4C 44 20 33  39 20 2B 20 20 20 20 20  |  COLD 39 +     |
00000150: 20 20 20 43 4F 4E 53 54  41 4E 54 20 57 41 52 4D  |   CONSTANT WARM|
00000160: 20 20 20 20 20 20 20 20  27 20 4C 49 54 20 31 31  |        ' LIT 11|
00000170: 20 2B 20 20 20 20 20 20  20 20 20 43 4F 4E 53 54  | +         CONST|
00000180: 41 4E 54 20 50 55 53 48  20 20 20 20 20 20 20 20  |ANT PUSH        |
00000190: 27 20 53 50 40 20 31 2B  20 20 20 20 20 20 20 20  |' SP@ 1+        |
000001A0: 20 20 20 43 4F 4E 53 54  41 4E 54 20 50 55 53 48  |   CONSTANT PUSH|
000001B0: 30 41 20 20 20 20 20 20  27 20 4C 49 54 20 31 33  |0A      ' LIT 13|
000001C0: 20 2B 20 20 20 20 20 20  20 20 20 43 4F 4E 53 54  | +         CONST|
000001D0: 41 4E 54 20 50 55 54 20  20 20 20 20 20 20 20 20  |ANT PUT         |
000001E0: 27 20 4C 49 54 20 31 38  20 2B 20 20 20 20 20 20  |' LIT 18 +      |
000001F0: 20 20 20 43 4F 4E 53 54  41 4E 54 20 4E 45 58 54  |   CONSTANT NEXT|
00000200: 20 20 20 20 20 20 20 20  27 20 45 58 45 43 55 54  |        ' EXECUT|
00000210: 45 20 4E 46 41 20 31 31  20 2D 20 43 4F 4E 53 54  |E NFA 11 - CONST|
00000220: 41 4E 54 20 53 45 54 55  50 20 20 20 20 20 20 20  |ANT SETUP       |
00000230: 27 20 28 44 4F 29 20 43  20 2B 20 20 20 20 20 20  |' (DO) C +      |
00000240: 20 20 20 43 4F 4E 53 54  41 4E 54 20 50 4F 50 54  |   CONSTANT POPT|
00000250: 57 4F 20 20 20 20 20 20  27 20 28 44 4F 29 20 45  |WO      ' (DO) E|
00000260: 20 2B 20 20 20 20 20 20  20 20 20 43 4F 4E 53 54  | +         CONST|
00000270: 41 4E 54 20 50 4F 50 20  20 20 20 20 20 20 20 20  |ANT POP         |
00000280: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000290: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002A0: 20 20 20 20 20 20 20 20  20 20 38 33 20 43 4F 4E  |          83 CON|
000002B0: 53 54 41 4E 54 20 58 53  41 56 45 20 20 20 20 20  |STANT XSAVE     |
000002C0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002D0: 20 20 38 31 20 43 4F 4E  53 54 41 4E 54 20 55 50  |  81 CONSTANT UP|
000002E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000002F0: 20 20 20 20 20 20 20 20  20 20 37 34 20 43 4F 4E  |          74 CON|
00000300: 53 54 41 4E 54 20 4E 20  20 20 20 20 20 20 20 20  |STANT N         |
00000310: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000320: 20 20 37 43 20 43 4F 4E  53 54 41 4E 54 20 49 50  |  7C CONSTANT IP|
00000330: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000340: 20 20 20 20 20 20 20 20  20 20 37 46 20 43 4F 4E  |          7F CON|
00000350: 53 54 41 4E 54 20 57 20  20 20 20 20 20 20 20 20  |STANT W         |
00000360: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000370: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000380: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000390: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003B0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003C0: 44 45 43 49 4D 41 4C 20  20 2D 2D 3E 20 20 20 20  |DECIMAL  -->    |
000003D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000003F0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
( START OF ASSEMBLER SCREENS ) HEX      
  VOCABULARY ASSEMBLER IMMEDIATE        
                                        
  ASSEMBLER DEFINITIONS                 
                                        
( ADDRESSES IN FORTH KERNAL )           
                                        
' COLD             CONSTANT COLD        
  COLD 39 +        CONSTANT WARM        
' LIT 11 +         CONSTANT PUSH        
' SP@ 1+           CONSTANT PUSH0A      
' LIT 13 +         CONSTANT PUT         
' LIT 18 +         CONSTANT NEXT        
' EXECUTE NFA 11 - CONSTANT SETUP       
' (DO) C +         CONSTANT POPTWO      
' (DO) E +         CONSTANT POP         
                                        
  83 CONSTANT XSAVE                     
  81 CONSTANT UP                        
  74 CONSTANT N                         
  7C CONSTANT IP                        
  7F CONSTANT W                         
                                        
                                        
DECIMAL  -->                            
                        
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL