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

AWRDINFOSETUP

FILE INFORMATION

FILENAME(S): AWRDINFOSETUP

FILE TYPE(S): DEL

FILE SIZE: 1.1K

FIRST SEEN: 2025-11-30 19:36:45

APPEARS ON: 1 disk(s)

FILE HASH

025a7a3ec6998c36a679be84c7c71f7779f57c92a00dda417d7a2a48589a2037

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
JBR C64 RADIO MM AWRDINFOSETUP DEL Curtcool, Bo 15 17 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 08 34 08 0A 00 8F 20  53 45 54 55 50 20 50 52  |..4.... SETUP PR|
00000010: 4F 47 52 41 4D 20 46 4F  52 20 41 57 41 52 44 20  |OGRAM FOR AWARD |
00000020: 49 4E 46 4F 20 44 41 54  41 20 46 49 4C 45 20 28  |INFO DATA FILE (|
00000030: 43 36 34 29 00 6E 08 14  00 8F 20 42 59 20 4B 43  |C64).n.... BY KC|
00000040: 36 41 20 41 4E 44 20 4E  36 4E 42 3B 20 28 43 29  |6A AND N6NB; (C)|
00000050: 20 31 39 38 33 20 42 59  20 48 41 59 44 45 4E 20  | 1983 BY HAYDEN |
00000060: 42 4F 4F 4B 20 43 4F 2E  2C 20 49 4E 43 2E 00 98  |BOOK CO., INC...|
00000070: 08 1E 00 99 20 22 57 41  52 4E 49 4E 47 3A 20 54  |.... "WARNING: T|
00000080: 48 49 53 20 50 52 4F 47  52 41 4D 20 44 45 4C 45  |HIS PROGRAM DELE|
00000090: 54 45 53 20 54 48 45 22  00 BF 08 28 00 99 20 22  |TES THE"...(.. "|
000000A0: 27 41 57 52 44 49 4E 46  4F 27 20 46 49 4C 45 20  |'AWRDINFO' FILE |
000000B0: 46 4F 52 20 54 48 45 20  41 57 41 52 44 53 22 00  |FOR THE AWARDS".|
000000C0: EF 08 32 00 99 20 22 44  41 54 45 20 42 41 53 45  |..2.. "DATE BASE|
000000D0: 20 50 52 4F 47 52 41 4D  20 41 4E 44 20 43 52 45  | PROGRAM AND CRE|
000000E0: 41 54 45 53 20 41 20 4E  45 57 20 4F 4E 45 22 00  |ATES A NEW ONE".|
000000F0: 11 09 3C 00 99 3A 85 20  22 4F 4B 20 54 4F 20 43  |..<..:. "OK TO C|
00000100: 4F 4E 54 49 4E 55 45 20  28 59 2F 4E 29 22 3B 41  |ONTINUE (Y/N)";A|
00000110: 24 00 23 09 46 00 8B 20  41 24 B3 B1 22 59 22 20  |$.#.F.. A$.."Y" |
00000120: A7 20 80 00 2F 09 4B 00  43 4D 24 B2 22 2C 22 00  |. ../.K.CM$.",".|
00000130: 3C 09 50 00 9F 31 35 2C  38 2C 31 35 00 52 09 5A  |<.P..15,8,15.R.Z|
00000140: 00 98 31 35 2C 22 53 30  3A 41 57 52 44 49 4E 46  |..15,"S0:AWRDINF|
00000150: 4F 22 00 6C 09 64 00 9F  34 2C 38 2C 34 2C 22 41  |O".l.d..4,8,4,"A|
00000160: 57 52 44 49 4E 46 4F 2C  53 2C 57 22 00 99 09 6E  |WRDINFO,S,W"...n|
00000170: 00 99 3A 99 20 22 45 4E  54 45 52 20 4E 41 4D 45  |..:. "ENTER NAME|
00000180: 20 4F 46 20 54 48 49 53  20 4F 50 45 52 41 54 49  | OF THIS OPERATI|
00000190: 4E 47 20 41 57 41 52 44  22 00 BD 09 70 00 85 20  |NG AWARD"...p.. |
000001A0: 22 45 58 41 4D 50 4C 45  2D 20 46 49 56 45 20 42  |"EXAMPLE- FIVE B|
000001B0: 41 4E 44 20 44 58 43 43  22 3B 41 4E 24 00 C8 09  |AND DXCC";AN$...|
000001C0: 72 00 98 34 2C 41 4E 24  00 F3 09 78 00 99 3A 99  |r..4,AN$...x..:.|
000001D0: 20 22 45 4E 54 45 52 20  54 48 45 20 4E 41 4D 45  | "ENTER THE NAME|
000001E0: 20 4F 46 20 54 48 45 20  41 57 41 52 44 20 55 4E  | OF THE AWARD UN|
000001F0: 49 54 22 00 10 0A 7A 00  85 20 22 45 58 41 4D 50  |IT"...z.. "EXAMP|
00000200: 4C 45 2D 20 43 4F 55 4E  54 52 59 22 3B 41 4D 24  |LE- COUNTRY";AM$|
00000210: 00 1B 0A 7C 00 98 34 2C  41 4D 24 00 48 0A 82 00  |...|..4,AM$.H...|
00000220: 99 3A 99 20 22 45 4E 54  45 52 20 54 48 45 20 4E  |.:. "ENTER THE N|
00000230: 55 4D 42 45 52 20 4F 46  20 53 45 50 41 52 41 54  |UMBER OF SEPARAT|
00000240: 45 20 42 41 4E 44 53 22  00 5E 0A 84 00 85 20 22  |E BANDS".^.... "|
00000250: 45 58 41 4D 50 4C 45 2D  20 35 22 3B 4E 42 00 68  |EXAMPLE- 5";NB.h|
00000260: 0A 86 00 98 34 2C 4E 42  00 96 0A 8C 00 99 3A 99  |....4,NB......:.|
00000270: 20 22 45 4E 54 45 52 20  54 48 45 20 4E 55 4D 42  | "ENTER THE NUMB|
00000280: 45 52 20 4F 46 20 44 49  46 46 45 52 45 4E 54 20  |ER OF DIFFERENT |
00000290: 41 57 41 52 44 22 00 BF  0A 8E 00 99 20 22 55 4E  |AWARD"...... "UN|
000002A0: 49 54 53 20 28 45 2E 47  2E 20 53 54 41 54 45 53  |ITS (E.G. STATES|
000002B0: 20 4F 52 20 43 4F 55 4E  54 52 49 45 53 29 22 00  | OR COUNTRIES)".|
000002C0: C8 0A 90 00 85 20 4E 41  00 D2 0A 92 00 98 34 2C  |..... NA......4,|
000002D0: 4E 41 00 FC 0A 96 00 99  20 22 4E 4F 57 2C 20 45  |NA...... "NOW, E|
000002E0: 4E 54 45 52 20 54 48 45  20 4E 41 4D 45 53 20 4F  |NTER THE NAMES O|
000002F0: 46 20 54 48 45 20 42 41  4E 44 53 22 00 19 0B 98  |F THE BANDS"....|
00000300: 00 86 20 42 4E 24 28 4E  42 29 2C 50 24 28 4E 41  |.. BN$(NB),P$(NA|
00000310: 29 2C 4E 4D 24 28 4E 41  29 00 28 0B A0 00 81 20  |),NM$(NA).(.... |
00000320: 4A B2 31 20 A4 20 4E 42  00 4B 0B AA 00 99 20 22  |J.1 . NB.K.... "|
00000330: 45 4E 54 45 52 20 54 48  45 20 4E 41 4D 45 20 4F  |ENTER THE NAME O|
00000340: 46 20 42 41 4E 44 20 23  22 3B 4A 00 58 0B AC 00  |F BAND #";J.X...|
00000350: 85 20 42 4E 24 28 4A 29  00 87 0B AE 00 8B 20 C3  |. BN$(J)...... .|
00000360: 28 42 4E 24 28 4A 29 29  B1 34 20 A7 20 99 20 22  |(BN$(J)).4 . . "|
00000370: 54 4F 4F 20 4C 4F 4E 47  2E 20 20 34 20 4D 41 58  |TOO LONG.  4 MAX|
00000380: 22 3A 89 20 31 37 30 00  95 0B B0 00 98 34 2C 42  |":. 170......4,B|
00000390: 4E 24 28 4A 29 00 9D 0B  B4 00 82 20 4A 00 C8 0B  |N$(J)...... J...|
000003A0: BE 00 99 20 22 46 49 4E  41 4C 4C 59 2C 20 45 4E  |... "FINALLY, EN|
000003B0: 54 45 52 20 54 48 45 20  53 54 41 4E 44 41 52 44  |TER THE STANDARD|
000003C0: 20 50 52 45 46 49 58 22  00 EE 0B C0 00 99 20 22  | PREFIX"...... "|
000003D0: 4F 52 20 41 42 42 52 45  56 49 41 54 49 4F 4E 20  |OR ABBREVIATION |
000003E0: 46 4F 52 20 45 41 43 48  20 22 3B 41 4D 24 00 13  |FOR EACH ";AM$..|
000003F0: 0C C2 00 99 20 22 41 4E  44 20 49 54 53 20 4E 41  |.... "AND ITS NA|
00000400: 4D 45 20 28 45 2E 47 2E  20 4A 41 2C 4A 41 50 41  |ME (E.G. JA,JAPA|
00000410: 4E 29 22 00 22 0C C8 00  81 20 4A B2 31 20 A4 20  |N)".".... J.1 . |
00000420: 4E 41 00 47 0C D2 00 99  20 22 45 4E 54 45 52 20  |NA.G.... "ENTER |
00000430: 54 48 45 20 50 52 45 46  49 58 20 41 4E 44 20 4E  |THE PREFIX AND N|
00000440: 41 4D 45 20 4F 46 22 00  58 0C D4 00 99 20 41 4D  |AME OF".X.... AM|
00000450: 24 3B 22 20 23 22 3B 4A  00 6B 0C D6 00 85 20 50  |$;" #";J.k.... P|
00000460: 24 28 4A 29 2C 4E 4D 24  28 4A 29 00 81 0C E0 00  |$(J),NM$(J).....|
00000470: 98 34 2C 50 24 28 4A 29  43 4D 24 4E 4D 24 28 4A  |.4,P$(J)CM$NM$(J|
00000480: 29 00 89 0C E6 00 82 20  4A 00 94 0C F0 00 A0 34  |)...... J......4|
00000490: 3A A0 31 35 00 00 00                              |:.15...         |
..4.... SETUP PROGRAM FOR AWARD INFO DAT
A FILE (C64).N.... BY KC6A AND N6NB; (C)
 1983 BY HAYDEN BOOK CO., INC....... "WA
RNING: THIS PROGRAM DELETES THE"...(.. "
'AWRDINFO' FILE FOR THE AWARDS"...2.. "D
ATE BASE PROGRAM AND CREATES A NEW ONE".
..<..:. "OK TO CONTINUE (Y/N)";A$.#.F.. 
A$.."Y" . ../.K.CM$.",".<.P..15,8,15.R.Z
..15,"S0:AWRDINFO".L.D..4,8,4,"AWRDINFO,
S,W"...N..:. "ENTER NAME OF THIS OPERATI
NG AWARD"...P.. "EXAMPLE- FIVE BAND DXCC
";AN$.H.R..4,AN$...X..:. "ENTER THE NAME
 OF THE AWARD UNIT"...Z.. "EXAMPLE- COUN
TRY";AM$...|..4,AM$.H....:. "ENTER THE N
UMBER OF SEPARATE BANDS".^.... "EXAMPLE-
 5";NB.H....4,NB......:. "ENTER THE NUMB
ER OF DIFFERENT AWARD"...... "UNITS (E.G
. STATES OR COUNTRIES)".H.... NA.R....4,
NA...... "NOW, ENTER THE NAMES OF THE BA
NDS"...... BN$(NB),P$(NA),NM$(NA).(. .. 
J.1 . NB.K.... "ENTER THE NAME OF BAND #
";J.X.... BN$(J)...... C(BN$(J)).4 . . "
TOO LONG.  4 MAX":. 170......4,BN$(J)...
... J.H.... "FINALLY, ENTER THE STANDARD
 PREFIX"...... "OR ABBREVIATION FOR EACH
 ";AM$...B.. "AND ITS NAME (E.G. JA,JAPA
N)".".H.. J.1 . NA.G.R.. "ENTER THE PREF
IX AND NAME OF".X.T.. AM$;" #";J.K.V.. P
$(J),NM$(J)......4,P$(J)CM$NM$(J)...... 
J..... 4: 15...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL