Listing of file='DATAB1.SCR;19' on disk='vmedia/chip_121-sector.ccvf'
### Disk Sector 200 ### 00: 28 20 44 41 54 41 20 42 41 53 45 20 31 20 20 46 ( DATA BASE 1 F 10: 49 4c 45 20 44 45 56 45 4c 4f 50 4d 45 4e 54 20 ILE DEVELOPMENT 20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30: 20 20 20 20 57 4c 47 33 30 44 45 43 38 31 20 29 WLG30DEC81 ) 40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ### Disk Sector 201 ### 00: 30 20 56 41 52 49 41 42 4c 45 20 52 45 43 23 20 0 VARIABLE REC# 10: 20 20 20 20 20 20 20 20 30 20 56 41 52 49 41 42 0 VARIAB 20: 4c 45 20 4f 50 45 4e 20 20 20 20 20 20 20 20 20 LE OPEN 30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 40: 3a 20 32 40 20 44 55 50 20 32 2b 20 40 20 53 57 : 2@ DUP 2+ @ SW 50: 41 50 20 40 20 3b 20 20 28 20 64 6f 75 62 6c 65 AP @ ; ( double 60: 20 66 65 74 63 68 20 29 20 20 20 20 20 20 20 20 fetch ) 70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ### Disk Sector 202 ### 00: 3a 20 4c 41 59 4f 55 54 20 4f 50 45 4e 20 40 20 : LAYOUT OPEN @ 10: 34 20 2b 20 32 40 20 3b 20 28 20 6c 65 61 76 65 4 + 2@ ; ( leave 20: 20 62 79 74 65 73 2f 72 65 63 6f 72 64 2d 32 2c bytes/record-2, 30: 62 79 74 65 73 2f 62 6c 6f 63 6b 2d 31 20 29 20 bytes/block-1 ) 40: 3a 20 52 45 41 44 20 20 28 20 6e 2d 74 68 20 72 : READ ( n-th r 50: 65 63 6f 72 64 2c 20 6f 6e 20 73 74 61 63 6b 2c ecord, on stack, 60: 20 69 73 20 6d 61 64 65 20 63 75 72 72 65 6e 74 is made current 70: 20 29 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ) ### Disk Sector 203 ### 00: 20 20 20 20 20 20 20 20 30 20 4d 41 58 20 44 55 0 MAX DU 10: 50 20 4f 50 45 4e 20 40 20 32 2b 20 40 20 3c 20 P OPEN @ 2+ @ < 20: 30 3d 20 49 46 20 2e 22 20 46 49 4c 45 20 45 52 0= IF ." FILE ER 30: 52 4f 52 22 20 20 20 20 20 20 20 20 20 20 20 20 ROR" 40: 20 20 20 20 20 20 20 20 51 55 49 54 20 54 48 45 QUIT THE 50: 4e 20 52 45 43 23 20 21 20 3b 20 20 20 20 20 20 N REC# ! ; 60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ### Disk Sector 204 ### 00: 3a 20 52 45 43 4f 52 44 20 20 20 20 20 20 20 20 : RECORD 10: 28 20 6c 65 61 76 65 20 61 64 64 72 65 73 73 20 ( leave address 20: 6f 66 20 6e 2d 74 68 20 72 65 63 6f 72 64 20 29 of n-th record ) 30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 40: 20 20 20 20 20 20 20 20 4c 41 59 4f 55 54 20 2a LAYOUT * 50: 2f 4d 4f 44 20 4f 50 45 4e 20 40 20 40 20 2b 20 /MOD OPEN @ @ + 60: 42 4c 4f 43 4b 20 2b 20 3b 20 20 20 20 20 20 20 BLOCK + ; 70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ### Disk Sector 205 ### 00: 3a 20 41 44 44 52 45 53 53 20 20 20 20 20 20 20 : ADDRESS 10: 28 20 6c 65 61 76 65 20 61 64 64 72 65 73 73 20 ( leave address 20: 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 72 of the current r 30: 65 63 6f 72 64 20 29 20 20 20 20 20 20 20 20 20 ecord ) 40: 20 20 20 20 20 20 20 20 52 45 43 23 20 40 20 52 REC# @ R 50: 45 43 4f 52 44 20 3b 20 20 20 20 20 20 20 20 20 ECORD ; 60: 20 20 20 20 20 20 20 20 20 20 20 2d 2d 3e 20 20 --> 70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ### Disk Sector 206 ### 00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ### Disk Sector 207 ### 00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 40: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 60: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 70: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20