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

LPAD.L

FILE INFORMATION

FILENAME(S): LPAD.L

FILE TYPE(S): SEQ

FILE SIZE: 110b

FIRST SEEN: 2025-12-01 01:48:21

APPEARS ON: 2 disk(s)

FILE HASH

e379a286a83fbceea1b129f198a81458ca00453aba4002f283f8c7ca74b69aa8

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
CCS COMAL LPAD.L SEQ hedning, Mattias H00r 25 5 DOWNLOAD FILE
CCS COMAL LPAD.L SEQ hedning, Mattias H00r 25 5 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 39 30 30 30 20 50 52 4F  43 20 4C 50 41 44 28 52  |9000 PROC LPAD(R|
00000010: 45 46 20 41 24 2C 4D 29  20 43 4C 4F 53 45 44 0D  |EF A$,M) CLOSED.|
00000020: 39 30 31 30 20 46 4F 52  20 49 3A 3D 31 20 54 4F  |9010 FOR I:=1 TO|
00000030: 20 4D 2D 4C 45 4E 28 41  24 29 20 44 4F 0D 39 30  | M-LEN(A$) DO.90|
00000040: 32 30 20 41 24 3A 3D 22  20 22 2B 41 24 0D 39 30  |20 A$:=" "+A$.90|
00000050: 33 30 20 45 4E 44 46 4F  52 20 49 0D 39 30 34 30  |30 ENDFOR I.9040|
00000060: 20 45 4E 44 50 52 4F 43  20 4C 50 41 44 0D        | ENDPROC LPAD.  |

9000 PROC LPAD(REF A$,M) CLOSED.9010 FOR
 I:=1 TO M-LEN(A$) DO.9020 A$:=" "+A$.90
30 ENDFOR I.9040 ENDPROC LPAD.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL