/ Personal Computer World 1995 January / pcw-0195.iso / lowlevel / saver.bas

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| fc 05 02 00 0f 00 5f 01 | 5f 01 09 00 01 02 03 04 |......_.|_.......|
|00000010| 06 0b 05 08 0a 50 10 50 | 10 9d 01 00 00 1a 00 ec |.....P.P|........|
|00000020| 00 ad 00 f7 00 00 00 00 | 00 c7 00 00 00 00 00 4a |........|.......J|
|00000030| 01 00 00 00 00 64 00 14 | 01 00 00 a8 00 00 00 00 |.....d..|........|
|00000040| 00 80 00 00 00 5a 00 00 | 00 00 00 00 00 74 00 bc |.....Z..|.....t..|
|00000050| 00 b4 00 00 00 57 01 00 | 00 00 00 00 00 8d 00 00 |.....W..|........|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 9d 01 00 00 9d 00 00 | 06 49 4e 49 47 65 74 1e |........|.INIGet.|
|00000080| 01 00 0c 76 73 49 4e 49 | 53 65 63 74 69 6f 6e 00 |...vsINI|Section.|
|00000090| 00 00 08 76 73 49 4e 49 | 56 61 72 00 00 00 09 76 |...vsINI|Var....v|
|000000a0| 73 44 65 66 61 75 6c 74 | 00 00 00 0c 73 49 4e 49 |sDefault|....sINI|
|000000b0| 50 61 74 68 4e 61 6d 65 | e2 00 00 07 73 52 65 74 |PathName|....sRet|
|000000c0| 53 74 72 00 00 00 01 4e | 00 00 00 03 61 70 70 28 |Str....N|....app(|
|000000d0| 01 00 04 70 61 74 68 6b | 01 00 07 45 58 45 4e 61 |...pathk|...EXENa|
|000000e0| 6d 65 00 00 00 17 47 65 | 74 50 72 69 76 61 74 65 |me....Ge|tPrivate|
|000000f0| 50 72 6f 66 69 6c 65 53 | 74 72 69 6e 67 00 00 00 |ProfileS|tring...|
|00000100| 06 49 4e 49 50 75 74 00 | 00 00 07 76 73 56 61 6c |.INIPut.|...vsVal|
|00000110| 75 65 00 00 00 19 57 72 | 69 74 65 50 72 69 76 61 |ue....Wr|itePriva|
|00000120| 74 65 50 72 6f 66 69 6c | 65 53 74 72 69 6e 67 00 |teProfil|eString.|
|00000130| 00 00 06 50 75 74 49 4e | 49 00 00 00 06 47 65 74 |...PutIN|I....Get|
|00000140| 49 4e 49 3d 01 00 11 6c | 70 41 70 70 6c 69 63 61 |INI=...l|pApplica|
|00000150| 74 69 6f 6e 4e 61 6d 65 | 74 01 00 09 6c 70 4b 65 |tionName|t...lpKe|
|00000160| 79 4e 61 6d 65 00 00 00 | 09 6c 70 44 65 66 61 75 |yName...|.lpDefau|
|00000170| 6c 74 82 01 00 10 6c 70 | 52 65 74 75 72 6e 65 64 |lt....lp|Returned|
|00000180| 53 74 72 69 6e 67 00 00 | 00 05 6e 53 69 7a 65 8e |String..|..nSize.|
|00000190| 01 00 0a 6c 70 46 69 6c | 65 4e 61 6d 65 00 00 00 |...lpFil|eName...|
|000001a0| 08 6c 70 53 74 72 69 6e | 67 00 00 00 0b 6c 70 6c |.lpStrin|g....lpl|
|000001b0| 46 69 6c 65 4e 61 6d 65 | ca 00 00 00 18 00 00 00 |FileName|........|
|000001c0| 3b 01 00 00 76 00 3e 00 | 00 00 41 50 49 20 66 75 |;...v.>.|..API fu|
|000001d0| 6e 63 74 69 6f 6e 73 20 | 74 6f 20 72 65 61 64 2f |nctions |to read/|
|000001e0| 77 72 69 74 65 20 76 61 | 6c 75 65 73 20 66 72 6f |write va|lues fro|
|000001f0| 6d 2f 74 6f 20 70 72 69 | 76 61 74 65 20 2e 49 4e |m/to pri|vate .IN|
|00000200| 49 20 66 69 6c 65 00 00 | 2e 00 3e 00 c7 00 e1 02 |I file..|..>.....|
|00000210| 06 00 28 01 00 90 07 00 | 00 00 3d 01 00 90 00 00 |..(.....|..=.....|
|00000220| 00 00 4a 01 00 90 07 00 | 00 00 57 01 00 90 07 00 |..J.....|..W.....|
|00000230| 00 00 6b 01 00 90 01 00 | 00 00 74 01 00 90 07 00 |..k.....|..t.....|
|00000240| 00 00 06 4b 65 72 6e 65 | 6c 00 00 00 2e 00 2e 00 |...Kerne|l.......|
|00000250| f7 00 e1 02 04 00 28 01 | 00 90 07 00 00 00 3d 01 |......(.|......=.|
|00000260| 00 90 00 00 00 00 82 01 | 00 90 00 00 00 00 8e 01 |........|........|
|00000270| 00 90 07 00 00 00 06 4b | 65 72 6e 65 6c 00 00 00 |.......K|ernel...|
|00000280| 09 00 08 00 ff ff ff ff | ff ff ff ff 05 00 04 00 |........|........|
|00000290| 03 01 00 06 00 47 65 74 | 49 4e 49 02 07 30 70 02 |.....Get|INI..0p.|
|000002a0| 00 00 18 00 00 00 76 00 | 4a 00 00 00 47 45 54 20 |......v.|J...GET |
|000002b0| 49 4e 49 3a 20 47 65 74 | 73 20 61 20 76 61 6c 75 |INI: Get|s a valu|
|000002c0| 65 20 66 72 6f 6d 20 74 | 68 65 20 61 70 70 27 73 |e from t|he app's|
|000002d0| 20 70 72 69 76 61 74 65 | 20 49 4e 49 20 66 69 6c | private| INI fil|
|000002e0| 65 2c 20 66 72 6f 6d 20 | 74 68 65 20 72 65 6c 65 |e, from |the rele|
|000002f0| 76 61 6e 74 00 00 76 00 | 46 00 00 00 76 61 72 69 |vant..v.|F...vari|
|00000300| 61 62 6c 65 20 69 6e 20 | 74 68 65 20 72 65 6c 65 |able in |the rele|
|00000310| 76 61 6e 74 20 73 65 63 | 74 69 6f 6e 2e 20 53 75 |vant sec|tion. Su|
|00000320| 70 70 6c 69 65 64 20 64 | 65 66 61 75 6c 74 20 75 |pplied d|efault u|
|00000330| 73 65 64 20 69 66 20 61 | 6e 79 20 70 72 6f 62 73 |sed if a|ny probs|
|00000340| 00 00 40 00 1e 00 1e 01 | c7 02 03 00 64 00 00 90 |..@.....|....d...|
|00000350| 07 00 00 00 74 00 00 90 | 07 00 00 00 80 00 00 90 |....t...|........|
|00000360| 07 00 00 00 00 00 00 10 | fc 00 ff ff 16 00 07 00 |........|........|
|00000370| 15 00 0d 00 8d 00 00 10 | fc 00 ff ff 16 00 07 00 |........|........|
|00000380| 10 00 0d 00 9d 00 00 10 | fc 00 ff ff 16 00 01 00 |........|........|
|00000390| 0a 00 0d 00 a8 00 00 00 | 00 00 76 00 4b 00 00 00 |........|..v.K...|
|000003a0| 44 65 66 69 6e 65 20 74 | 68 65 20 66 75 6c 6c 20 |Define t|he full |
|000003b0| 70 61 74 68 20 61 6e 64 | 20 6e 61 6d 65 20 6f 66 |path and| name of|
|000003c0| 20 74 68 65 20 49 4e 49 | 20 66 69 6c 65 20 28 73 | the INI| file (s|
|000003d0| 61 6d 65 20 6c 6f 63 6e | 20 61 73 20 74 68 69 73 |ame locn| as this|
|000003e0| 20 70 72 6f 67 72 61 6d | 29 00 00 10 0b 00 ad 00 | program|).......|
|000003f0| 11 00 b4 00 ed 00 06 00 | 01 00 01 00 5c 00 32 01 |........|....\.2.|
|00000400| 0b 00 ad 00 11 00 bc 00 | 32 01 ed 00 0a 00 04 00 |........|2.......|
|00000410| 04 00 2e 49 4e 49 00 00 | 32 01 0c 00 8d 00 00 00 |...INI..|2.......|
|00000420| 00 00 76 00 47 00 00 00 | 50 72 65 2d 66 69 6c 6c |..v.G...|Pre-fill|
|00000430| 20 73 74 72 69 6e 67 20 | 74 6f 20 31 30 30 20 63 | string |to 100 c|
|00000440| 68 61 72 73 2c 20 63 61 | 6c 6c 20 41 50 49 20 74 |hars, ca|ll API t|
|00000450| 6f 20 63 6f 6c 6c 65 63 | 74 20 49 4e 49 20 76 61 |o collec|t INI va|
|00000460| 72 69 61 62 6c 65 20 66 | 6f 72 20 75 73 72 00 10 |riable f|or usr..|
|00000470| e5 00 64 00 d3 00 0c 00 | 9d 00 00 10 0b 00 64 00 |..d.....|......d.|
|00000480| 0b 00 74 00 0b 00 80 00 | 0b 00 9d 00 0b 00 9d 00 |..t.....|........|
|00000490| c2 00 ff ff e4 04 f7 00 | 0b 00 8d 00 0e 00 06 00 |........|........|
|000004a0| c7 00 0c 00 a8 00 00 00 | 00 00 76 00 48 00 00 00 |........|..v.H...|
|000004b0| 54 72 69 6d 20 74 68 65 | 20 72 65 73 75 6c 74 20 |Trim the| result |
|000004c0| 73 74 72 69 6e 67 20 74 | 6f 20 74 68 65 20 74 72 |string t|o the tr|
|000004d0| 75 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 63 68 61 |ue numbe|r of cha|
|000004e0| 72 73 20 72 65 74 75 72 | 6e 65 64 20 62 79 20 74 |rs retur|ned by t|
|000004f0| 68 65 20 41 50 49 00 10 | 0b 00 9d 00 0b 00 a8 00 |he API..|........|
|00000500| c1 00 0c 00 1e 01 00 00 | 00 00 39 00 09 00 08 00 |........|..9.....|
|00000510| ff ff ff ff ff ff ff ff | 13 00 04 00 03 00 00 06 |........|........|
|00000520| 00 50 75 74 49 4e 49 02 | 01 30 c8 01 00 00 18 00 |.PutINI.|.0......|
|00000530| 00 00 76 00 48 00 00 00 | 50 55 54 20 49 4e 49 3a |..v.H...|PUT INI:|
|00000540| 20 50 75 74 73 20 61 20 | 76 61 6c 75 65 20 69 6e | Puts a |value in|
|00000550| 74 6f 20 74 68 65 20 73 | 70 65 63 69 66 69 65 64 |to the s|pecified|
|00000560| 20 76 61 72 69 61 62 6c | 65 20 69 6e 20 74 68 65 | variabl|e in the|
|00000570| 20 67 69 76 65 6e 20 73 | 65 63 74 69 6f 6e 00 00 | given s|ection..|
|00000580| 76 00 40 00 00 00 6f 66 | 20 74 68 65 20 61 70 70 |v.@...of| the app|
|00000590| 27 73 20 70 72 69 76 61 | 74 65 20 49 4e 49 20 70 |'s priva|te INI p|
|000005a0| 72 6f 66 69 6c 65 2e 20 | 52 65 74 75 72 6e 73 20 |rofile. |Returns |
|000005b0| 74 72 75 65 20 69 66 20 | 69 74 20 73 75 63 63 65 |true if |it succe|
|000005c0| 65 64 73 2e 00 00 40 00 | 1e 00 14 01 c1 02 03 00 |eds...@.|........|
|000005d0| 64 00 00 90 07 00 00 00 | 74 00 00 90 07 00 00 00 |d.......|t.......|
|000005e0| ec 00 00 90 07 00 00 00 | 00 00 fc 00 ff ff 16 00 |........|........|
|000005f0| 07 00 11 00 0d 00 8d 00 | 00 00 00 10 76 00 4c 00 |........|....v.L.|
|00000600| 04 00 20 64 65 66 69 6e | 65 20 74 68 65 20 66 75 |.. defin|e the fu|
|00000610| 6c 6c 20 70 61 74 68 20 | 61 6e 64 20 6e 61 6d 65 |ll path |and name|
|00000620| 20 6f 66 20 74 68 65 20 | 49 4e 49 20 66 69 6c 65 | of the |INI file|
|00000630| 20 28 73 61 6d 65 20 6c | 6f 63 6e 20 61 73 20 74 | (same l|ocn as t|
|00000640| 68 69 73 20 70 72 6f 67 | 72 61 6d 29 00 10 0b 00 |his prog|ram)....|
|00000650| ad 00 11 00 b4 00 ed 00 | 06 00 01 00 01 00 5c 00 |........|......\.|
|00000660| 32 01 0b 00 ad 00 11 00 | bc 00 32 01 ed 00 0a 00 |2.......|..2.....|
|00000670| 04 00 04 00 2e 49 4e 49 | 00 00 32 01 0c 00 8d 00 |.....INI|..2.....|
|00000680| 00 00 00 10 76 00 28 00 | 04 00 20 63 61 6c 6c 20 |....v.(.|.. call |
|00000690| 41 50 49 20 74 6f 20 77 | 72 69 74 65 20 49 4e 49 |API to w|rite INI|
|000006a0| 20 76 61 72 69 61 62 6c | 65 20 66 6f 72 20 75 73 | variabl|e for us|
|000006b0| 00 10 0b 00 64 00 0b 00 | 74 00 0b 00 ec 00 0b 00 |....d...|t.......|
|000006c0| 8d 00 0e 00 04 00 f7 00 | e4 00 f1 00 49 00 00 00 |........|....I...|
|000006d0| 00 20 2c 01 0c 00 14 01 | 00 10 32 00 ff ff 00 20 |. ,.....|..2.... |
|000006e0| 2b 01 0c 00 14 01 00 10 | 38 00 00 00 00 00 39 00 |+.......|8.....9.|
|000006f0| 09 00 08 00 ff ff ff ff | ff ff ff ff 10 00 04 00 |........|........|
|00000700| 03 00 fd                |                         |...     |        |
+--------+-------------------------+-------------------------+--------+--------+