DATAREGELS TYPEN

FILE INFORMATION

FILENAME(S): DATAREGELS TYPEN

FILE TYPE(S): PRG

FILE SIZE: 2.1K

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

APPEARS ON: 1 disk(s)

FILE HASH

abbeee4ce9842628de85def9dfd8bf704707853b63466224225169f786cb1085

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
HULP PROG 3	DATAREGELS TYPEN	PRG	DuncanTwain	17	0	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 1B 08 0A 00 8F 20  20 20 20 20 20 20 20 20  |.......         |
00000010: 20 56 45 52 53 49 45 20  31 2E 30 00 41 08 64 00  | VERSIE 1.0.A.d.|
00000020: 8F 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |.***************|
00000030: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
00000040: 2A 00 67 08 6E 00 8F 20  20 44 41 54 41 2D 52 45  |*.g.n..  DATA-RE|
00000050: 47 45 4C 53 20 4D 45 54  20 4E 55 4D 45 52 49 43  |GELS MET NUMERIC|
00000060: 20 50 41 44 20 20 2A 00  8D 08 78 00 8F 52 45 47  | PAD  *...x..REG|
00000070: 45 4C 53 20 35 30 30 2D  35 31 30 20 26 20 37 30  |ELS 500-510 & 70|
00000080: 30 2D 37 33 30 20 55 49  54 20 4D 4C 58 00 B3 08  |0-730 UIT MLX...|
00000090: 82 00 8F 20 20 20 20 20  20 48 2E 47 2E 56 41 4E  |...      H.G.VAN|
000000A0: 20 4D 41 4E 45 4E 20 20  20 38 2F 38 37 20 20 20  | MANEN   8/87   |
000000B0: 20 20 2A 00 D9 08 8C 00  8F 2A 2A 2A 2A 2A 2A 2A  |  *......*******|
000000C0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 2A 2A 2A 2A  |****************|
000000D0: 2A 2A 2A 2A 2A 2A 2A 2A  2A 00 E4 08 96 00 99 C7  |*********.......|
000000E0: 28 31 34 29 00 0D 09 9B  00 99 22 93 11 20 20 20  |(14)......"..   |
000000F0: 20 20 20 20 20 2A 2A 2A  20 C4 C1 D4 C1 D2 C5 C7  |     *** .......|
00000100: C5 CC D3 A0 D4 D9 D0 C5  CE A0 2A 2A 2A 00 58 09  |..........***.X.|
00000110: A0 00 99 22 11 CD 45 54  20 44 49 54 20 50 52 4F  |..."..ET DIT PRO|
00000120: 47 52 41 4D 4D 41 20 4B  55 4E 4E 45 4E 20 44 41  |GRAMMA KUNNEN DA|
00000130: 54 41 52 45 47 45 4C 53  20 49 4E 2D 20 47 45 54  |TAREGELS IN- GET|
00000140: 49 4B 54 20 57 4F 52 44  45 4E 20 4D 2E 42 2E 56  |IKT WORDEN M.B.V|
00000150: 2E 20 45 45 4E 20 22 3B  00 91 09 AA 00 99 22 4E  |. EEN ";......"N|
00000160: 55 4D 45 52 49 43 20 4B  45 59 50 41 44 3A 20 20  |UMERIC KEYPAD:  |
00000170: 20 20 4D 2C 2E 2F 4A 4B  4C 2F 55 49 4F 2F 53 50  |  M,./JKL/UIO/SP|
00000180: 41 43 45 3D 31 32 33 2F  34 35 36 2F 37 38 39 2F  |ACE=123/456/789/|
00000190: 30 00 DE 09 B4 00 99 22  11 CF 4F 4B 20 44 45 20  |0......"..OK DE |
000001A0: 4E 4F 52 4D 41 4C 45 20  43 49 4A 46 45 52 54 4F  |NORMALE CIJFERTO|
000001B0: 45 54 53 45 4E 20 4B 55  4E 4E 45 4E 20 47 45 2D  |ETSEN KUNNEN GE-|
000001C0: 20 42 52 55 49 4B 54 20  57 4F 52 44 45 4E 2E 20  | BRUIKT WORDEN. |
000001D0: C1 4E 44 45 52 45 20 54  4F 45 54 53 22 3B 00 FB  |.NDERE TOETS";..|
000001E0: 09 BE 00 99 22 45 4E 20  5A 49 4A 4E 20 55 49 54  |...."EN ZIJN UIT|
000001F0: 47 45 53 43 48 41 4B 45  4C 44 2E 00 1A 0A C8 00  |GESCHAKELD......|
00000200: 99 22 11 C4 45 20 52 45  47 45 4C 53 20 57 4F 52  |."..E REGELS WOR|
00000210: 44 45 4E 20 41 55 54 4F  22 3B 00 36 0A D2 00 99  |DEN AUTO";.6....|
00000220: 22 4D 41 54 49 53 43 48  20 41 41 4E 47 45 4D 41  |"MATISCH AANGEMA|
00000230: 41 4B 54 2E 22 3B 00 64  0A DC 00 99 22 D0 45 52  |AKT.";.d....".ER|
00000240: 20 47 45 54 41 4C 20 33  20 43 49 4A 46 45 52 53  | GETAL 3 CIJFERS|
00000250: 2E 20 CB 4F 4D 4D 41 20  56 4F 4C 47 54 20 41 55  |. .OMMA VOLGT AU|
00000260: 54 4F 4D 2E 00 A7 0A E6  00 99 22 C9 53 20 47 45  |TOM.......".S GE|
00000270: 54 41 4C 20 3E 32 35 35  20 44 41 4E 20 56 4F 4C  |TAL >255 DAN VOL|
00000280: 47 54 20 42 52 4F 4D 54  4F 4F 4E 2E 20 20 20 20  |GT BROMTOON.    |
00000290: 20 20 20 11 D0 45 52 20  37 20 44 41 54 41 52 45  |   ..ER 7 DATARE|
000002A0: 47 45 4C 53 20 22 3B 00  E5 0A F0 00 99 22 42 45  |GELS ";......"BE|
000002B0: 56 45 53 54 49 47 45 4E  20 4D 45 54 20 52 45 54  |VESTIGEN MET RET|
000002C0: 55 52 4E 21 20 DA 49 45  20 49 4E 53 54 55 43 54  |URN! .IE INSTUCT|
000002D0: 49 45 53 20 49 4E 20 48  45 54 20 50 52 4F 47 52  |IES IN HET PROGR|
000002E0: 41 4D 4D 41 2E 00 31 0B  FA 00 99 22 11 CE 41 20  |AMMA..1...."..A |
000002F0: 49 4E 54 49 4B 4B 45 4E  20 44 41 54 41 52 45 47  |INTIKKEN DATAREG|
00000300: 45 4C 53 20 44 45 20 52  45 47 45 4C 53 20 56 41  |ELS DE REGELS VA|
00000310: 4E 20 44 49 54 50 52 4F  47 52 41 4D 4D 41 20 2D  |N DITPROGRAMMA -|
00000320: 39 39 39 20 56 45 52 57  49 4A 44 45 52 45 4E 22  |999 VERWIJDEREN"|
00000330: 3B 00 47 0B 04 01 99 22  20 28 4D 45 54 20 D6 49  |;.G...." (MET .I|
00000340: 43 41 49 44 29 2E 22 00  72 0B 18 01 99 22 11 20  |CAID).".r....". |
00000350: 20 20 20 20 C4 D2 D5 CB  A0 CF D0 A0 C5 C5 CE A0  |    ............|
00000360: D4 CF C5 D4 D3 A0 56 4F  4F 52 20 56 45 52 56 4F  |......VOOR VERVO|
00000370: 4C 47 00 85 0B 5E 01 A1  41 24 3A 8B 41 24 B2 22  |LG...^..A$:.A$."|
00000380: 22 A7 33 35 30 00 8E 0B  68 01 99 22 93 22 00 A0  |".350...h.."."..|
00000390: 0B 72 01 8B 44 B2 31 A7  99 22 11 11 11 11 11 22  |.r..D.1.."....."|
000003A0: 00 AA 0B 7C 01 97 31 39  2C 31 00 EE 0B 86 01 99  |...|..19,1......|
000003B0: 22 57 41 54 20 49 53 20  44 45 20 45 45 52 53 54  |"WAT IS DE EERST|
000003C0: 45 20 44 41 54 41 2D 52  45 47 45 4C 3F 20 20 20  |E DATA-REGEL?   |
000003D0: 20 20 20 20 20 20 20 20  20 20 20 28 47 45 54 41  |           (GETA|
000003E0: 4C 20 4D 4F 45 54 20 3E  39 39 39 20 22 3B 00 02  |L MOET >999 ";..|
000003F0: 0C 90 01 99 22 5A 49 4A  4E 29 20 20 20 20 20 3A  |...."ZIJN)     :|
00000400: 22 3B 00 23 0C 9A 01 85  41 3A 8B 41 B3 31 30 30  |";.#....A:.A.100|
00000410: 30 A7 99 22 9D 9D 9D 9D  20 20 20 91 91 22 3A 89  |0.."....   ..":.|
00000420: 33 39 30 00 51 0C A4 01  99 3A 97 31 39 2C 30 3A  |390.Q....:.19,0:|
00000430: 85 22 57 41 54 20 49 53  20 44 45 20 4C 41 41 54  |."WAT IS DE LAAT|
00000440: 53 54 45 20 44 41 54 41  2D 52 45 47 45 4C 22 3B  |STE DATA-REGEL";|
00000450: 42 00 7D 0C A9 01 85 22  D7 41 54 20 49 53 20 44  |B.}....".AT IS D|
00000460: 45 20 47 52 4F 4F 54 54  45 20 56 41 4E 20 44 45  |E GROOTTE VAN DE|
00000470: 20 53 54 41 50 50 45 4E  22 3B 43 3A 99 00 92 0C  | STAPPEN";C:....|
00000480: AE 01 81 49 B2 41 A4 42  AA 43 A9 43 3A 4A B2 4A  |...I.A.B.C.C:J.J|
00000490: AA 31 00 A8 0C B8 01 8B  20 49 B1 42 20 B0 20 4A  |.1...... I.B . J|
000004A0: B2 38 20 A7 89 38 31 30  00 B6 0C C2 01 99 49 22  |.8 ..810......I"|
000004B0: 44 41 54 41 22 3B 00 C9  0C CC 01 A1 41 24 3A 8B  |DATA";......A$:.|
000004C0: 41 24 B2 22 22 A7 34 36  30 00 ED 0C D6 01 8B 41  |A$."".460......A|
000004D0: 24 B2 C7 28 32 30 29 A7  8B 54 B2 30 A7 99 22 9D  |$..(20)..T.0..".|
000004E0: 9D 9D 9D 20 20 20 20 9D  9D 9D 9D 22 3B 00 06 0D  |...    ....";...|
000004F0: E0 01 8B 41 24 B2 C7 28  31 33 29 A7 99 22 9D 20  |...A$..(13)..". |
00000500: 22 3A 89 36 31 30 00 2B  0D EA 01 8B C6 28 41 24  |":.610.+.....(A$|
00000510: 29 B1 34 37 AF C6 28 41  24 29 B3 35 38 A7 41 56  |).47..(A$).58.AV|
00000520: B2 C5 28 41 24 29 3A 89  35 34 30 00 73 0D F4 01  |..(A$):.540.s...|
00000530: 41 56 B2 AB 28 41 24 B2  22 4D 22 29 AB 32 AC 28  |AV..(A$."M").2.(|
00000540: 41 24 B2 22 2C 22 29 AB  33 AC 28 41 24 B2 22 2E  |A$.",").3.(A$.".|
00000550: 22 29 AB 34 AC 28 41 24  B2 22 4A 22 29 AB 35 AC  |").4.(A$."J").5.|
00000560: 28 41 24 B2 22 4B 22 29  AB 36 AC 28 41 24 B2 22  |(A$."K").6.(A$."|
00000570: 4C 22 29 00 AF 0D FE 01  41 56 B2 41 56 AB 37 AC  |L").....AV.AV.7.|
00000580: 28 41 24 B2 22 55 22 29  AB 38 AC 28 41 24 B2 22  |(A$."U").8.(A$."|
00000590: 49 22 29 AB 39 AC 28 41  24 B2 22 4F 22 29 3A 8B  |I").9.(A$."O"):.|
000005A0: 41 24 B2 C7 28 33 32 29  A7 41 24 B2 22 30 22 00  |A$..(32).A$."0".|
000005B0: C5 0D 08 02 8B 41 56 B1  30 A7 41 24 B2 C7 28 34  |.....AV.0.A$..(4|
000005C0: 38 AA 41 56 29 00 E0 0D  12 02 8B C6 28 41 24 29  |8.AV).......(A$)|
000005D0: B3 34 38 B0 C6 28 41 24  29 B1 35 37 A7 34 36 30  |.48..(A$).57.460|
000005E0: 00 F7 0D 1C 02 8B 54 B2  30 A7 58 24 B2 C9 28 C4  |......T.0.X$..(.|
000005F0: 28 41 56 29 2C 31 29 00  0E 0E 26 02 8B 54 B2 31  |(AV),1)...&..T.1|
00000600: A7 59 24 B2 C9 28 C4 28  41 56 29 2C 31 29 00 25  |.Y$..(.(AV),1).%|
00000610: 0E 30 02 8B 54 B2 32 A7  5A 24 B2 C9 28 C4 28 41  |.0..T.2.Z$..(.(A|
00000620: 56 29 2C 31 29 00 36 0E  3A 02 99 C9 28 C4 28 41  |V),1).6.:...(.(A|
00000630: 56 29 2C 31 29 3B 00 55  0E 44 02 8B C5 28 58 24  |V),1);.U.D...(X$|
00000640: AA 59 24 AA 5A 24 29 B1  32 35 35 A7 8D 37 31 30  |.Y$.Z$).255..710|
00000650: 3A 89 34 36 30 00 80 0E  4E 02 54 B2 54 AA 31 3A  |:.460...N.T.T.1:|
00000660: 8B 54 B2 33 A7 99 22 2C  22 3B 3A 54 B2 30 3A 58  |.T.3..",";:T.0:X|
00000670: 24 B2 22 22 3A 59 24 B2  22 22 3A 5A 24 B2 22 22  |$."":Y$."":Z$.""|
00000680: 00 89 0E 58 02 89 34 36  30 00 8F 0E 62 02 82 00  |...X..460...b...|
00000690: 95 0E BC 02 3A 00 AA 0E  C6 02 8F 20 2A 2A 2A 20  |....:...... *** |
000006A0: 42 55 5A 5A 45 52 20 2A  2A 2A 00 CD 0E D0 02 97  |BUZZER ***......|
000006B0: 35 34 32 39 36 2C 31 35  3A 97 35 34 32 37 37 2C  |54296,15:.54277,|
000006C0: 34 35 3A 97 35 34 32 37  38 2C 31 36 35 00 ED 0E  |45:.54278,165...|
000006D0: DA 02 97 35 34 32 37 36  2C 33 33 3A 97 35 34 32  |...54276,33:.542|
000006E0: 37 33 2C 36 3A 97 35 34  32 37 32 2C 35 00 18 0F  |73,6:.54272,5...|
000006F0: E4 02 81 4B B2 31 A4 32  30 30 3A 82 3A 97 35 34  |...K.1.200:.:.54|
00000700: 32 37 36 2C 33 32 3A 97  35 34 32 37 33 2C 30 3A  |276,32:.54273,0:|
00000710: 97 35 34 32 37 32 2C 30  00 2A 0F EE 02 99 22 9D  |.54272,0.*....".|
00000720: 9D 9D 20 20 20 9D 9D 9D  22 3B 00 44 0F F8 02 54  |..   ...";.D...T|
00000730: B2 30 3A 58 24 B2 22 22  3A 59 24 B2 22 22 3A 5A  |.0:X$."":Y$."":Z|
00000740: 24 B2 22 22 00 4A 0F 02  03 8E 00 50 0F 20 03 3A  |$."".J.....P. .:|
00000750: 00 68 0F 2A 03 8F 20 2A  2A 2A 20 45 49 4E 44 54  |.h.*.. *** EINDT|
00000760: 45 4B 53 54 20 2A 2A 2A  00 8D 0F 34 03 99 22 44  |EKST ***...4.."D|
00000770: 3D 31 3A 4A 3D 30 3A 47  4F 54 4F 33 37 30 3A 52  |=1:J=0:GOTO370:R|
00000780: 45 4D 20 12 56 45 52 56  4F 4C 47 92 22 00 C0 0F  |EM .VERVOLG."...|
00000790: 48 03 99 22 11 9B 2D C7  41 20 4D 45 54 20 52 45  |H.."..-.A MET RE|
000007A0: 54 55 52 4E 54 4F 45 54  53 20 4F 56 45 52 20 44  |TURNTOETS OVER D|
000007B0: 45 20 44 41 54 41 2D 52  45 47 45 4C 53 2E 22 3B  |E DATA-REGELS.";|
000007C0: 00 EE 0F 52 03 99 22 2D  C4 41 41 52 4E 41 20 4F  |...R.."-.AARNA O|
000007D0: 56 45 52 20 27 44 3D 31  3A 2E 2E 2E 33 37 30 27  |VER 'D=1:...370'|
000007E0: 20 56 4F 4F 52 20 56 45  52 56 4F 4C 47 2E 00 36  | VOOR VERVOLG..6|
000007F0: 10 5C 03 99 22 2D C1 4C  53 20 41 4C 4C 45 20 44  |.\.."-.LS ALLE D|
00000800: 41 54 41 2D 52 45 47 45  4C 53 20 5A 49 4A 4E 20  |ATA-REGELS ZIJN |
00000810: 49 4E 47 45 54 49 4B 54  2C 20 56 45 52 20 57 49  |INGETIKT, VER WI|
00000820: 4A 44 45 52 20 44 41 4E  20 52 45 47 45 4C 53 20  |JDER DAN REGELS |
00000830: 2D 39 39 39 22 3B 00 4A  10 66 03 99 22 20 4D 45  |-999";.J.f.." ME|
00000840: 54 20 D6 49 43 41 49 44  2E 9A 00 50 10 70 03 80  |T .ICAID...P.p..|
00000850: 00 00 00                                          |...             |

.......          VERSIE 1.0.A.D..*******
*************************.G.N..  DATA-RE
GELS MET NUMERIC PAD  *...X..REGELS 500-
510 & 700-730 UIT MLX......      H.G.VAN
 MANEN   8/87     *.Y....***************
*****************......G(14)......"..   
     *** DATAREGELS TYPEN ***.X. ..".MET
 DIT PROGRAMMA KUNNEN DATAREGELS IN- GET
IKT WORDEN M.B.V. EEN ";......"NUMERIC K
EYPAD:    M,./JKL/UIO/SPACE=123/456/789/
0......".OOK DE NORMALE CIJFERTOETSEN KU
NNEN GE- BRUIKT WORDEN. ANDERE TOETS";..
...."EN ZIJN UITGESCHAKELD....H..".DE RE
GELS WORDEN AUTO";.6.R.."MATISCH AANGEMA
AKT.";.D...."PER GETAL 3 CIJFERS. KOMMA 
VOLGT AUTOM......."IS GETAL >255 DAN VOL
GT BROMTOON.       .PER 7 DATAREGELS ";.
....."BEVESTIGEN MET RETURN! ZIE INSTUCT
IES IN HET PROGRAMMA..1....".NA INTIKKEN
 DATAREGELS DE REGELS VAN DITPROGRAMMA -
999 VERWIJDEREN";.G...." (MET VICAID).".
R....".     DRUK OP EEN TOETS VOOR VERVO
LG...^..A$:.A$."".350...H..".". .R..D.1.
."....."...|..19,1......"WAT IS DE EERST
E DATA-REGEL?              (GETAL MOET >
999 ";......"ZIJN)     :";.#....A:.A.100
0.."....   ..":.390.Q....:.19,0:."WAT IS
 DE LAATSTE DATA-REGEL";B.}...."WAT IS D
E GROOTTE VAN DE STAPPEN";C:.......I.A.B
.C.C:J.J.1...... I.B . J.8 ..810...B..I"
DATA";.I.L..A$:.A$."".460...V..A$.G(20).
.T.0.."....    ....";......A$.G(13)..". 
":.610.+....F(A$).47.F(A$).58.AV.E(A$):.
540.S...AV..(A$."M").2.(A$.",").3.(A$.".
").4.(A$."J").5.(A$."K").6.(A$."L").....
AV.AV.7.(A$."U").8.(A$."I").9.(A$."O"):.
A$.G(32).A$."0".E....AV.0.A$.G(48.AV)...
...F(A$).48.F(A$).57.460......T.0.X$.I(D
(AV),1)...&..T.1.Y$.I(D(AV),1).%.0..T.2.
Z$.I(D(AV),1).6.:..I(D(AV),1);.U.D..E(X$
.Y$.Z$).255..710:.460...N.T.T.1:.T.3..",
";:T.0:X$."":Y$."":Z$.""...X..460...B...
....:...F.. *** BUZZER ***.M.P..54296,15
:.54277,45:.54278,165...Z..54276,33:.542
73,6:.54272,5......K.1.200:.:.54276,32:.
54273,0:.54272,0.*...."...   ...";.D...T
.0:X$."":Y$."":Z$."".J.....P. .:.H.*.. *
** EINDTEKST ***...4.."D=1:J=0:GOTO370:R
EM .VERVOLG."...H.."..-GA MET RETURNTOET
S OVER DE DATA-REGELS.";...R.."-DAARNA O
VER 'D=1:...370' VOOR VERVOLG..6.\.."-AL
S ALLE DATA-REGELS ZIJN INGETIKT, VER WI
JDER DAN REGELS -999";.J.F.." MET VICAID
...P.P.....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL