/ APDL Public Domain 1 / APDL_PD1A.iso / program / menuutils / !Examples / Library

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 22 f4 3e 22 3c | 4d 65 6e 75 45 78 61 6d |...".>"<|MenuExam|
|00000010| 70 6c 65 73 24 44 69 72 | 3e 2e 4c 69 62 72 61 72 |ples$Dir|>.Librar|
|00000020| 79 22 0d 00 14 04 0d 00 | 1e 12 dd 20 f2 69 6e 69 |y"......|... .ini|
|00000030| 74 28 6e 61 6d 65 24 29 | 0d 00 28 1a ee 20 85 3a |t(name$)|..(.. .:|
|00000040| ee 20 85 20 87 3a f2 65 | 72 72 6f 72 3a f2 71 75 |. . .:.e|rror:.qu|
|00000050| 69 74 0d 00 32 11 e7 20 | 6e 61 6d 65 24 3c 3e 22 |it..2.. |name$<>"|
|00000060| 22 20 8c 0d 00 3c 13 20 | 20 6d 79 4e 61 6d 65 24 |" ...<. | myName$|
|00000070| 3d 6e 61 6d 65 24 0d 00 | 46 11 20 20 6d 61 78 77 |=name$..|F.  maxw|
|00000080| 73 25 3d 26 34 30 30 0d | 00 50 32 20 20 de 71 25 |s%=&400.|.P2  .q%|
|00000090| 26 34 30 30 2c 62 25 26 | 34 30 30 2c 65 72 72 25 |&400,b%&|400,err%|
|000000a0| 26 32 30 30 2c 77 73 25 | 6d 61 78 77 73 25 3a 63 |&200,ws%|maxws%:c|
|000000b0| 75 72 77 73 25 3d 77 73 | 25 0d 00 5a 3c 20 20 24 |urws%=ws|%..Z<  $|
|000000c0| 62 25 3d 22 54 41 53 4b | 22 3a c8 99 20 22 57 69 |b%="TASK|":.. "Wi|
|000000d0| 6d 70 5f 49 6e 69 74 69 | 61 6c 69 73 65 22 2c 32 |mp_Initi|alise",2|
|000000e0| 30 30 2c 21 62 25 2c 6e | 61 6d 65 24 20 b8 20 2c |00,!b%,n|ame$ . ,|
|000000f0| 74 61 73 6b 25 0d 00 64 | 1b 20 20 f2 69 63 6f 6e |task%..d|.  .icon|
|00000100| 42 61 72 28 22 21 45 78 | 61 6d 70 6c 65 73 22 29 |Bar("!Ex|amples")|
|00000110| 0d 00 6e 3c 20 20 c8 99 | 20 22 57 69 6d 70 5f 4f |..n<  ..| "Wimp_O|
|00000120| 70 65 6e 54 65 6d 70 6c | 61 74 65 22 2c 2c 22 3c |penTempl|ate",,"<|
|00000130| 4d 65 6e 75 45 78 61 6d | 70 6c 65 73 24 44 69 72 |MenuExam|ples$Dir|
|00000140| 3e 2e 54 65 6d 70 6c 61 | 74 65 73 22 0d 00 78 05 |>.Templa|tes"..x.|
|00000150| cc 0d 00 82 1d 20 20 c8 | 99 20 22 57 69 6d 70 5f |.....  .|. "Wimp_|
|00000160| 43 6c 6f 73 65 54 65 6d | 70 6c 61 74 65 22 0d 00 |CloseTem|plate"..|
|00000170| 8c 05 cd 0d 00 96 05 e1 | 0d 00 a0 04 0d 00 aa 17 |........|........|
|00000180| dd 20 f2 69 63 6f 6e 42 | 61 72 28 73 70 72 69 74 |. .iconB|ar(sprit|
|00000190| 65 24 29 0d 00 b4 0f 50 | 25 3d 62 25 3a 5b 4f 50 |e$)....P|%=b%:[OP|
|000001a0| 54 32 0d 00 be 0b 45 51 | 55 44 20 2d 31 0d 00 c8 |T2....EQ|UD -1...|
|000001b0| 0a 45 51 55 44 20 30 0d | 00 d2 0a 45 51 55 44 20 |.EQUD 0.|...EQUD |
|000001c0| 30 0d 00 dc 0b 45 51 55 | 44 20 36 38 0d 00 e6 0b |0....EQU|D 68....|
|000001d0| 45 51 55 44 20 36 38 0d | 00 f0 11 45 51 55 44 20 |EQUD 68.|...EQUD |
|000001e0| 26 37 30 30 30 30 30 32 | 0d 00 fa 19 45 51 55 53 |&7000002|....EQUS|
|000001f0| 20 73 70 72 69 74 65 24 | 3a 45 51 55 42 20 26 30 | sprite$|:EQUB &0|
|00000200| 44 0d 01 04 26 5d 3a c8 | 99 20 22 57 69 6d 70 5f |D...&]:.|. "Wimp_|
|00000210| 43 72 65 61 74 65 49 63 | 6f 6e 22 2c 2c 62 25 20 |CreateIc|on",,b% |
|00000220| b8 20 69 63 6f 6e 25 0d | 01 0e 05 e1 0d 01 18 04 |. icon%.|........|
|00000230| 0d 01 22 11 dd 20 a4 77 | 69 6e 64 6f 77 28 77 24 |..".. .w|indow(w$|
|00000240| 29 0d 01 2c 41 c8 99 20 | 22 57 69 6d 70 5f 4c 6f |)..,A.. |"Wimp_Lo|
|00000250| 61 64 54 65 6d 70 6c 61 | 74 65 22 2c 2c 71 25 2c |adTempla|te",,q%,|
|00000260| 63 75 72 77 73 25 2c 77 | 73 25 2b 6d 61 78 77 73 |curws%,w|s%+maxws|
|00000270| 25 2c 2d 31 2c 77 24 20 | b8 20 2c 2c 63 75 72 77 |%,-1,w$ |. ,,curw|
|00000280| 73 25 0d 01 36 29 c8 99 | 20 22 57 69 6d 70 5f 43 |s%..6)..| "Wimp_C|
|00000290| 72 65 61 74 65 57 69 6e | 64 6f 77 22 2c 2c 71 25 |reateWin|dow",,q%|
|000002a0| 20 b8 20 21 62 25 3a 3d | 21 62 25 0d 01 40 04 0d | . !b%:=|!b%..@..|
|000002b0| 01 4a 33 dd 20 f2 65 72 | 72 6f 72 3a 21 65 72 72 |.J3. .er|ror:!err|
|000002c0| 25 3d 9f 3a 24 28 65 72 | 72 25 2b 34 29 3d f6 24 |%=.:$(er|r%+4)=.$|
|000002d0| 2b 22 20 61 74 20 6c 69 | 6e 65 20 22 2b c3 9e 2b |+" at li|ne "+..+|
|000002e0| bd 30 0d 01 54 2a c8 99 | 20 22 57 69 6d 70 5f 52 |.0..T*..| "Wimp_R|
|000002f0| 65 70 6f 72 74 45 72 72 | 6f 72 22 2c 65 72 72 25 |eportErr|or",err%|
|00000300| 2c 31 2c 6d 79 4e 61 6d | 65 24 3a e1 0d 01 5e 04 |,1,myNam|e$:...^.|
|00000310| 0d 01 68 31 dd 20 f2 71 | 75 69 74 20 c8 99 20 22 |..h1. .q|uit .. "|
|00000320| 57 69 6d 70 5f 43 6c 6f | 73 65 44 6f 77 6e 22 2c |Wimp_Clo|seDown",|
|00000330| 74 61 73 6b 25 2c 26 34 | 42 35 33 34 31 35 34 3a |task%,&4|B534154:|
|00000340| e0 0d 01 72 04 0d 01 7c | 1d dd 20 f2 6d 65 73 73 |...r...||.. .mess|
|00000350| 61 67 65 20 e7 71 25 21 | 31 36 3d 30 20 f2 71 75 |age .q%!|16=0 .qu|
|00000360| 69 74 0d 01 86 05 e1 0d | ff                      |it......|.       |
+--------+-------------------------+-------------------------+--------+--------+