SCR13
FILE INFORMATION
FILENAME(S): SCR13
FILE TYPE(S): SEQ
FILE SIZE: 1.3K
FIRST SEEN: 2025-12-02 23:08:18
APPEARS ON: 2 disk(s)
FILE HASH
f7f42f4ec51bf27aa7a6b0eb07ef8aa368f3f3572002c51fb0e2fb82fa8146a6
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SPRACHPROGRAMME | SCR13 | SEQ | swasti, flohmarkt, swasti, misc | 25 | 3 | DOWNLOAD FILE |
| SPRACHPROGRAMME | SCR13 | SEQ | swasti, flohmarkt, swasti, misc | 4 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 28 20 44 41 54 41 20 54 59 50 45 53 20 54 4F 20 |( DATA TYPES TO | 00000010: 44 45 46 49 4E 45 20 4D 4E 45 4D 4F 4E 49 43 53 |DEFINE MNEMONICS| 00000020: 20 29 20 48 45 58 20 20 20 20 20 20 20 20 20 20 | ) HEX | 00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 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 28 20 44 45 46 49 4E 45 | ( DEFINE| 00000080: 20 31 2D 42 59 54 45 20 49 4E 53 54 52 55 43 54 | 1-BYTE INSTRUCT| 00000090: 49 4F 4E 53 20 29 20 20 20 20 20 20 20 20 20 20 |IONS ) | 000000A0: 3A 20 31 4F 50 20 3C 42 55 49 4C 44 53 20 43 2C |: 1OP <BUILDS C,| 000000B0: 20 44 4F 45 53 3E 20 20 20 20 20 20 20 20 20 20 | DOES> | 000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 43 40 20 43 | C@ C| 000000D0: 2C 20 38 30 30 20 4D 4F 44 45 20 21 20 3B 20 20 |, 800 MODE ! ; | 000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 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 20 20 20 20 20 20 20 20 | | 00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000130: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000140: 28 20 44 45 46 49 4E 45 20 32 20 26 20 33 20 42 |( DEFINE 2 & 3 B| 00000150: 59 54 45 20 49 4E 53 54 52 55 43 53 20 29 20 48 |YTE INSTRUCS ) H| 00000160: 45 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |EX | 00000170: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000190: 3A 20 4D 4E 45 20 3C 42 55 49 4C 44 53 20 43 2C |: MNE <BUILDS C,| 000001A0: 20 2C 20 44 4F 45 53 3E 20 20 20 20 20 20 20 20 | , DOES> | 000001B0: 20 20 20 20 20 20 20 20 20 20 44 55 50 20 31 2B | DUP 1+| 000001C0: 20 40 20 28 20 46 45 54 43 48 20 41 44 44 52 2D | @ ( FETCH ADDR-| 000001D0: 4D 4F 44 45 20 4D 41 53 4B 20 29 20 20 20 20 20 |MODE MASK ) | 000001E0: 20 20 53 57 41 50 20 43 40 20 28 20 46 45 54 43 | SWAP C@ ( FETC| 000001F0: 48 20 4F 50 43 4F 44 45 20 42 41 53 45 20 56 41 |H OPCODE BASE VA| 00000200: 4C 55 45 29 20 20 20 20 20 20 4F 50 45 52 41 4E |LUE) OPERAN| 00000210: 44 20 28 20 46 45 54 43 48 20 43 46 41 20 54 4F |D ( FETCH CFA TO| 00000220: 20 48 41 4E 44 4C 45 20 4D 4F 44 45 29 20 20 20 | HANDLE MODE) | 00000230: 20 20 45 58 45 43 55 54 45 20 28 20 45 58 45 43 | EXECUTE ( EXEC| 00000240: 55 54 45 20 52 4F 55 54 49 4E 45 20 54 4F 20 20 |UTE ROUTINE TO | 00000250: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000260: 20 20 20 20 48 41 4E 44 4C 45 20 41 44 44 52 45 | HANDLE ADDRE| 00000270: 53 53 20 4D 4F 44 45 20 29 20 20 20 20 20 20 20 |SS MODE ) | 00000280: 20 20 38 30 30 20 4D 4F 44 45 20 21 20 3B 20 28 | 800 MODE ! ; (| 00000290: 20 44 45 46 41 55 4C 54 20 41 44 44 52 20 4D 4F | DEFAULT ADDR MO| 000002A0: 44 45 20 29 20 20 20 20 20 20 20 20 20 20 20 20 |DE ) | 000002B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000002C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000002D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 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 20 20 20 20 20 20 | | 00000300: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000310: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000320: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 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 20 20 20 20 20 20 | | 00000350: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 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 | | 00000400: 20 20 20 48 45 4C 50 20 21 21 20 20 20 20 20 20 | HELP !! | 00000410: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 DC E9 | ..| 00000420: 53 08 05 0E 04 0C 05 20 48 01 12 04 17 01 12 05 |S...... H.......| 00000430: 20 43 0F 0D 10 01 0E 19 2C E9 55 0E 09 14 20 32 | C......,.U... 2| 00000440: 38 2C E9 54 09 10 10 05 12 20 54 12 01 04 09 0E |8,.T..... T.....| 00000450: 07 20 45 13 14 01 14 05 E9 54 09 10 10 05 12 13 |. E......T......| 00000460: 16 09 0C 0C 05 E9 2F 4D 4F 32 36 E9 4D 12 20 53 |....../MO26.M. S| 00000470: 08 05 0E 04 0C 05 EA DC DC 54 08 05 20 01 02 0F |.........T.. ...| 00000480: 16 05 20 0C 09 0E 05 13 20 0F 0E 20 14 08 09 13 |.. ..... .. ....| 00000490: 20 10 01 07 05 20 13 08 0F 17 20 08 0F 17 20 14 | .... .... ... .| 000004A0: 0F 20 14 19 10 05 20 09 0E 06 0F 12 0D 01 14 09 |. .... .........| 000004B0: 0F 0E 20 14 0F 20 02 05 20 0D 05 12 07 05 04 20 |.. .. .. ...... | 000004C0: 09 0E 14 0F 20 14 08 05 20 0D 01 09 0E 20 04 0F |.... ... .... ..| 000004D0: 03 15 0D 05 0E 14 2E DC DC 45 01 03 08 20 10 09 |.........E... ..| 000004E0: 05 03 05 20 0F 06 20 09 0E 06 0F 12 0D 01 14 09 |... .. .........| 000004F0: 0F 0E 20 13 08 0F 15 0C 04 20 02 05 20 10 12 05 |.. ...... .. ...| 00000500: 00 |. |
( DATA TYPES TO DEFINE MNEMONICS ) HEX
( DEFINE 1-BYTE INSTRUCTIONS )
: 1OP <BUILDS C, DOES>
C@ C, 800 MODE ! ;
( DEFINE 2 & 3 BYTE INSTRUCS ) HEX
: MNE <BUILDS C, , DOES>
DUP 1+ @ ( FETCH ADDR-MODE MASK )
SWAP C@ ( FETCH OPCODE BASE VALUE)
OPERAND ( FETCH CFA TO HANDLE MODE)
EXECUTE ( EXECUTE ROUTINE TO
HANDLE ADDRESS MODE )
800 MODE ! ; ( DEFAULT ADDR MODE )
DECIMAL -->
HELP !!
..S...... H....... C......
,.U... 28,.T..... T...... E......T......
....../MO26.M. S.........T.. ..... .....
.. .... .... .... ... .. .... .........
.. .. .. ...... .... ... .... ..........
.E... ..... .. ........... ...... .. ...
.
> CLICK IMAGE PREVIEW FOR FULL MODAL