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

TEXTEDIT.LOGO

FILE INFORMATION

FILENAME(S): TEXTEDIT.LOGO

FILE TYPE(S): PRG

FILE SIZE: 598b

FIRST SEEN: 2025-11-30 21:06:56

APPEARS ON: 1 disk(s)

FILE HASH

a1bcd23821b0ceb030582b0154df4e0f424abeb1405c8244fb100837a9cae6d0

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
0020B TEXTEDIT.LOGO PRG DuncanTwain 21 13 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 00 20 54 4F 20 53 41 56  45 54 45 58 54 20 3A 46  |. TO SAVETEXT :F|
00000010: 49 4C 45 0D 20 2E 4F 50  54 49 4F 4E 20 22 53 41  |ILE. .OPTION "SA|
00000020: 56 45 20 30 20 31 0D 20  53 41 56 45 20 3A 46 49  |VE 0 1. SAVE :FI|
00000030: 4C 45 0D 20 2E 4F 50 54  49 4F 4E 20 22 53 41 56  |LE. .OPTION "SAV|
00000040: 45 20 30 20 30 0D 45 4E  44 0D 0D 54 4F 20 52 45  |E 0 0.END..TO RE|
00000050: 41 44 54 45 58 54 20 3A  46 49 4C 45 0D 20 2E 4F  |ADTEXT :FILE. .O|
00000060: 50 54 49 4F 4E 20 22 52  45 41 44 20 30 20 31 0D  |PTION "READ 0 1.|
00000070: 20 52 45 41 44 20 3A 46  49 4C 45 0D 20 2E 4F 50  | READ :FILE. .OP|
00000080: 54 49 4F 4E 20 22 52 45  41 44 20 30 20 30 0D 45  |TION "READ 0 0.E|
00000090: 4E 44 0D 0D 54 4F 20 53  48 4F 57 46 49 4C 45 20  |ND..TO SHOWFILE |
000000A0: 3A 46 49 4C 45 0D 20 52  45 41 44 54 45 58 54 20  |:FILE. READTEXT |
000000B0: 3A 46 49 4C 45 0D 20 53  48 4F 57 54 45 58 54 0D  |:FILE. SHOWTEXT.|
000000C0: 45 4E 44 0D 0D 54 4F 20  50 52 49 4E 54 46 49 4C  |END..TO PRINTFIL|
000000D0: 45 20 3A 46 49 4C 45 0D  20 2E 4F 50 54 49 4F 4E  |E :FILE. .OPTION|
000000E0: 20 22 50 52 49 4E 54 45  52 20 31 20 37 0D 20 50  | "PRINTER 1 7. P|
000000F0: 52 49 4E 54 45 52 0D 20  53 48 4F 57 46 49 4C 45  |RINTER. SHOWFILE|
00000100: 0D 20 4E 4F 50 52 49 4E  54 45 52 0D 20 2E 4F 50  |. NOPRINTER. .OP|
00000110: 54 49 4F 4E 20 22 50 52  49 4E 54 45 52 20 31 20  |TION "PRINTER 1 |
00000120: 30 0D 45 4E 44 0D 0D 54  4F 20 50 52 49 4E 54 54  |0.END..TO PRINTT|
00000130: 45 58 54 0D 20 2E 4F 50  54 49 4F 4E 20 22 50 52  |EXT. .OPTION "PR|
00000140: 49 4E 54 45 52 20 31 20  37 0D 20 50 52 49 4E 54  |INTER 1 7. PRINT|
00000150: 45 52 0D 20 53 48 4F 57  54 45 58 54 0D 20 4E 4F  |ER. SHOWTEXT. NO|
00000160: 50 52 49 4E 54 45 52 0D  20 2E 4F 50 54 49 4F 4E  |PRINTER. .OPTION|
00000170: 20 22 50 52 49 4E 54 45  52 20 31 20 30 0D 45 4E  | "PRINTER 1 0.EN|
00000180: 44 0D 0D 54 4F 20 53 48  4F 57 54 45 58 54 0D 20  |D..TO SHOWTEXT. |
00000190: 50 52 49 4E 54 2E 4D 45  4D 20 38 31 39 32 20 28  |PRINT.MEM 8192 (|
000001A0: 20 2E 45 58 41 4D 49 4E  45 20 3A 45 4E 44 42 55  | .EXAMINE :ENDBU|
000001B0: 46 20 29 20 2B 20 32 35  36 20 2A 20 28 20 2E 45  |F ) + 256 * ( .E|
000001C0: 58 41 4D 49 4E 45 20 3A  45 4E 44 42 55 46 20 2B  |XAMINE :ENDBUF +|
000001D0: 20 31 20 29 0D 45 4E 44  0D 0D 54 4F 20 50 52 49  | 1 ).END..TO PRI|
000001E0: 4E 54 2E 4D 45 4D 20 3A  46 52 4F 4D 20 3A 45 4E  |NT.MEM :FROM :EN|
000001F0: 44 0D 20 49 46 20 3A 46  52 4F 4D 20 3D 20 3A 45  |D. IF :FROM = :E|
00000200: 4E 44 20 53 54 4F 50 0D  20 50 52 49 4E 54 31 20  |ND STOP. PRINT1 |
00000210: 43 48 41 52 20 2E 45 58  41 4D 49 4E 45 20 3A 46  |CHAR .EXAMINE :F|
00000220: 52 4F 4D 0D 20 50 52 49  4E 54 2E 4D 45 4D 20 3A  |ROM. PRINT.MEM :|
00000230: 46 52 4F 4D 20 2B 20 31  20 3A 45 4E 44 0D 45 4E  |FROM + 1 :END.EN|
00000240: 44 0D 0D 4D 41 4B 45 20  22 45 4E 44 42 55 46 20  |D..MAKE "ENDBUF |
00000250: 28 38 36 29 0D 49                                 |(86).I          |
. TO SAVETEXT :FILE. .OPTION "SAVE 0 1. 
SAVE :FILE. .OPTION "SAVE 0 0.END..TO RE
ADTEXT :FILE. .OPTION "READ 0 1. READ :F
ILE. .OPTION "READ 0 0.END..TO SHOWFILE 
:FILE. READTEXT :FILE. SHOWTEXT.END..TO 
PRINTFILE :FILE. .OPTION "PRINTER 1 7. P
RINTER. SHOWFILE. NOPRINTER. .OPTION "PR
INTER 1 0.END..TO PRINTTEXT. .OPTION "PR
INTER 1 7. PRINTER. SHOWTEXT. NOPRINTER.
 .OPTION "PRINTER 1 0.END..TO SHOWTEXT. 
PRINT.MEM 8192 ( .EXAMINE :ENDBUF ) + 25
6 * ( .EXAMINE :ENDBUF + 1 ).END..TO PRI
NT.MEM :FROM :END. IF :FROM = :END STOP.
 PRINT1 CHAR .EXAMINE :FROM. PRINT.MEM :
FROM + 1 :END.END..MAKE "ENDBUF (86).I
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL