/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Basic / OTL-BBU1.DMS / in.adf / Includes / dos / var.bb2

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 00 3b 20 24 56 45 52 | 3a 20 76 61 72 2e 62 62 |;.; $VER|: var.bb|
|00000010| 32 20 34 30 2e 30 20 28 | 32 38 2e 30 32 2e 39 34 |2 40.0 (|28.02.94|
|00000020| 29 00 3b 00 00 80 12 20 | 22 65 78 65 63 2f 6e 6f |).;.... |"exec/no|
|00000030| 64 65 73 2e 62 62 32 22 | 00 00 3b 2f 2a 20 74 68 |des.bb2"|..;/* th|
|00000040| 65 20 73 74 72 75 63 74 | 75 72 65 20 69 6e 20 74 |e struct|ure in t|
|00000050| 68 65 20 70 72 5f 4c 6f | 63 61 6c 56 61 72 73 20 |he pr_Lo|calVars |
|00000060| 6c 69 73 74 20 2a 2f 00 | 3b 2f 2a 20 44 6f 20 4e |list */.|;/* Do N|
|00000070| 4f 54 20 61 6c 6c 6f 63 | 61 74 65 20 79 6f 75 72 |OT alloc|ate your|
|00000080| 73 65 6c 66 2c 20 75 73 | 65 20 53 65 74 56 61 72 |self, us|e SetVar|
|00000090| 28 29 21 21 21 20 54 68 | 69 73 20 73 74 72 75 63 |()!!! Th|is struc|
|000000a0| 74 75 72 65 20 6d 61 79 | 20 67 72 6f 77 20 69 6e |ture may| grow in|
|000000b0| 20 2a 2f 00 3b 2f 2a 20 | 66 75 74 75 72 65 20 72 | */.;/* |future r|
|000000c0| 65 6c 65 61 73 65 73 21 | 20 20 54 68 65 20 6c 69 |eleases!|  The li|
|000000d0| 73 74 20 73 68 6f 75 6c | 64 20 62 65 20 6c 65 66 |st shoul|d be lef|
|000000e0| 74 20 69 6e 20 61 6c 70 | 68 61 62 65 74 69 63 61 |t in alp|habetica|
|000000f0| 6c 20 6f 72 64 65 72 2c | 20 61 6e 64 20 2a 2f 00 |l order,| and */.|
|00000100| 3b 2f 2a 20 6d 61 79 20 | 68 61 76 65 20 6d 75 6c |;/* may |have mul|
|00000110| 74 69 70 6c 65 20 65 6e | 74 72 69 65 73 20 77 69 |tiple en|tries wi|
|00000120| 74 68 20 74 68 65 20 73 | 61 6d 65 20 6e 61 6d 65 |th the s|ame name|
|00000130| 20 62 75 74 20 64 69 66 | 66 65 72 65 6e 74 20 74 | but dif|ferent t|
|00000140| 79 70 65 73 2e 20 2a 2f | 00 00 80 01 2e 4c 6f 63 |ypes. */|.....Loc|
|00000150| 61 6c 56 61 72 00 6c 76 | 5f 4e 6f 64 65 2e 4e 6f |alVar.lv|_Node.No|
|00000160| 64 65 00 6c 76 5f 46 6c | 61 67 73 2e 77 00 2a 6c |de.lv_Fl|ags.w.*l|
|00000170| 76 5f 56 61 6c 75 65 2e | 62 00 6c 76 5f 4c 65 6e |v_Value.|b.lv_Len|
|00000180| 2e 6c 00 80 02 20 80 01 | 00 00 3b 2f 2a 00 3b 20 |.l... ..|..;/*.; |
|00000190| 2a 20 54 68 65 20 6c 76 | 5f 46 6c 61 67 73 20 62 |* The lv|_Flags b|
|000001a0| 69 74 73 20 61 72 65 20 | 61 76 61 69 6c 61 62 6c |its are |availabl|
|000001b0| 65 20 74 6f 20 74 68 65 | 20 61 70 70 6c 69 63 61 |e to the| applica|
|000001c0| 74 69 6f 6e 2e 20 54 68 | 65 20 75 6e 75 73 65 64 |tion. Th|e unused|
|000001d0| 00 3b 20 2a 20 6c 76 5f | 4e 6f 64 65 2e 6c 6e 5f |.; * lv_|Node.ln_|
|000001e0| 50 72 69 20 62 69 74 73 | 20 61 72 65 20 72 65 73 |Pri bits| are res|
|000001f0| 65 72 76 65 64 20 66 6f | 72 20 73 79 73 74 65 6d |erved fo|r system|
|00000200| 20 75 73 65 2e 00 3b 20 | 2a 2f 00 00 3b 2f 2a 20 | use..; |*/..;/* |
|00000210| 62 69 74 20 64 65 66 69 | 6e 69 74 69 6f 6e 73 20 |bit defi|nitions |
|00000220| 66 6f 72 20 6c 76 5f 4e | 6f 64 65 2e 6c 6e 5f 54 |for lv_N|ode.ln_T|
|00000230| 79 70 65 3a 20 2a 2f 00 | 23 4c 56 5f 56 41 52 3d |ype: */.|#LV_VAR=|
|00000240| 30 20 3b 2f 2a 20 61 6e | 20 76 61 72 69 61 62 6c |0 ;/* an| variabl|
|00000250| 65 20 2a 2f 00 23 4c 56 | 5f 41 4c 49 41 53 3d 31 |e */.#LV|_ALIAS=1|
|00000260| 20 3b 2f 2a 20 61 6e 20 | 61 6c 69 61 73 20 2a 2f | ;/* an |alias */|
|00000270| 00 3b 2f 2a 20 74 6f 20 | 62 65 20 6f 72 27 65 64 |.;/* to |be or'ed|
|00000280| 20 69 6e 74 6f 20 74 79 | 70 65 3a 20 2a 2f 00 23 | into ty|pe: */.#|
|00000290| 4c 56 42 5f 49 47 4e 4f | 52 45 3d 37 20 3b 2f 2a |LVB_IGNO|RE=7 ;/*|
|000002a0| 20 69 67 6e 6f 72 65 20 | 74 68 69 73 20 65 6e 74 | ignore |this ent|
|000002b0| 72 79 20 6f 6e 20 47 65 | 74 56 61 72 2c 20 65 74 |ry on Ge|tVar, et|
|000002c0| 63 20 2a 2f 00 23 4c 56 | 46 5f 49 47 4e 4f 52 45 |c */.#LV|F_IGNORE|
|000002d0| 3d 24 38 30 00 00 3b 2f | 2a 20 64 65 66 69 6e 69 |=$80..;/|* defini|
|000002e0| 74 69 6f 6e 73 20 6f 66 | 20 66 6c 61 67 73 20 70 |tions of| flags p|
|000002f0| 61 73 73 65 64 20 74 6f | 20 47 65 74 56 61 72 28 |assed to| GetVar(|
|00000300| 29 2f 53 65 74 56 61 72 | 28 29 2f 44 65 6c 65 74 |)/SetVar|()/Delet|
|00000310| 65 56 61 72 28 29 20 2a | 2f 00 3b 2f 2a 20 62 69 |eVar() *|/.;/* bi|
|00000320| 74 20 64 65 66 73 20 74 | 6f 20 62 65 20 4f 52 27 |t defs t|o be OR'|
|00000330| 65 64 20 77 69 74 68 20 | 74 68 65 20 74 79 70 65 |ed with |the type|
|00000340| 3a 20 2a 2f 00 3b 2f 2a | 20 69 74 65 6d 20 77 69 |: */.;/*| item wi|
|00000350| 6c 6c 20 62 65 20 74 72 | 65 61 74 65 64 20 61 73 |ll be tr|eated as|
|00000360| 20 61 20 73 69 6e 67 6c | 65 20 6c 69 6e 65 20 6f | a singl|e line o|
|00000370| 66 20 74 65 78 74 20 75 | 6e 6c 65 73 73 20 42 49 |f text u|nless BI|
|00000380| 4e 41 52 59 5f 56 41 52 | 20 69 73 20 75 73 65 64 |NARY_VAR| is used|
|00000390| 20 2a 2f 00 23 47 56 42 | 5f 47 4c 4f 42 41 4c 5f | */.#GVB|_GLOBAL_|
|000003a0| 4f 4e 4c 59 3d 38 00 23 | 47 56 46 5f 47 4c 4f 42 |ONLY=8.#|GVF_GLOB|
|000003b0| 41 4c 5f 4f 4e 4c 59 3d | 24 31 30 30 00 23 47 56 |AL_ONLY=|$100.#GV|
|000003c0| 42 5f 4c 4f 43 41 4c 5f | 4f 4e 4c 59 3d 39 00 23 |B_LOCAL_|ONLY=9.#|
|000003d0| 47 56 46 5f 4c 4f 43 41 | 4c 5f 4f 4e 4c 59 3d 24 |GVF_LOCA|L_ONLY=$|
|000003e0| 32 30 30 00 23 47 56 42 | 5f 42 49 4e 41 52 59 5f |200.#GVB|_BINARY_|
|000003f0| 56 41 52 3d 31 30 3b 2f | 2a 20 74 72 65 61 74 20 |VAR=10;/|* treat |
|00000400| 76 61 72 69 61 62 6c 65 | 20 61 73 20 62 69 6e 61 |variable| as bina|
|00000410| 72 79 20 2a 2f 00 23 47 | 56 46 5f 42 49 4e 41 52 |ry */.#G|VF_BINAR|
|00000420| 59 5f 56 41 52 3d 24 34 | 30 30 00 23 47 56 42 5f |Y_VAR=$4|00.#GVB_|
|00000430| 44 4f 4e 54 5f 4e 55 4c | 4c 5f 54 45 52 4d 3d 31 |DONT_NUL|L_TERM=1|
|00000440| 31 3b 2f 2a 20 6f 6e 6c | 79 20 77 69 74 68 20 47 |1;/* onl|y with G|
|00000450| 56 46 5f 42 49 4e 41 52 | 59 5f 56 41 52 20 2a 2f |VF_BINAR|Y_VAR */|
|00000460| 00 23 47 56 46 5f 44 4f | 4e 54 5f 4e 55 4c 4c 5f |.#GVF_DO|NT_NULL_|
|00000470| 54 45 52 4d 3d 24 38 30 | 30 00 00 3b 2f 2a 20 74 |TERM=$80|0..;/* t|
|00000480| 68 69 73 20 69 73 20 6f | 6e 6c 79 20 73 75 70 70 |his is o|nly supp|
|00000490| 6f 72 74 65 64 20 69 6e | 20 3e 3d 20 56 33 39 20 |orted in| >= V39 |
|000004a0| 64 6f 73 2e 20 20 56 33 | 37 20 64 6f 73 20 69 67 |dos.  V3|7 dos ig|
|000004b0| 6e 6f 72 65 73 20 74 68 | 69 73 2e 20 2a 2f 00 3b |nores th|is. */.;|
|000004c0| 2f 2a 20 74 68 69 73 20 | 63 61 75 73 65 73 20 53 |/* this |causes S|
|000004d0| 65 74 56 61 72 20 74 6f | 20 61 66 66 65 63 74 20 |etVar to| affect |
|000004e0| 45 4e 56 41 52 43 3a 20 | 61 73 20 77 65 6c 6c 20 |ENVARC: |as well |
|000004f0| 61 73 20 45 4e 56 3a 2e | 20 2a 2f 00 23 47 56 42 |as ENV:.| */.#GVB|
|00000500| 5f 53 41 56 45 5f 56 41 | 52 3d 31 32 20 3b 2f 2a |_SAVE_VA|R=12 ;/*|
|00000510| 20 6f 6e 6c 79 20 77 69 | 74 68 20 47 56 46 5f 47 | only wi|th GVF_G|
|00000520| 4c 4f 42 41 4c 5f 56 41 | 52 20 2a 2f 00 23 47 56 |LOBAL_VA|R */.#GV|
|00000530| 46 5f 53 41 56 45 5f 56 | 41 52 3d 24 31 30 30 30 |F_SAVE_V|AR=$1000|
|00000540| 00                      |                         |.       |        |
+--------+-------------------------+-------------------------+--------+--------+