/ RISC User... in a Nutshell / RISC User... in a Nutshell.iso / !Nutshell / !WebsterLT / Resources / SetPath

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 11 f4 20 3e 53 | 65 74 50 61 74 68 20 56 |..... >S|etPath V|
|00000010| 33 0d 00 14 04 0d 00 1e | 47 c8 99 22 4f 53 5f 47 |3.......|G.."OS_G|
|00000020| 65 74 45 6e 76 22 b8 63 | 24 3a e7 a7 63 24 2c 22 |etEnv".c|$:..c$,"|
|00000030| 22 22 22 29 3e 30 8c 50 | 25 3d a7 63 24 2c 22 22 |""")>0.P|%=.c$,""|
|00000040| 22 22 2c a7 63 24 2c 22 | 22 22 22 29 2b 31 29 3a |"",.c$,"|""")+1):|
|00000050| 63 24 3d c1 63 24 2c 50 | 25 2b 31 29 0d 00 28 18 |c$=.c$,P|%+1)..(.|
|00000060| c8 95 97 63 24 3d 33 32 | 3a 63 24 3d c1 63 24 2c |...c$=32|:c$=.c$,|
|00000070| 32 29 3a ce 0d 00 32 20 | c8 95 97 c2 63 24 2c 31 |2):...2 |....c$,1|
|00000080| 29 3d 33 32 3a 63 24 3d | c0 63 24 2c a9 63 24 2d |)=32:c$=|.c$,.c$-|
|00000090| 31 29 3a ce 0d 00 3c 3d | 50 25 3d a7 63 24 2c 22 |1):...<=|P%=.c$,"|
|000000a0| 20 20 22 29 3a c8 95 50 | 25 3e 30 3a 63 24 3d c0 |  "):..P|%>0:c$=.|
|000000b0| 63 24 2c 50 25 2d 31 29 | 2b c1 63 24 2c 50 25 2b |c$,P%-1)|+.c$,P%+|
|000000c0| 31 29 3a 50 25 3d a7 63 | 24 2c 22 20 20 22 29 3a |1):P%=.c|$,"  "):|
|000000d0| ce 0d 00 46 04 0d 00 50 | 10 e7 a7 63 24 2c 22 20 |...F...P|...c$," |
|000000e0| 22 29 3e 30 8c 0d 00 5a | 2d 20 70 61 74 68 24 3d |")>0...Z|- path$=|
|000000f0| c0 63 24 2c a7 63 24 2c | 22 20 22 29 2d 31 29 3a |.c$,.c$,|" ")-1):|
|00000100| 63 24 3d c1 63 24 2c a7 | 63 24 2c 22 20 22 29 2b |c$=.c$,.|c$," ")+|
|00000110| 31 29 0d 00 64 05 cc 0d | 00 6e 0d 20 70 61 74 68 |1)..d...|.n. path|
|00000120| 24 3d 22 22 0d 00 78 05 | cd 0d 00 79 10 e7 a7 63 |$=""..x.|...y...c|
|00000130| 24 2c 22 20 22 29 3e 30 | 8c 0d 00 7a 2c 20 64 69 |$," ")>0|...z, di|
|00000140| 72 24 3d c0 63 24 2c a7 | 63 24 2c 22 20 22 29 2d |r$=.c$,.|c$," ")-|
|00000150| 31 29 3a 63 24 3d c1 63 | 24 2c a7 63 24 2c 22 20 |1):c$=.c|$,.c$," |
|00000160| 22 29 2b 31 29 0d 00 7b | 05 cc 0d 00 7c 0c 20 64 |")+1)..{|....|. d|
|00000170| 69 72 24 3d 22 22 0d 00 | 7d 05 cd 0d 00 82 0c 74 |ir$=""..|}......t|
|00000180| 61 73 6b 24 3d 63 24 0d | 00 8c 04 0d 00 96 0d de |ask$=c$.|........|
|00000190| 20 62 6c 25 20 32 35 36 | 0d 00 a0 1b 54 24 3d a4 | bl% 256|....T$=.|
|000001a0| 74 65 72 72 69 74 6f 72 | 79 28 64 69 72 24 2b 22 |territor|y(dir$+"|
|000001b0| 2e 22 29 0d 00 aa 04 0d | 00 b4 09 41 24 3d 22 22 |.").....|...A$=""|
|000001c0| 0d 00 be 22 e7 54 24 3e | 22 22 8c 41 24 2b 3d 22 |...".T$>|"".A$+="|
|000001d0| 2c 22 2b 64 69 72 24 2b | 22 2e 22 2b 54 24 2b 22 |,"+dir$+|"."+T$+"|
|000001e0| 2e 22 0d 00 c8 65 c8 99 | 22 58 4f 53 5f 46 69 6c |."...e..|"XOS_Fil|
|000001f0| 65 22 2c 31 37 2c 64 69 | 72 24 2b 22 2e 52 65 73 |e",17,di|r$+".Res|
|00000200| 6f 75 72 63 65 73 2e 53 | 70 72 69 74 65 73 22 b8 |ources.S|prites".|
|00000210| 54 25 3b 46 25 3a e7 54 | 25 3d 32 80 28 46 25 80 |T%;F%:.T|%=2.(F%.|
|00000220| 31 29 3d 30 8c 41 24 2b | 3d 22 2c 22 2b 64 69 72 |1)=0.A$+|=","+dir|
|00000230| 24 2b 22 2e 52 65 73 6f | 75 72 63 65 73 2e 53 70 |$+".Reso|urces.Sp|
|00000240| 72 69 74 65 73 2e 22 0d | 00 d2 55 c8 99 22 58 4f |rites.".|..U.."XO|
|00000250| 53 5f 46 69 6c 65 22 2c | 31 37 2c 64 69 72 24 2b |S_File",|17,dir$+|
|00000260| 22 2e 52 65 73 6f 75 72 | 63 65 73 22 b8 54 25 3b |".Resour|ces".T%;|
|00000270| 46 25 3a e7 54 25 3d 32 | 80 28 46 25 80 31 29 3d |F%:.T%=2|.(F%.1)=|
|00000280| 30 8c 41 24 2b 3d 22 2c | 22 2b 64 69 72 24 2b 22 |0.A$+=",|"+dir$+"|
|00000290| 2e 52 65 73 6f 75 72 63 | 65 73 2e 22 0d 00 dc 2b |.Resourc|es."...+|
|000002a0| 41 24 2b 3d 22 2c 22 2b | 64 69 72 24 2b 22 2e 2c |A$+=","+|dir$+".,|
|000002b0| 3c 57 69 6d 70 24 53 63 | 72 61 70 44 69 72 3e 2e |<Wimp$Sc|rapDir>.|
|000002c0| 22 2b 74 61 73 6b 24 0d | 00 e6 2b c8 99 22 4f 53 |"+task$.|..+.."OS|
|000002d0| 5f 53 65 74 56 61 72 56 | 61 6c 22 2c 70 61 74 68 |_SetVarV|al",path|
|000002e0| 24 2c c1 41 24 2c 32 29 | 2c a9 41 24 2d 31 2c 30 |$,.A$,2)|,.A$-1,0|
|000002f0| 2c 32 0d 00 f0 05 e0 0d | 00 fa 04 0d 01 04 13 dd |,2......|........|
|00000300| a4 74 65 72 72 69 74 6f | 72 79 28 44 24 29 0d 01 |.territo|ry(D$)..|
|00000310| 0e 0d ea 41 24 2c 54 25 | 2c 46 25 0d 01 18 06 ea |...A$,T%|,F%.....|
|00000320| 85 0d 01 22 21 c8 99 26 | 36 33 30 34 30 b8 54 25 |..."!..&|63040.T%|
|00000330| 3b 46 25 3a e7 28 46 25 | 80 31 29 3e 30 8c 54 25 |;F%:.(F%|.1)>0.T%|
|00000340| 3d 31 0d 01 2c 2e c8 99 | 26 36 33 30 34 33 2c 54 |=1..,...|&63043,T|
|00000350| 25 2c 62 6c 25 2c 31 36 | b8 3b 46 25 3a e7 28 46 |%,bl%,16|.;F%:.(F|
|00000360| 25 80 31 29 3e 30 8c 24 | 62 6c 25 3d 22 55 4b 22 |%.1)>0.$|bl%="UK"|
|00000370| 0d 01 36 1f 41 24 3d 22 | 52 65 73 6f 75 72 63 65 |..6.A$="|Resource|
|00000380| 73 2e 22 2b a4 67 6e 61 | 6d 65 28 62 6c 25 29 0d |s."+.gna|me(bl%).|
|00000390| 01 40 41 c8 99 22 58 4f | 53 5f 46 69 6c 65 22 2c |.@A.."XO|S_File",|
|000003a0| 31 37 2c 44 24 2b 41 24 | b8 54 25 3b 46 25 3a e7 |17,D$+A$|.T%;F%:.|
|000003b0| 54 25 3c 3e 32 84 28 46 | 25 80 31 29 3e 30 8c 41 |T%<>2.(F|%.1)>0.A|
|000003c0| 24 3d 22 52 65 73 6f 75 | 72 63 65 73 2e 55 4b 22 |$="Resou|rces.UK"|
|000003d0| 0d 01 4a 35 c8 99 22 58 | 4f 53 5f 46 69 6c 65 22 |..J5.."X|OS_File"|
|000003e0| 2c 31 37 2c 44 24 2b 41 | 24 b8 54 25 3b 46 25 3a |,17,D$+A|$.T%;F%:|
|000003f0| e7 54 25 3c 3e 32 84 28 | 46 25 80 31 29 3e 30 8c |.T%<>2.(|F%.1)>0.|
|00000400| 41 24 3d 22 22 0d 01 54 | 07 3d 41 24 0d 01 5e 04 |A$=""..T|.=A$..^.|
|00000410| 0d 01 68 0f dd a4 67 6e | 61 6d 65 28 50 25 29 0d |..h...gn|ame(P%).|
|00000420| 01 72 07 ea 41 24 0d 01 | 7c 1d c8 95 3f 50 25 3e |.r..A$..||...?P%>|
|00000430| 33 31 3a 41 24 2b 3d bd | 3f 50 25 3a 50 25 2b 3d |31:A$+=.|?P%:P%+=|
|00000440| 31 3a ce 0d 01 86 07 3d | 41 24 0d 01 90 04 0d ff |1:.....=|A$......|
+--------+-------------------------+-------------------------+--------+--------+