/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / r / rpcboot / !Boot / Library / AddApps

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 12 de 20 63 6f | 64 65 20 33 32 2a 31 30 |..... co|de 32*10|
|00000010| 32 34 0d 00 14 40 c8 99 | 20 22 57 69 6d 70 5f 49 |24...@..| "Wimp_I|
|00000020| 6e 69 74 69 61 6c 69 73 | 65 22 2c 33 30 30 2c 26 |nitialis|e",300,&|
|00000030| 34 42 35 33 34 31 35 34 | 2c 22 41 64 64 41 70 70 |4B534154|,"AddApp|
|00000040| 73 22 2c 30 20 b8 20 2c | 6d 79 5f 68 61 6e 64 6c |s",0 . ,|my_handl|
|00000050| 65 25 0d 00 1e 04 0d 00 | 28 19 64 61 74 65 24 3d |e%......|(.date$=|
|00000060| c0 91 24 2c a7 91 24 2c | 22 2e 22 29 2d 31 29 0d |..$,..$,|".")-1).|
|00000070| 00 32 1c 64 61 74 65 24 | 3d c2 64 61 74 65 24 2c |.2.date$|=.date$,|
|00000080| a9 28 64 61 74 65 24 29 | 2d 34 29 0d 00 3c 13 e3 |.(date$)|-4)..<..|
|00000090| 20 6f 70 74 3d 34 20 b8 | 20 36 20 88 20 32 0d 00 | opt=4 .| 6 . 2..|
|000000a0| 46 08 50 25 3d 30 0d 00 | 50 0b 4f 25 3d 63 6f 64 |F.P%=0..|P.O%=cod|
|000000b0| 65 0d 00 5a 0c 5b 4f 50 | 54 20 6f 70 74 0d 00 64 |e..Z.[OP|T opt..d|
|000000c0| 0c 20 20 45 51 55 44 20 | 30 0d 00 6e 16 20 20 45 |.  EQUD |0..n.  E|
|000000d0| 51 55 44 20 69 6e 69 74 | 5f 6d 6f 64 75 6c 65 0d |QUD init|_module.|
|000000e0| 00 78 17 20 20 45 51 55 | 44 20 66 69 6e 61 6c 69 |.x.  EQU|D finali|
|000000f0| 73 65 5f 6d 6f 64 0d 00 | 82 0c 20 20 45 51 55 44 |se_mod..|..  EQUD|
|00000100| 20 30 0d 00 8c 17 20 20 | 45 51 55 44 20 74 69 74 | 0....  |EQUD tit|
|00000110| 6c 65 5f 73 74 72 69 6e | 67 0d 00 96 16 20 20 45 |le_strin|g....  E|
|00000120| 51 55 44 20 68 65 6c 70 | 5f 73 74 72 69 6e 67 0d |QUD help|_string.|
|00000130| 00 a0 0c 20 20 45 51 55 | 44 20 30 0d 00 aa 0c 20 |...  EQU|D 0.... |
|00000140| 20 45 51 55 44 20 30 0d | 00 b4 0c 20 20 45 51 55 | EQUD 0.|...  EQU|
|00000150| 44 20 30 0d 00 be 0c 20 | 20 45 51 55 44 20 30 0d |D 0.... | EQUD 0.|
|00000160| 00 c8 0c 20 20 45 51 55 | 44 20 30 0d 00 d2 04 0d |...  EQU|D 0.....|
|00000170| 00 dc 11 2e 74 69 74 6c | 65 5f 73 74 72 69 6e 67 |....titl|e_string|
|00000180| 0d 00 e6 28 20 20 45 51 | 55 53 20 20 20 20 22 41 |...(  EQ|US    "A|
|00000190| 70 70 73 41 64 64 22 2b | c2 91 24 2c 38 29 3a 45 |ppsAdd"+|..$,8):E|
|000001a0| 51 55 42 20 20 20 20 30 | 0d 00 f0 2d 20 20 45 51 |QUB    0|...-  EQ|
|000001b0| 55 53 20 20 20 20 22 62 | 79 20 4a 61 6d 65 73 20 |US    "b|y James |
|000001c0| 41 6c 6c 64 65 72 69 64 | 67 65 22 3a 45 51 55 42 |Allderid|ge":EQUB|
|000001d0| 20 20 20 20 30 0d 00 fa | 10 2e 68 65 6c 70 5f 73 |    0...|..help_s|
|000001e0| 74 72 69 6e 67 0d 01 04 | 22 20 20 45 51 55 53 20 |tring...|"  EQUS |
|000001f0| 20 20 20 22 41 70 70 73 | 20 41 64 64 22 3a 45 51 |   "Apps| Add":EQ|
|00000200| 55 42 20 20 20 20 39 0d | 01 0e 2a 20 20 45 51 55 |UB    9.|..*  EQU|
|00000210| 53 20 20 20 20 22 31 2e | 30 30 20 28 22 2b 64 61 |S    "1.|00 ("+da|
|00000220| 74 65 24 2b 22 29 22 3a | 45 51 55 42 20 20 20 20 |te$+")":|EQUB    |
|00000230| 30 0d 01 18 0b 20 20 41 | 4c 49 47 4e 0d 01 22 0f |0....  A|LIGN..".|
|00000240| 20 20 45 51 55 44 20 20 | 20 20 30 0d 01 2c 04 0d |  EQUD  |  0..,..|
|00000250| 01 36 10 2e 69 6e 69 74 | 5f 6d 6f 64 75 6c 65 0d |.6..init|_module.|
|00000260| 01 40 1f 20 20 53 54 4d | 46 44 20 20 20 52 31 33 |.@.  STM|FD   R13|
|00000270| 21 2c 7b 52 37 2d 52 31 | 31 2c 52 31 34 7d 0d 01 |!,{R7-R1|1,R14}..|
|00000280| 4a 1a 20 20 41 44 52 20 | 20 20 20 20 52 30 2c 66 |J.  ADR |    R0,f|
|00000290| 69 6c 65 5f 61 64 64 72 | 0d 01 54 29 20 20 53 57 |ile_addr|..T)  SW|
|000002a0| 49 20 20 20 20 20 22 58 | 52 65 73 6f 75 72 63 65 |I     "X|Resource|
|000002b0| 46 53 5f 52 65 67 69 73 | 74 65 72 46 69 6c 65 73 |FS_Regis|terFiles|
|000002c0| 22 0d 01 5e 1e 20 20 4c | 44 4d 46 44 20 20 20 52 |"..^.  L|DMFD   R|
|000002d0| 31 33 21 2c 7b 52 37 2d | 52 31 31 2c 50 43 7d 0d |13!,{R7-|R11,PC}.|
|000002e0| 01 68 04 0d 01 72 11 2e | 66 69 6e 61 6c 69 73 65 |.h...r..|finalise|
|000002f0| 5f 6d 6f 64 0d 01 7c 1f | 20 20 53 54 4d 46 44 20 |_mod..|.|  STMFD |
|00000300| 20 20 52 31 33 21 2c 7b | 52 37 2d 52 31 31 2c 52 |  R13!,{|R7-R11,R|
|00000310| 31 34 7d 0d 01 86 1a 20 | 20 41 44 52 20 20 20 20 |14}.... | ADR    |
|00000320| 20 52 30 2c 66 69 6c 65 | 5f 61 64 64 72 0d 01 90 | R0,file|_addr...|
|00000330| 2b 20 20 53 57 49 20 20 | 20 20 20 22 58 52 65 73 |+  SWI  |   "XRes|
|00000340| 6f 75 72 63 65 46 53 5f | 44 65 72 65 67 69 73 74 |ourceFS_|Deregist|
|00000350| 65 72 46 69 6c 65 73 22 | 0d 01 9a 1e 20 20 4c 44 |erFiles"|....  LD|
|00000360| 4d 46 44 20 20 20 52 31 | 33 21 2c 7b 52 37 2d 52 |MFD   R1|3!,{R7-R|
|00000370| 31 31 2c 50 43 7d 0d 01 | a4 04 0d 01 ae 10 20 20 |11,PC}..|......  |
|00000380| 2e 66 69 6c 65 5f 61 64 | 64 72 0d 01 b8 05 5d 0d |.file_ad|dr....].|
|00000390| 01 c2 05 ed 0d 01 cc 04 | 0d 01 d6 1d c8 99 20 22 |........|...... "|
|000003a0| 4f 53 5f 47 65 74 45 6e | 76 22 20 b8 20 63 6f 6d |OS_GetEn|v" . com|
|000003b0| 6c 69 6e 65 24 0d 01 e0 | 32 e7 20 a7 63 6f 6d 6c |line$...|2. .coml|
|000003c0| 69 6e 65 24 2c 22 2d 61 | 70 70 73 66 69 6c 65 22 |ine$,"-a|ppsfile"|
|000003d0| 29 3d 30 20 85 20 30 2c | 22 4e 6f 20 66 69 6c 65 |)=0 . 0,|"No file|
|000003e0| 20 67 69 76 65 6e 22 0d | 01 ea 3d 66 69 6c 65 70 | given".|..=filep|
|000003f0| 61 74 68 24 3d c2 63 6f | 6d 6c 69 6e 65 24 2c a9 |ath$=.co|mline$,.|
|00000400| 28 63 6f 6d 6c 69 6e 65 | 24 29 2d a7 63 6f 6d 6c |(comline|$)-.coml|
|00000410| 69 6e 65 24 2c 22 2d 61 | 70 70 73 66 69 6c 65 22 |ine$,"-a|ppsfile"|
|00000420| 29 2d 39 29 0d 01 f4 27 | 66 69 6c 65 70 61 74 68 |)-9)...'|filepath|
|00000430| 24 3d a4 73 74 72 69 70 | 5f 63 6f 6d 6d 61 6e 64 |$=.strip|_command|
|00000440| 28 66 69 6c 65 70 61 74 | 68 24 29 0d 01 fe 17 66 |(filepat|h$)....f|
|00000450| 69 6c 65 68 25 3d 8e 28 | 66 69 6c 65 70 61 74 68 |ileh%=.(|filepath|
|00000460| 24 29 0d 02 08 23 e7 20 | 66 69 6c 65 68 25 3d 30 |$)...#. |fileh%=0|
|00000470| 20 85 20 30 2c 22 46 69 | 6c 65 20 6e 6f 74 20 66 | . 0,"Fi|le not f|
|00000480| 6f 75 6e 64 22 0d 02 12 | 12 ee 20 85 20 d9 23 66 |ound"...|.. . .#f|
|00000490| 69 6c 65 68 25 3a e0 0d | 02 1c 21 66 69 6c 65 6e |ileh%:..|..!filen|
|000004a0| 61 6d 65 24 3d a4 67 65 | 74 5f 61 5f 66 69 6c 65 |ame$=.ge|t_a_file|
|000004b0| 28 66 69 6c 65 68 25 29 | 0d 02 26 14 c8 95 20 66 |(fileh%)|..&... f|
|000004c0| 69 6c 65 6e 61 6d 65 24 | 3c 3e 22 22 0d 02 30 27 |ilename$|<>""..0'|
|000004d0| e7 20 a4 69 73 5f 66 69 | 6c 65 5f 74 68 65 72 65 |. .is_fi|le_there|
|000004e0| 28 66 69 6c 65 6e 61 6d | 65 24 2c 26 32 30 30 30 |(filenam|e$,&2000|
|000004f0| 29 20 8c 0d 02 3a 35 72 | 65 73 66 6e 61 6d 65 24 |) ...:5r|esfname$|
|00000500| 3d 22 41 70 70 73 2e 22 | 2b a4 73 74 72 69 70 5f |="Apps."|+.strip_|
|00000510| 66 6e 61 6d 65 28 66 69 | 6c 65 6e 61 6d 65 24 29 |fname(fi|lename$)|
|00000520| 2b 22 2e 21 52 75 6e 22 | 0d 02 44 0a 5b 4f 50 54 |+".!Run"|..D.[OPT|
|00000530| 20 36 0d 02 4e 0a 20 20 | 2e 73 74 25 0d 02 58 42 | 6..N.  |.st%..XB|
|00000540| 20 20 45 51 55 44 20 32 | 34 2b a4 77 73 74 72 6c |  EQUD 2|4+.wstrl|
|00000550| 65 6e 28 72 65 73 66 6e | 61 6d 65 24 29 2b a4 77 |en(resfn|ame$)+.w|
|00000560| 73 74 72 6c 65 6e 28 22 | 66 69 6c 65 72 5f 72 75 |strlen("|filer_ru|
|00000570| 6e 20 22 2b 66 69 6c 65 | 6e 61 6d 65 24 29 0d 02 |n "+file|name$)..|
|00000580| 62 10 20 20 45 51 55 44 | 20 2d 35 33 30 38 0d 02 |b.  EQUD| -5308..|
|00000590| 6c 15 20 20 45 51 55 44 | 20 2d 33 32 35 39 38 35 |l.  EQUD| -325985|
|000005a0| 36 35 35 0d 02 76 26 20 | 20 45 51 55 44 20 a9 28 |655..v& | EQUD .(|
|000005b0| 22 46 69 6c 65 72 5f 52 | 75 6e 20 22 2b 66 69 6c |"Filer_R|un "+fil|
|000005c0| 65 6e 61 6d 65 24 29 2b | 31 0d 02 80 0c 20 20 45 |ename$)+|1....  E|
|000005d0| 51 55 44 20 33 0d 02 8a | 14 20 20 45 51 55 53 20 |QUD 3...|.  EQUS |
|000005e0| 72 65 73 66 6e 61 6d 65 | 24 0d 02 94 0c 20 20 45 |resfname|$....  E|
|000005f0| 51 55 42 20 30 0d 02 9e | 0b 20 20 41 4c 49 47 4e |QUB 0...|.  ALIGN|
|00000600| 0d 02 a8 26 20 20 65 71 | 75 64 20 a9 28 22 66 69 |...&  eq|ud .("fi|
|00000610| 6c 65 72 5f 72 75 6e 20 | 22 2b 66 69 6c 65 6e 61 |ler_run |"+filena|
|00000620| 6d 65 24 29 2b 35 0d 02 | b2 21 20 20 65 71 75 73 |me$)+5..|.!  equs|
|00000630| 20 22 66 69 6c 65 72 5f | 72 75 6e 20 22 2b 66 69 | "filer_|run "+fi|
|00000640| 6c 65 6e 61 6d 65 24 0d | 02 bc 0e 20 20 65 71 75 |lename$.|...  equ|
|00000650| 62 20 26 30 61 0d 02 c6 | 0b 20 20 41 4c 49 47 4e |b &0a...|.  ALIGN|
|00000660| 0d 02 d0 0b 20 20 2e 6c | 65 6e 25 0d 02 da 05 5d |....  .l|en%....]|
|00000670| 0d 02 e4 05 cd 0d 02 ee | 1e ff 28 22 46 69 6c 65 |........|..("File|
|00000680| 72 5f 62 6f 6f 74 20 22 | 2b 66 69 6c 65 6e 61 6d |r_boot "|+filenam|
|00000690| 65 24 29 0d 02 f8 21 66 | 69 6c 65 6e 61 6d 65 24 |e$)...!f|ilename$|
|000006a0| 3d a4 67 65 74 5f 61 5f | 66 69 6c 65 28 66 69 6c |=.get_a_|file(fil|
|000006b0| 65 68 25 29 0d 03 02 05 | ce 0d 03 0c 0c d9 23 66 |eh%)....|......#f|
|000006c0| 69 6c 65 68 25 0d 03 16 | 09 ee 20 85 20 87 0d 03 |ileh%...|.. . ...|
|000006d0| 20 2c c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 | ,.. "Wi|mp_Close|
|000006e0| 44 6f 77 6e 22 2c 6d 79 | 5f 68 61 6e 64 6c 65 25 |Down",my|_handle%|
|000006f0| 2c 26 34 42 35 33 34 31 | 35 34 0d 03 2a 0a 5b 4f |,&4B5341|54..*.[O|
|00000700| 50 54 20 36 0d 03 34 0c | 20 20 45 51 55 44 20 30 |PT 6..4.|  EQUD 0|
|00000710| 0d 03 3e 0f 20 20 2e 65 | 6e 64 5f 70 72 6f 67 0d |..>.  .e|nd_prog.|
|00000720| 03 48 05 5d 0d 03 52 28 | c8 99 20 22 4f 53 5f 4d |.H.]..R(|.. "OS_M|
|00000730| 6f 64 75 6c 65 22 2c 31 | 31 2c 63 6f 64 65 2c 65 |odule",1|1,code,e|
|00000740| 6e 64 5f 70 72 6f 67 2b | 63 6f 64 65 0d 03 5c 05 |nd_prog+|code..\.|
|00000750| e0 0d 03 66 04 0d 03 70 | 1a dd 20 a4 73 74 72 69 |...f...p|.. .stri|
|00000760| 70 5f 66 6e 61 6d 65 28 | 66 6e 61 6d 65 24 29 0d |p_fname(|fname$).|
|00000770| 03 7a 0c 6e 6c 6f 6f 70 | 25 3d 30 0d 03 84 05 f5 |.z.nloop|%=0.....|
|00000780| 0d 03 8e 10 6c 6f 6f 70 | 25 3d 6e 6c 6f 6f 70 25 |....loop|%=nloop%|
|00000790| 0d 03 98 1f 6e 6c 6f 6f | 70 25 3d a7 66 6e 61 6d |....nloo|p%=.fnam|
|000007a0| 65 24 2c 22 2e 22 2c 6c | 6f 6f 70 25 2b 31 29 0d |e$,".",l|oop%+1).|
|000007b0| 03 a2 0e fd 20 6e 6c 6f | 6f 70 25 3d 30 0d 03 ac |.... nlo|op%=0...|
|000007c0| 1d 3d c2 66 6e 61 6d 65 | 24 2c a9 28 66 6e 61 6d |.=.fname|$,.(fnam|
|000007d0| 65 24 29 2d 6c 6f 6f 70 | 25 29 0d 03 b6 04 0d 03 |e$)-loop|%)......|
|000007e0| c0 19 dd 20 a4 67 65 74 | 5f 61 5f 66 69 6c 65 28 |... .get|_a_file(|
|000007f0| 66 69 6c 65 68 25 29 0d | 03 ca 12 ea 20 66 6e 61 |fileh%).|.... fna|
|00000800| 6d 65 24 2c 63 68 61 72 | 24 0d 03 d4 0d 66 6e 61 |me$,char|$....fna|
|00000810| 6d 65 24 3d 22 22 0d 03 | de 15 63 68 61 72 24 3d |me$=""..|..char$=|
|00000820| bd 28 9a 23 66 69 6c 65 | 68 25 29 0d 03 e8 10 c8 |.(.#file|h%).....|
|00000830| 95 20 63 68 61 72 24 3d | 22 20 22 0d 03 f2 15 63 |. char$=|" "....c|
|00000840| 68 61 72 24 3d bd 28 9a | 23 66 69 6c 65 68 25 29 |har$=.(.|#fileh%)|
|00000850| 0d 03 fc 05 ce 0d 04 06 | 21 e7 20 63 68 61 72 24 |........|!. char$|
|00000860| 3d 22 20 22 20 63 68 61 | 72 24 3d bd 28 9a 23 66 |=" " cha|r$=.(.#f|
|00000870| 69 6c 65 68 25 29 0d 04 | 1a 1e c8 95 20 ac 20 c5 |ileh%)..|.... . .|
|00000880| 23 66 69 6c 65 68 25 20 | 80 20 63 68 61 72 24 3c |#fileh% |. char$<|
|00000890| 3e 22 20 22 0d 04 24 3e | e7 20 63 68 61 72 24 3c |>" "..$>|. char$<|
|000008a0| 3e 22 20 22 20 80 20 97 | 28 63 68 61 72 24 29 3c |>" " . .|(char$)<|
|000008b0| 3e 26 30 64 20 80 20 97 | 28 63 68 61 72 24 29 3c |>&0d . .|(char$)<|
|000008c0| 3e 26 30 61 20 66 6e 61 | 6d 65 24 2b 3d 63 68 61 |>&0a fna|me$+=cha|
|000008d0| 72 24 0d 04 25 15 63 68 | 61 72 24 3d bd 28 9a 23 |r$..%.ch|ar$=.(.#|
|000008e0| 66 69 6c 65 68 25 29 0d | 04 2e 05 ce 0d 04 38 0b |fileh%).|......8.|
|000008f0| 3d 66 6e 61 6d 65 24 0d | 04 42 04 0d 04 4c 14 dd |=fname$.|.B...L..|
|00000900| 20 a4 77 73 74 72 6c 65 | 6e 28 73 74 72 24 29 0d | .wstrle|n(str$).|
|00000910| 04 56 20 e7 20 28 a9 28 | 73 74 72 24 29 2b 31 29 |.V . (.(|str$)+1)|
|00000920| 83 34 3d 30 20 3d a9 28 | 73 74 72 24 29 2b 31 0d |.4=0 =.(|str$)+1.|
|00000930| 04 60 17 3d 34 2b 28 28 | 31 2b a9 28 73 74 72 24 |.`.=4+((|1+.(str$|
|00000940| 29 29 80 ac 33 29 0d 04 | 6a 04 0d 04 74 1a dd 20 |))..3)..|j...t.. |
|00000950| a4 73 74 72 69 70 5f 63 | 6f 6d 6d 61 6e 64 28 73 |.strip_c|ommand(s|
|00000960| 74 72 24 29 0d 04 7e 0b | ea 20 6c 6f 6f 70 25 0d |tr$)..~.|. loop%.|
|00000970| 04 88 0b 6c 6f 6f 70 25 | 3d 31 0d 04 92 19 c8 95 |...loop%|=1......|
|00000980| 20 c1 73 74 72 24 2c 6c | 6f 6f 70 25 2c 31 29 3d | .str$,l|oop%,1)=|
|00000990| 22 20 22 0d 04 9c 0c 6c | 6f 6f 70 25 2b 3d 31 0d |" "....l|oop%+=1.|
|000009a0| 04 a6 05 ce 0d 04 b0 2a | 3d c1 73 74 72 24 2c 6c |.......*|=.str$,l|
|000009b0| 6f 6f 70 25 2c a7 73 74 | 72 24 2c 22 20 22 2c 6c |oop%,.st|r$," ",l|
|000009c0| 6f 6f 70 25 29 2d 6c 6f | 6f 70 25 2d 31 29 0d 04 |oop%)-lo|op%-1)..|
|000009d0| ba 04 0d 04 c4 21 dd 20 | a4 69 73 5f 66 69 6c 65 |.....!. |.is_file|
|000009e0| 5f 74 68 65 72 65 28 66 | 69 6c 65 24 2c 74 79 70 |_there(f|ile$,typ|
|000009f0| 65 25 29 0d 04 ce 30 c8 | 99 20 22 4f 53 5f 46 69 |e%)...0.|. "OS_Fi|
|00000a00| 6c 65 22 2c 32 30 2c 66 | 69 6c 65 24 20 b8 20 6f |le",20,f|ile$ . o|
|00000a10| 62 6a 74 79 70 65 25 2c | 2c 2c 2c 2c 2c 66 74 79 |bjtype%,|,,,,,fty|
|00000a20| 70 65 25 0d 04 d8 3a 3d | 28 6f 62 6a 74 79 70 65 |pe%...:=|(objtype|
|00000a30| 25 3c 3e 30 20 80 20 74 | 79 70 65 25 3d 2d 31 29 |%<>0 . t|ype%=-1)|
|00000a40| 20 84 20 28 74 79 70 65 | 25 3c 3e 2d 31 20 80 20 | . (type|%<>-1 . |
|00000a50| 74 79 70 65 25 3d 66 74 | 79 70 65 25 29 0d ff    |type%=ft|ype%).. |
+--------+-------------------------+-------------------------+--------+--------+