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

VITALS 1541

FILE INFORMATION

FILENAME(S): VITALS 1541

FILE TYPE(S): PRG

FILE SIZE: 2K

FIRST SEEN: 2025-12-01 02:25:33

APPEARS ON: 1 disk(s)

FILE HASH

d7a6aa4e604e50abc17d526e1fe04a391213df1524e554539b1f150d4699b4df

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
STONYSOFT PD NR VITALS 1541 PRG hedning, shine 28 5 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 29 08 01 00 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |..).... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 51 08 02 00 8F 20  |*********.Q.... |
00000030: 2A 20 56 49 54 41 4C 53  20 20 4A 41 4E 20 38 37  |* VITALS  JAN 87|
00000040: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000050: 2A 00 79 08 03 00 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |*.y.... ********|
00000060: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000070: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 A1 08 04 00 8F 20  |*********...... |
00000080: 2A 20 57 49 4C 4C 20 43  4F 52 4C 45 59 20 20 20  |* WILL CORLEY   |
00000090: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000A0: 2A 00 C9 08 05 00 8F 20  2A 20 37 35 35 31 20 54  |*...... * 7551 T|
000000B0: 57 49 4C 49 47 48 54 20  44 52 2E 20 20 20 20 20  |WILIGHT DR.     |
000000C0: 20 20 20 20 20 20 20 20  2A 00 F1 08 06 00 8F 20  |        *...... |
000000D0: 2A 20 53 41 43 52 41 4D  45 4E 54 4F 2C 20 43 41  |* SACRAMENTO, CA|
000000E0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000000F0: 2A 00 19 09 07 00 8F 20  2A 20 39 35 38 32 32 20  |*...... * 95822 |
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  2A 00 41 09 08 00 8F 20  |        *.A.... |
00000120: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000130: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000140: 2A 00 6A 09 09 00 44 43  24 B2 22 22 3A 81 20 58  |*.j...DC$."":. X|
00000150: B2 31 20 A4 20 34 34 3A  87 20 41 3A 44 43 24 B2  |.1 . 44:. A:DC$.|
00000160: 44 43 24 AA C7 28 41 29  3A 82 00 8A 09 0A 00 97  |DC$..(A):.......|
00000170: 20 35 33 32 38 30 2C 31  31 3A 97 20 35 33 32 38  | 53280,11:. 5328|
00000180: 31 2C 31 32 3A 99 20 22  93 22 00 9C 09 0B 00 49  |1,12:. ".".....I|
00000190: B2 35 31 32 3A 4B 24 B2  C7 28 30 29 00 B6 09 0C  |.512:K$..(0)....|
000001A0: 00 99 20 A3 31 34 29 20  22 05 56 49 54 41 4C 53  |.. .14) ".VITALS|
000001B0: 20 31 35 34 31 22 00 D0  09 0D 00 99 20 A3 31 34  | 1541"...... .14|
000001C0: 29 20 22 97 B7 B7 B7 B7  B7 B7 B7 B7 B7 B7 B7 22  |) "............"|
000001D0: 00 F9 09 0E 00 99 20 A3  38 29 22 28 43 29 20 31  |...... .8)"(C) 1|
000001E0: 39 38 37 20 42 59 20 57  49 4C 4C 20 43 4F 52 4C  |987 BY WILL CORL|
000001F0: 45 59 11 11 11 11 11 11  22 00 16 0A 0F 00 85 20  |EY......"...... |
00000200: 22 97 46 49 4C 45 20 54  4F 20 41 4E 41 4C 59 5A  |".FILE TO ANALYZ|
00000210: 45 05 22 3B 4E 24 00 31  0A 10 00 8B 20 C3 28 4E  |E.";N$.1.... .(N|
00000220: 24 29 B1 31 36 20 B0 20  4E 24 B2 22 22 20 A7 20  |$).16 . N$."" . |
00000230: 8A 00 59 0A 11 00 A0 20  31 35 3A 9F 20 31 35 2C  |..Y.... 15:. 15,|
00000240: 38 2C 31 35 2C 22 49 22  3A 8D 20 34 39 3A 54 59  |8,15,"I":. 49:TY|
00000250: 24 B2 22 50 22 3A 41 B2  31 00 75 0A 12 00 9F 20  |$."P":A.1.u.... |
00000260: 32 2C 38 2C 32 2C 4E 24  AA 22 2C 22 AA 54 59 24  |2,8,2,N$.",".TY$|
00000270: AA 22 2C 52 22 00 8B 0A  13 00 84 31 35 2C 45 3A  |.",R"......15,E:|
00000280: 8B 20 45 B3 32 30 20 A7  20 32 36 00 93 0A 14 00  |. E.20 . 26.....|
00000290: A0 20 32 00 A3 0A 15 00  8B 20 45 B3 B1 36 34 20  |. 2...... E..64 |
000002A0: A7 20 8A 00 B7 0A 16 00  8B 20 41 B2 31 20 A7 20  |. ....... A.1 . |
000002B0: 54 59 24 B2 22 53 22 00  CB 0A 17 00 8B 20 41 B2  |TY$."S"...... A.|
000002C0: 32 20 A7 20 54 59 24 B2  22 55 22 00 D9 0A 18 00  |2 . TY$."U".....|
000002D0: 8B 20 41 B2 33 20 A7 20  8A 00 E8 0A 19 00 41 B2  |. A.3 . ......A.|
000002E0: 41 AA 31 3A 89 20 31 38  00 0E 0B 1A 00 A1 23 32  |A.1:. 18......#2|
000002F0: 2C 41 24 3A 53 4C B2 C2  28 35 31 32 29 3A A1 23  |,A$:SL..(512):.#|
00000300: 32 2C 41 24 3A 53 48 B2  C2 28 35 31 32 29 00 2A  |2,A$:SH..(512).*|
00000310: 0B 1B 00 98 31 35 2C 22  4D 2D 52 22 20 C7 28 32  |....15,"M-R" .(2|
00000320: 34 29 20 4B 24 20 C7 28  32 29 00 4C 0B 1C 00 A1  |4) K$ .(2).L....|
00000330: 23 31 35 2C 41 24 3A 54  B2 C2 28 49 29 3A A1 23  |#15,A$:T..(I):.#|
00000340: 31 35 2C 41 24 3A 53 B2  C2 28 49 29 00 7D 0B 1D  |15,A$:S..(I).}..|
00000350: 00 A0 20 32 3A 98 31 35  2C 22 55 3B 22 3A 9F 20  |.. 2:.15,"U;":. |
00000360: 32 2C 38 2C 32 2C 22 23  33 22 3A 8D 20 34 39 3A  |2,8,2,"#3":. 49:|
00000370: 98 31 35 2C 22 42 2D 50  22 3B 32 3B 30 00 89 0B  |.15,"B-P";2;0...|
00000380: 1E 00 98 32 2C 44 43 24  3B 00 B0 0B 1F 00 98 31  |...2,DC$;......1|
00000390: 35 2C 22 4D 2D 57 22 20  C7 28 36 29 20 C7 28 30  |5,"M-W" .(6) .(0|
000003A0: 29 20 C7 28 32 29 20 C7  28 54 29 20 C7 28 53 29  |) .(2) .(T) .(S)|
000003B0: 00 CC 0B 20 00 98 31 35  2C 22 4D 2D 45 22 20 C7  |... ..15,"M-E" .|
000003C0: 28 30 29 20 C7 28 36 29  3A A0 20 32 00 E8 0B 21  |(0) .(6):. 2...!|
000003D0: 00 98 31 35 2C 22 4D 2D  52 22 20 C7 28 31 30 29  |..15,"M-R" .(10)|
000003E0: 20 4B 24 20 C7 28 32 29  00 0A 0C 22 00 A1 23 31  | K$ .(2)..."..#1|
000003F0: 35 2C 41 24 3A 4C B2 C2  28 49 29 3A A1 23 31 35  |5,A$:L..(I):.#15|
00000400: 2C 41 24 3A 48 B2 C2 28  49 29 00 27 0C 23 00 98  |,A$:H..(I).'.#..|
00000410: 31 35 2C 22 4D 2D 52 22  20 C7 28 31 29 20 C7 28  |15,"M-R" .(1) .(|
00000420: 33 29 20 C7 28 31 29 00  40 0C 24 00 A1 23 31 35  |3) .(1).@.$..#15|
00000430: 2C 41 24 3A 42 59 54 45  53 B2 C2 28 49 29 AB 31  |,A$:BYTES..(I).1|
00000440: 00 49 0C 25 00 A0 20 31  35 00 60 0C 26 00 99 20  |.I.%.. 15.`.&.. |
00000450: 22 97 46 49 4C 45 20 54  59 50 45 3A 05 20 22 3B  |".FILE TYPE:. ";|
00000460: 00 7C 0C 27 00 8B 20 54  59 24 B2 22 50 22 20 A7  |.|.'.. TY$."P" .|
00000470: 20 99 20 22 50 52 4F 47  52 41 4D 22 00 9B 0C 28  | . "PROGRAM"...(|
00000480: 00 8B 20 54 59 24 B2 22  53 22 20 A7 20 99 20 22  |.. TY$."S" . . "|
00000490: 53 45 51 55 45 4E 54 49  41 4C 22 00 B4 0C 29 00  |SEQUENTIAL"...).|
000004A0: 8B 20 54 59 24 B2 22 55  22 20 A7 20 99 20 22 55  |. TY$."U" . . "U|
000004B0: 53 45 52 22 00 CE 0C 2A  00 99 20 22 97 42 4C 4F  |SER"...*.. ".BLO|
000004C0: 43 4B 53 3A 05 22 20 48  AC 32 35 36 AA 4C 00 F7  |CKS:." H.256.L..|
000004D0: 0C 2B 00 99 20 22 97 42  59 54 45 53 3A 05 22 20  |.+.. ".BYTES:." |
000004E0: 28 48 AC 32 35 36 AA 4C  AB 31 29 AC 32 35 34 AA  |(H.256.L.1).254.|
000004F0: 42 59 54 45 53 AB 31 00  0B 0D 2C 00 8B 20 54 59  |BYTES.1...,.. TY|
00000500: 24 B3 B1 22 50 22 20 A7  20 34 36 00 2D 0D 2D 00  |$.."P" . 46.-.-.|
00000510: 99 20 22 97 53 54 41 52  54 20 41 44 44 52 45 53  |. ".START ADDRES|
00000520: 53 3A 05 22 53 48 AC 32  35 36 AA 53 4C 00 48 0D  |S:."SH.256.SL.H.|
00000530: 2E 00 99 20 22 97 53 54  41 52 54 49 4E 47 20 54  |... ".STARTING T|
00000540: 52 41 43 4B 3A 05 22 54  00 64 0D 2F 00 99 20 22  |RACK:."T.d./.. "|
00000550: 97 53 54 41 52 54 49 4E  47 20 53 45 43 54 4F 52  |.STARTING SECTOR|
00000560: 3A 05 22 53 00 7D 0D 30  00 97 20 31 39 38 2C 30  |:."S.}.0.. 198,0|
00000570: 3A 92 20 31 39 38 2C 31  3A 89 20 35 34 00 9B 0D  |:. 198,1:. 54...|
00000580: 31 00 84 31 35 2C 45 2C  45 24 2C 45 54 2C 45 53  |1..15,E,E$,ET,ES|
00000590: 3A 8B 20 45 B3 32 30 20  A7 20 8E 00 A8 0D 32 00  |:. E.20 . ....2.|
000005A0: A0 20 32 3A A0 20 31 35  00 BB 0D 33 00 99 20 22  |. 2:. 15...3.. "|
000005B0: 44 49 53 4B 20 45 52 52  4F 52 22 00 CC 0D 34 00  |DISK ERROR"...4.|
000005C0: 99 20 45 2C 45 24 2C 45  54 3B 45 53 00 E7 0D 35  |. E,E$,ET;ES...5|
000005D0: 00 54 49 24 B2 22 30 30  30 30 30 30 22 3A 92 20  |.TI$."000000":. |
000005E0: 31 36 31 2C 31 3A 8A 00  F4 0D 36 00 99 20 22 93  |161,1:....6.. ".|
000005F0: 05 11 11 22 00 3E 0E 37  00 99 22 20 20 20 56 49  |...".>.7.."   VI|
00000600: 54 41 4C 53 20 31 35 34  31 20 48 41 53 20 42 45  |TALS 1541 HAS BE|
00000610: 45 4E 20 52 45 4C 45 41  53 45 44 20 54 4F 20 54  |EN RELEASED TO T|
00000620: 48 45 20 50 55 42 4C 49  43 20 44 4F 4D 41 49 4E  |HE PUBLIC DOMAIN|
00000630: 20 41 53 20 46 52 45 45  57 41 52 45 22 3B 00 7A  | AS FREEWARE";.z|
00000640: 0E 38 00 99 22 2E 41 20  44 4F 4E 41 54 49 4F 4E  |.8..".A DONATION|
00000650: 20 4F 46 20 24 31 2C 35  20 4F 52 20 31 30 20 57  | OF $1,5 OR 10 W|
00000660: 4F 55 4C 44 20 47 4C 41  44 4C 59 20 42 45 20 20  |OULD GLADLY BE  |
00000670: 41 43 43 45 50 54 45 44  21 22 00 A7 0E 39 00 99  |ACCEPTED!"...9..|
00000680: 20 22 20 20 20 20 20 20  12 53 55 50 50 4F 52 54  | "      .SUPPORT|
00000690: 20 54 48 45 20 46 52 45  45 57 41 52 45 20 43 4F  | THE FREEWARE CO|
000006A0: 4E 43 45 50 54 21 22 00  C2 0E 3A 00 99 20 A3 31  |NCEPT!"...:.. .1|
000006B0: 34 29 22 11 11 11 57 49  4C 4C 20 43 4F 52 4C 45  |4)"...WILL CORLE|
000006C0: 59 22 00 E0 0E 3B 00 99  20 A3 31 31 29 22 37 35  |Y"...;.. .11)"75|
000006D0: 35 31 20 54 57 49 4C 49  47 48 54 20 44 52 2E 22  |51 TWILIGHT DR."|
000006E0: 00 FA 0E 3C 00 99 20 A3  31 33 29 22 53 41 43 52  |...<.. .13)"SACR|
000006F0: 41 4D 45 4E 54 4F 2C 43  41 22 00 0C 0F 3D 00 99  |AMENTO,CA"...=..|
00000700: 20 A3 31 37 29 22 39 35  38 32 32 22 00 27 0F 3E  | .17)"95822".'.>|
00000710: 00 54 49 24 B2 22 30 30  30 30 30 30 22 3A 92 20  |.TI$."000000":. |
00000720: 31 36 31 2C 31 3A 8A 00  5B 0F 3F 00 44 43 24 B2  |161,1:..[.?.DC$.|
00000730: 22 22 3A 59 B2 34 39 31  35 32 3A 81 20 58 B2 31  |"":Y.49152:. X.1|
00000740: 20 A4 20 31 38 34 3A 87  20 41 3A 44 43 24 B2 44  | . 184:. A:DC$.D|
00000750: 43 24 AA C7 28 41 29 3A  82 3A 8E 00 83 0F 40 00  |C$..(A):.:....@.|
00000760: 83 20 31 36 39 2C 30 2C  31 33 33 2C 31 30 2C 31  |. 169,0,133,10,1|
00000770: 33 33 2C 31 31 2C 31 36  39 2C 31 37 36 2C 31 33  |33,11,169,176,13|
00000780: 33 2C 30 00 AA 0F 41 00  83 20 31 36 35 2C 30 2C  |3,0...A.. 165,0,|
00000790: 34 38 2C 32 35 32 2C 31  36 39 2C 31 32 38 2C 31  |48,252,169,128,1|
000007A0: 33 33 2C 30 2C 31 36 35  2C 30 00 D1 0F 42 00 83  |33,0,165,0...B..|
000007B0: 20 34 38 2C 32 35 32 2C  32 33 30 2C 31 30 2C 32  | 48,252,230,10,2|
000007C0: 30 38 2C 32 2C 32 33 30  2C 31 31 2C 31 37 33 2C  |08,2,230,11,173,|
000007D0: 30 00 F4 0F 43 00 83 20  33 2C 32 30 38 2C 31 2C  |0...C.. 3,208,1,|
000007E0: 39 36 2C 31 33 33 2C 36  2C 31 37 33 2C 31 2C 33  |96,133,6,173,1,3|
000007F0: 2C 31 33 33 00 07 10 44  00 83 20 37 2C 32 34 2C  |,133...D.. 7,24,|
00000800: 31 34 34 2C 32 31 38 00  00 00                    |144,218...      |
..).... ********************************
*.Q.... * VITALS  JAN 87                
*.Y.... ********************************
*...... * WILL CORLEY                   
*.I.... * 7551 TWILIGHT DR.             
*...... * SACRAMENTO, CA                
*...... * 95822                         
*.A.... ********************************
*.J...DC$."":. X.1 . 44:. A:DC$.DC$.G(A)
:....... 53280,11:. 53281,12:. ".".....I
.512:K$.G(0)...... .14) ".VITALS 1541".P
.... .14) "............"...... .8)"(C) 1
987 BY WILL CORLEY......"...... ".FILE T
O ANALYZE.";N$.1.... C(N$).16 . N$."" . 
..Y...  15:. 15,8,15,"I":. 49:TY$."P":A.
1.U.... 2,8,2,N$.",".TY$.",R"......15,E:
. E.20 . 26.....  2...... E..64 . ......
. A.1 . TY$."S".K.... A.2 . TY$."U".Y...
. A.3 . ......A.A.1:. 18......#2,A$:SL.B
(512):.#2,A$:SH.B(512).*....15,"M-R" G(2
4) K$ G(2).L....#15,A$:T.B(I):.#15,A$:S.
B(I).}...  2:.15,"U;":. 2,8,2,"#3":. 49:
.15,"B-P";2;0......2,DC$;......15,"M-W" 
G(6) G(0) G(2) G(T) G(S).L. ..15,"M-E" G
(0) G(6):  2...!..15,"M-R" G(10) K$ G(2)
..."..#15,A$:L.B(I):.#15,A$:H.B(I).'.#..
15,"M-R" G(1) G(3) G(1).@.$..#15,A$:BYTE
S.B(I).1.I.%.  15.`.&.. ".FILE TYPE:. ";
.|.'.. TY$."P" . . "PROGRAM"...(.. TY$."
S" . . "SEQUENTIAL"...).. TY$."U" . . "U
SER".N.*.. ".BLOCKS:." H.256.L...+.. ".B
YTES:." (H.256.L.1).254.BYTES.1...,.. TY
$.."P" . 46.-.-.. ".START ADDRESS:."SH.2
56.SL.H.... ".STARTING TRACK:."T.D./.. "
.STARTING SECTOR:."S.}.0.. 198,0:. 198,1
:. 54...1..15,E,E$,ET,ES:. E.20 . ....2.
  2:  15...3.. "DISK ERROR".L.4.. E,E$,E
T;ES...5.TI$."000000":. 161,1:....6.. ".
...".>.7.."   VITALS 1541 HAS BEEN RELEA
SED TO THE PUBLIC DOMAIN AS FREEWARE";.Z
.8..".A DONATION OF $1,5 OR 10 WOULD GLA
DLY BE  ACCEPTED!"...9.. "      .SUPPORT
 THE FREEWARE CONCEPT!".B.:.. .14)"...WI
LL CORLEY"...;.. .11)"7551 TWILIGHT DR."
...<.. .13)"SACRAMENTO,CA"...=.. .17)"95
822".'.>.TI$."000000":. 161,1:..[.?.DC$.
"":Y.49152:. X.1 . 184:. A:DC$.DC$.G(A):
.:....@.. 169,0,133,10,133,11,169,176,13
3,0...A.. 165,0,48,252,169,128,133,0,165
,0.Q.B.. 48,252,230,10,208,2,230,11,173,
0...C.. 3,208,1,96,133,6,173,1,3,133...D
.. 7,24,144,218...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL