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

GET SUBROUTINE 2

FILE INFORMATION

FILENAME(S): GET SUBROUTINE 2

FILE TYPE(S): PRG

FILE SIZE: 344b

FIRST SEEN: 2025-11-30 21:12:52

APPEARS ON: 1 disk(s)

FILE HASH

05cd451cf1b044b832a29fdf820f3c2fe7d4424b9235a639d69d183f46260856

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
TRANSACTOR 4 GET SUBROUTINE 2 PRG DuncanTwain 30 12 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 04 30 04 00 00 8F 20  54 48 45 20 54 52 41 4E  |..0.... THE TRAN|
00000010: 53 41 43 54 4F 52 20 56  4F 4C 55 4D 45 20 34 20  |SACTOR VOLUME 4 |
00000020: 49 53 53 55 45 20 30 36  20 50 41 47 45 20 33 39  |ISSUE 06 PAGE 39|
00000030: 00 4E 04 01 00 8F 20 45  58 50 41 4E 44 45 44 20  |.N.... EXPANDED |
00000040: 47 45 54 20 53 55 42 52  4F 55 54 49 4E 45 00 69  |GET SUBROUTINE.i|
00000050: 04 02 00 43 52 B2 31 36  37 20 3A 20 8F 20 2A 20  |...CR.167 : . * |
00000060: 34 2E 30 20 42 41 53 49  43 00 84 04 03 00 8F 20  |4.0 BASIC...... |
00000070: 2A 20 56 49 43 20 2B 20  43 36 34 20 2D 20 43 52  |* VIC + C64 - CR|
00000080: 3D 32 30 34 00 A1 04 04  00 8F 20 2A 2A 2A 2A 2A  |=204...... *****|
00000090: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000000A0: 2A 00 A7 04 05 00 8F 00  EE 04 06 00 8F 20 2A 20  |*............ * |
000000B0: 54 48 49 53 20 53 55 42  2D 52 4F 55 54 49 4E 45  |THIS SUB-ROUTINE|
000000C0: 20 57 49 4C 4C 20 52 45  54 55 52 4E 20 57 49 54  | WILL RETURN WIT|
000000D0: 48 20 53 49 4E 47 4C 45  20 43 48 41 52 41 43 54  |H SINGLE CHARACT|
000000E0: 45 52 20 52 45 50 4C 59  20 49 4E 20 42 24 00 F8  |ER REPLY IN B$..|
000000F0: 04 88 13 42 24 B2 22 22  00 03 05 89 13 97 20 43  |...B$.""...... C|
00000100: 52 2C 30 00 17 05 8A 13  A1 41 24 3A 8B 41 24 B2  |R,0......A$:.A$.|
00000110: 22 22 A7 35 30 30 32 00  39 05 8B 13 97 20 43 52  |"".5002.9.... CR|
00000120: 2C 31 3A 8B 20 41 24 B2  C7 28 31 33 29 20 AF 20  |,1:. A$..(13) . |
00000130: C3 28 42 24 29 20 A7 20  8E 00 55 05 8C 13 99 41  |.(B$) . ..U....A|
00000140: 24 3B C7 28 31 35 37 29  3B 3A 42 24 B2 41 24 3A  |$;.(157);:B$.A$:|
00000150: 89 35 30 30 31 00 00 00                           |.5001...        |

..0.... THE TRANSACTOR VOLUME 4 ISSUE 06
 PAGE 39.N.... EXPANDED GET SUBROUTINE.I
...CR.167 : . * 4.0 BASIC...... * VIC + 
C64 - CR=204...... *********************
*............ * THIS SUB-ROUTINE WILL RE
TURN WITH SINGLE CHARACTER REPLY IN B$..
...B$.""...... CR,0......A$:.A$."".5002.
9.... CR,1:. A$.G(13) . C(B$) . ..U....A
$;G(157);:B$.A$:.5001...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL