|
DataMuseum.dkPresents historical artifacts from the history of: RegneCentralen RC850 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RegneCentralen RC850 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 2176 (0x880) Names: »STAT.HEL«
└─⟦ac5a365ea⟧ Bits:30005990 VISTA med database skema over brugere └─⟦this⟧ »STAT.HEL« └─⟦cdb5db4d7⟧ Bits:30005991 VISTA Database └─⟦this⟧ »STAT.HEL«
0x000…020 (0,) 7f 2b 20 56 20 49 20 53 20 54 20 41 20 20 44 41 54 41 42 41 53 45 20 20 53 54 41 54 49 53 54 49 ┆ + V I S T A DATABASE STATISTI┆ 0x020…040 4b 4b 7f 46 20 0d 0a 7f 2b 20 7f 3f 3d 7f 46 20 0d 0a 7f 4b 20 56 65 72 73 6a 6f 6e 73 6e 75 6d ┆KK F + ?= F K Versjonsnum┆ 0x040…060 6d 65 72 20 3a 20 e1 a0 a0 7f 31 20 0d 0a 7f 4b 20 53 65 72 69 65 6e 75 6d 6d 65 72 7f 24 20 3a ┆mer : 1 K Serienummer $ :┆ 0x060…080 20 e1 7f 2f a0 7f 24 20 0d 0a 7f 70 20 0d 0a 20 20 20 44 61 74 61 62 61 73 65 20 6e 61 76 6e 3a ┆ / $ p Database navn:┆ 0x080…0a0 20 e1 7f 27 a0 7f 26 20 41 6b 74 75 65 6c 6c 20 73 74 7c 72 72 65 6c 73 65 3a 20 ee 7f 24 a0 20 ┆ ' & Aktuell størrelse: $ ┆ 0x0a0…0c0 4b 62 79 74 65 7f 32 20 0d 0a 20 20 20 7f 2e 2d 7f 2f 20 7f 32 2d 7f 3e 20 0d 0a 7f 70 20 0d 0a ┆Kbyte 2 .- / 2- > p ┆ 0x0c0…0e0 7f 29 20 53 6b 6a 65 6d 61 7f 27 20 41 6e 74 61 6c 6c 20 64 6f 6b 75 6d 65 6e 74 65 72 7f 49 20 ┆ ) Skjema ' Antall dokumenter I ┆ 0x0e0…100 0d 0a 7f 28 20 7f 28 2d 7f 26 20 7f 31 2d 7f 49 20 0d 0a 7f 28 20 e1 7f 27 a0 7f 2b 20 ee 7f 24 ┆ ( (- & 1- I ( ' + $┆ 0x100…120 a0 7f 50 20 0d 0a 7f 28 20 e1 7f 27 a0 7f 2b 20 ee 7f 24 a0 7f 50 20 0d 0a 7f 28 20 e1 7f 27 a0 ┆ P ( ' + $ P ( ' ┆ 0x120…140 7f 2b 20 ee 7f 24 a0 7f 50 20 0d 0a 7f 28 20 e1 7f 27 a0 7f 2b 20 ee 7f 24 a0 7f 50 20 0d 0a 7f ┆ + $ P ( ' + $ P ┆ 0x140…160 28 20 e1 7f 27 a0 7f 2b 20 ee 7f 24 a0 7f 50 20 0d 0a 7f 28 20 e1 7f 27 a0 7f 2b 20 ee 7f 24 a0 ┆( ' + $ P ( ' + $ ┆ 0x160…180 7f 50 20 0d 0a 7f 28 20 e1 7f 27 a0 7f 2b 20 ee 7f 24 a0 7f 50 20 0d 0a 7f 28 20 e1 7f 27 a0 7f ┆ P ( ' + $ P ( ' ┆ 0x180…1a0 2b 20 ee 7f 24 a0 7f 50 20 0d 0a 7f 28 20 e1 7f 27 a0 7f 2b 20 ee 7f 24 a0 7f 50 20 0d 0a 7f 28 ┆+ $ P ( ' + $ P (┆ 0x1a0…1c0 20 e1 7f 27 a0 7f 2b 20 ee 7f 24 a0 7f 50 20 0d 0a 7f 28 20 e1 7f 27 a0 7f 2b 20 ee 7f 24 a0 7f ┆ ' + $ P ( ' + $ ┆ 0x1c0…1e0 50 20 0d 0a 7f 28 20 e1 7f 27 a0 7f 2b 20 ee 7f 24 a0 7f 50 20 0d 0a 7f 28 20 e1 7f 27 a0 7f 2b ┆P ( ' + $ P ( ' +┆ 0x1e0…200 20 ee 7f 24 a0 7f 2b 20 54 65 72 6d 69 6e 61 6c 20 74 79 70 65 20 20 3a 20 e1 7f 2f a0 7f 24 20 ┆ $ + Terminal type : / $ ┆ 0x200…220 (1,) 0d 0a 21 27 37 27 53 27 27 2c 0d 0a 21 34 30 36 3d 32 30 33 2c 20 20 20 20 20 20 20 20 20 20 20 ┆ !'7'S'', !406=203, ┆ 0x220…240 20 20 20 20 20 20 20 20 20 20 20 20 2e 73 61 76 65 20 64 69 76 69 73 69 6f 6e 20 70 72 65 63 69 ┆ .save division preci┆ 0x240…260 73 69 6f 6e 0d 0a 27 32 27 3d 34 30 36 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆sion '2'=406, ┆ 0x260…280 20 20 20 20 20 20 2e 73 65 74 20 64 69 76 69 73 69 6f 6e 20 70 72 65 63 69 73 69 6f 6e 20 74 6f ┆ .set division precision to┆ 0x280…2a0 20 32 0d 0a 34 30 38 2f 27 31 30 27 28 31 29 3d 31 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ 2 408/'10'(1)=1, ┆ 0x2a0…2c0 20 20 20 20 2e 70 75 74 20 76 65 72 73 69 6f 6e 20 6e 75 6d 62 65 72 20 69 6e 74 6f 20 66 69 65 ┆ .put version number into fie┆ 0x2c0…2e0 6c 64 20 31 0d 0a 32 30 33 3d 34 30 36 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ld 1 203=406, ┆ 0x2e0…300 20 20 20 20 20 20 2e 72 65 73 74 6f 72 65 20 34 30 36 0d 0a 27 31 33 2c 33 2c 31 32 27 53 34 30 ┆ .restore 406 '13,3,12'S40┆ 0x300…320 32 3d 33 31 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 74 65 72 6d 69 6e 61 6c 20 74 79 ┆2=31, .terminal ty┆ 0x320…340 70 65 20 69 6e 20 66 69 65 6c 64 20 33 31 0d 0a 34 30 39 3d 32 2c 20 20 20 20 20 20 20 20 20 20 ┆pe in field 31 409=2, ┆ 0x340…360 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 73 65 72 69 61 6c 20 6e 75 6d 62 65 72 20 69 ┆ .serial number i┆ 0x360…380 6e 20 66 69 65 6c 64 20 32 0d 0a 34 30 31 3d 33 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆n field 2 401=3, ┆ 0x380…3a0 20 20 20 20 20 20 20 20 20 20 20 2e 64 61 74 61 62 61 73 65 20 6e 61 6d 65 20 69 6e 20 66 69 65 ┆ .database name in fie┆ 0x3a0…3c0 6c 64 20 33 0d 0a 27 32 30 27 53 2f 27 38 27 28 30 29 3d 34 20 20 20 20 20 20 20 20 20 20 20 20 ┆ld 3 '20'S/'8'(0)=4 ┆ 0x3c0…3e0 20 20 20 20 20 20 2e 64 61 74 61 62 61 73 65 20 73 69 7a 65 20 69 6e 20 66 69 65 6c 64 20 34 0d ┆ .database size in field 4 ┆ 0x3e0…400 0a 21 0d 0a 21 27 48 45 4c 50 27 3d 34 30 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ! !'HELP'=403 ┆ 0x400…420 (2,) 20 20 20 20 2e 72 65 74 75 72 6e 20 73 63 68 65 6d 61 74 69 63 0d 0a 21 2c 0d 0a 27 33 27 3d 32 ┆ .return schematic !, '3'=2┆ 0x420…440 30 31 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 69 6e 69 74 ┆01, .init┆ 0x440…460 69 61 74 65 20 66 6f 72 20 6c 6f 6f 70 0d 0a 27 31 27 3d 32 30 32 2c 0d 0a 27 20 27 3d 34 32 37 ┆iate for loop '1'=202, ' '=427┆ 0x460…480 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 65 6d 70 74 79 20 ┆, .empty ┆ 0x480…4a0 73 65 61 72 63 68 20 70 72 6f 66 69 6c 65 0d 0a 21 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆search profile !, ┆ 0x4a0…4c0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 73 74 61 72 74 20 6f 66 20 6c 6f 6f 70 0d 0a ┆ .start of loop ┆ 0x4c0…4e0 32 30 32 20 49 20 3d 20 32 30 34 20 3d 7e 20 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆202 I = 204 =ü , ┆ 0x4e0…500 2e 67 65 74 20 73 63 68 65 6d 61 74 69 63 20 64 69 63 74 69 6f 6e 61 72 79 20 65 6e 74 72 79 0d ┆.get schematic dictionary entry ┆ 0x500…520 0a 20 20 20 27 27 4a 27 30 27 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆ ''J'0', ┆ 0x520…540 20 2e 66 69 6e 69 73 68 65 64 2c 20 77 61 69 74 20 66 6f 72 20 75 73 65 72 20 74 6f 20 68 69 74 ┆ .finished, wait for user to hit┆ 0x540…560 20 61 20 6b 65 79 0d 0a 20 20 20 34 34 33 2d 27 36 27 3d 7e 20 27 32 33 27 53 20 3b 20 20 20 20 ┆ a key 443-'6'=ü '23'S ; ┆ 0x560…580 20 2c 20 20 20 20 20 20 2e 46 36 20 2d 20 70 72 69 6e 74 20 73 63 72 65 65 6e 20 69 6d 61 67 65 ┆ , .F6 - print screen image┆ 0x580…5a0 0d 0a 20 20 20 27 2d 32 27 3d 3e 2c 0d 0a 3b 2c 0d 0a 32 30 31 2b 27 32 27 3d 32 30 31 2d 27 33 ┆ '-2'=>, ;, 201+'2'=201-'3┆ 0x5a0…5c0 31 27 20 3d 2b 20 20 20 2c 20 20 20 20 20 20 20 20 20 2e 69 6e 63 72 65 6d 65 6e 74 20 61 6e 64 ┆1' =+ , .increment and┆ 0x5c0…5e0 20 74 65 73 74 20 69 66 20 73 63 72 65 65 6e 20 69 73 20 66 75 6c 6c 0d 0a 20 20 20 27 54 72 79 ┆ test if screen is full 'Try┆ 0x5e0…600 6b 6b 20 72 65 74 75 72 6e 20 66 6f 72 20 7d 20 6c 69 73 74 65 20 6d 65 72 20 27 4a 27 30 27 2c ┆kk return for å liste mer 'J'0',┆ 0x600…620 (3,) 0d 0a 20 20 20 34 34 33 2d 27 38 27 20 3d 7e 20 27 2d 32 27 3d 3e 20 3b 2c 20 20 20 20 20 20 20 ┆ 443-'8' =ü '-2'=> ;, ┆ 0x620…640 20 20 2e 46 38 20 77 61 73 20 68 69 74 20 2d 20 65 78 69 74 0d 0a 20 20 20 34 34 33 2d 27 36 27 ┆ .F8 was hit - exit 443-'6'┆ 0x640…660 20 3d 7e 20 27 32 33 27 53 20 20 3b 2c 20 20 20 20 20 20 20 20 20 2e 46 36 20 77 61 73 20 68 69 ┆ =ü '23'S ;, .F6 was hi┆ 0x660…680 74 20 2d 20 70 72 69 6e 74 20 73 63 72 65 65 6e 20 69 6d 61 67 65 0d 0a 20 20 20 27 35 27 3d 32 ┆t - print screen image '5'=2┆ 0x680…6a0 30 31 2c 0d 0a 20 20 20 21 2c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆01, !, ┆ 0x6a0…6c0 20 20 20 20 20 2e 6c 6f 6f 70 20 74 6f 20 63 6c 65 61 72 20 66 69 65 6c 64 73 0d 0a 20 20 20 27 ┆ .loop to clear fields '┆ 0x6c0…6e0 27 3d 23 32 30 31 2c 0d 0a 20 20 20 32 30 31 2b 27 31 27 3d 32 30 31 2d 27 33 31 27 3d 2d 20 3c ┆'=#201, 201+'1'=201-'31'=- <┆ 0x6e0…700 20 3b 20 2c 0d 0a 20 20 20 27 35 27 3d 32 30 31 2c 0d 0a 3b 2c 0d 0a 32 30 32 2b 27 31 27 3d 32 ┆ ; , '5'=201, ;, 202+'1'=2┆ 0x700…720 30 32 2c 0d 0a 27 31 33 2c 34 2c 38 27 20 53 20 32 30 34 20 3d 20 23 32 30 31 20 2c 20 20 20 20 ┆02, '13,4,8' S 204 = #201 , ┆ 0x720…740 20 20 20 20 20 2e 67 65 74 20 73 63 68 65 6d 61 20 6e 61 6d 65 0d 0a 23 32 30 31 20 48 20 3d 20 ┆ .get schema name #201 H = ┆ 0x740…760 23 28 32 30 31 2b 27 31 27 29 20 20 20 2c 20 20 20 20 20 20 20 20 20 2e 67 65 74 20 6e 75 6d 62 ┆#(201+'1') , .get numb┆ 0x760…780 65 72 20 6f 66 20 64 6f 63 75 6d 65 6e 74 73 0d 0a 3c 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ┆er of documents < ┆ 0x780…7a0 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2e 6c 6f 6f 70 20 62 61 63 6b 0d 0a 0d 0a 0d ┆ .loop back ┆ 0x7a0…7c0 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d ┆ ┆ 0x7c0…7e0 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 5c 2c 0d 0a 34 35 33 2d 27 32 35 35 27 ┆ Ø, 453-'255'┆ 0x7e0…800 20 3d 7e 20 27 31 27 3d 3e 20 3b 2c 20 20 20 20 20 20 20 20 20 20 20 2e 69 6e 69 74 69 61 6c 20 ┆ =ü '1'=> ;, .initial ┆ 0x800…820 (4,) 70 72 6f 63 65 73 73 20 2d 20 67 6f 74 6f 20 66 69 65 6c 64 20 31 0d 0a 0d 0a 1a 1a 1a 1a 1a 1a ┆process - goto field 1 ┆ 0x820…840 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a 1a ┆ ┆ […0x2…]