/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / c / calcula / !Calcula / !RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1f f4 20 3e 20 | 3c 43 61 6c 63 75 6c 61 |..... > |<Calcula|
|00000010| 24 44 69 72 3e 2e 21 52 | 75 6e 49 6d 61 67 65 0d |$Dir>.!R|unImage.|
|00000020| 00 14 26 76 65 72 73 69 | 6f 6e 24 3d 22 32 2e 30 |..&versi|on$="2.0|
|00000030| 33 20 28 31 36 2d 53 65 | 70 2d 39 30 29 22 3a f4 |3 (16-Se|p-90)":.|
|00000040| 20 31 33 35 35 0d 00 1e | 22 f4 20 44 45 53 4b 54 | 1355...|". DESKT|
|00000050| 4f 50 20 45 58 50 52 45 | 53 53 49 4f 4e 20 45 56 |OP EXPRE|SSION EV|
|00000060| 41 4c 55 41 54 4f 52 0d | 00 28 18 f4 20 a9 20 49 |ALUATOR.|.(.. . I|
|00000070| 57 20 4c 4f 47 41 4e 20 | 31 39 38 39 2f 39 30 0d |W LOGAN |1989/90.|
|00000080| 00 32 05 3a 0d 00 3c 10 | ee 85 f2 65 72 72 6f 72 |.2.:..<.|...error|
|00000090| 28 f6 24 29 0d 00 46 09 | f2 69 6e 69 74 0d 00 50 |(.$)..F.|.init..P|
|000000a0| 05 3a 0d 00 5a 05 f5 0d | 00 64 09 f2 70 6f 6c 6c |.:..Z...|.d..poll|
|000000b0| 0d 00 6e 0a fd 71 75 69 | 74 25 0d 00 78 09 f2 71 |..n..qui|t%..x..q|
|000000c0| 75 69 74 0d 00 82 05 e0 | 0d 00 8c 05 3a 0d 00 96 |uit.....|....:...|
|000000d0| 11 dd f2 65 72 72 6f 72 | 28 65 72 72 24 29 0d 00 |...error|(err$)..|
|000000e0| a0 0f 65 72 72 62 6c 6b | 25 21 30 3d 9f 0d 00 aa |..errblk|%!0=....|
|000000f0| 26 e7 20 9f 3e 30 20 65 | 72 72 24 3d 65 72 72 24 |&. .>0 e|rr$=err$|
|00000100| 2b 22 20 28 22 2b c3 9f | 2b 22 2f 22 2b c3 9e 2b |+" ("+..|+"/"+..+|
|00000110| 22 29 22 0d 00 b4 14 dd | f2 61 70 70 6c 5f 65 72 |")".....|.appl_er|
|00000120| 72 28 65 72 72 24 29 0d | 00 be 15 24 28 65 72 72 |r(err$).|...$(err|
|00000130| 62 6c 6b 25 2b 34 29 3d | 65 72 72 24 0d 00 c8 28 |blk%+4)=|err$...(|
|00000140| c8 99 22 57 69 6d 70 5f | 52 65 70 6f 72 74 45 72 |.."Wimp_|ReportEr|
|00000150| 72 6f 72 22 2c 65 72 72 | 62 6c 6b 25 2c 30 2c 74 |ror",err|blk%,0,t|
|00000160| 61 73 6b 25 0d 00 d2 19 | e7 20 65 72 72 62 6c 6b |ask%....|. errblk|
|00000170| 25 21 30 3e 30 20 f2 71 | 75 69 74 3a e0 0d 00 dc |%!0>0 .q|uit:....|
|00000180| 05 e1 0d 00 e6 05 3a 0d | 00 f0 0a dd f2 69 6e 69 |......:.|.....ini|
|00000190| 74 0d 01 04 1a f4 20 43 | 4f 52 45 20 49 53 20 43 |t..... C|ORE IS C|
|000001a0| 41 4c 43 55 4c 41 20 56 | 31 2e 35 0d 01 0e 12 4d |ALCULA V|1.5....M|
|000001b0| 31 3d 30 3a 4d 32 3d 30 | 3a 4d 33 3d 30 0d 01 18 |1=0:M2=0|:M3=0...|
|000001c0| 09 61 24 3d 22 22 0d 01 | 22 05 3a 0d 01 2c 0e 72 |.a$=""..|".:..,.r|
|000001d0| 65 61 73 6f 6e 25 3d 2d | 31 0d 01 36 10 77 6b 6d |eason%=-|1..6.wkm|
|000001e0| 61 78 25 3d 26 31 34 30 | 30 0d 01 40 0e de 20 77 |ax%=&140|0..@.. w|
|000001f0| 69 6e 64 25 28 32 29 0d | 01 4a 19 de 20 6f 6e 65 |ind%(2).|.J.. one|
|00000200| 25 20 31 36 3a 24 6f 6e | 65 25 3d 22 6f 6e 65 22 |% 16:$on|e%="one"|
|00000210| 0d 01 54 19 de 20 74 77 | 6f 25 20 31 36 3a 24 74 |..T.. tw|o% 16:$t|
|00000220| 77 6f 25 3d 22 74 77 6f | 22 0d 01 5e 1f de 20 65 |wo%="two|"..^.. e|
|00000230| 72 72 62 6c 6b 25 20 32 | 35 35 2c 77 6b 73 70 63 |rrblk% 2|55,wkspc|
|00000240| 25 20 77 6b 6d 61 78 25 | 0d 01 68 17 77 6b 6e 64 |% wkmax%|..h.wknd|
|00000250| 25 3d 77 6b 73 70 63 25 | 2b 77 6b 6d 61 78 25 0d |%=wkspc%|+wkmax%.|
|00000260| 01 72 28 de 20 70 6f 6c | 6c 62 6c 6b 25 20 32 35 |.r(. pol|lblk% 25|
|00000270| 35 2c 77 69 6e 62 6c 6b | 25 20 26 34 30 30 2c 74 |5,winblk|% &400,t|
|00000280| 61 73 6b 25 20 31 36 0d | 01 7c 11 de 20 69 63 6f |ask% 16.|.|.. ico|
|00000290| 6e 62 6c 6b 25 20 31 36 | 0d 01 86 10 de 20 6d 65 |nblk% 16|..... me|
|000002a0| 6e 75 25 20 26 34 30 30 | 0d 01 90 14 24 6d 65 6e |nu% &400|....$men|
|000002b0| 75 25 3d 22 43 61 6c 63 | 75 6c 61 22 0d 01 9a 09 |u%="Calc|ula"....|
|000002c0| f7 8d 74 64 41 0d 01 a4 | 35 dc 37 2c 32 2c 37 2c |..tdA...|5.7,2,7,|
|000002d0| 30 2c 31 35 30 2c 34 34 | 2c 30 2c 22 43 6c 65 61 |0,150,44|,0,"Clea|
|000002e0| 72 20 61 6c 6c 22 2c 22 | 49 6e 66 6f 22 2c 22 51 |r all","|Info","Q|
|000002f0| 75 69 74 22 2c 22 5a 5a | 5a 22 0d 01 ae 0d e3 49 |uit","ZZ|Z".....I|
|00000300| 25 3d 31 32 b8 31 35 0d | 01 b8 0a f3 69 74 65 6d |%=12.15.|....item|
|00000310| 25 0d 01 c2 12 6d 65 6e | 75 25 3f 49 25 3d 69 74 |%....men|u%?I%=it|
|00000320| 65 6d 25 0d 01 cc 07 ed | 49 25 0d 01 d6 0f e3 49 |em%.....|I%.....I|
|00000330| 25 3d 31 36 b8 32 34 88 | 34 0d 01 e0 0a f3 69 74 |%=16.24.|4.....it|
|00000340| 65 6d 25 0d 01 ea 12 6d | 65 6e 75 25 21 49 25 3d |em%....m|enu%!I%=|
|00000350| 69 74 65 6d 25 0d 01 f4 | 07 ed 49 25 0d 01 fe 12 |item%...|..I%....|
|00000360| 70 6f 73 6e 25 3d 6d 65 | 6e 75 25 2b 32 38 0d 02 |posn%=me|nu%+28..|
|00000370| 08 0a 65 6e 74 25 3d 30 | 0d 02 12 05 f5 0d 02 1c |..ent%=0|........|
|00000380| 0a f3 69 74 65 6d 24 0d | 02 26 15 e7 69 74 65 6d |..item$.|.&..item|
|00000390| 24 3d 22 5a 5a 5a 22 8c | 8d 44 6c 42 0d 02 30 0f |$="ZZZ".|.DlB..0.|
|000003a0| 65 6e 74 25 3d 65 6e 74 | 25 2b 31 0d 02 3a 0d 70 |ent%=ent|%+1..:.p|
|000003b0| 6f 73 6e 25 21 30 3d 30 | 0d 02 44 0e 70 6f 73 6e |osn%!0=0|..D.posn|
|000003c0| 25 21 34 3d 2d 31 0d 02 | 4e 14 70 6f 73 6e 25 21 |%!4=-1..|N.posn%!|
|000003d0| 38 3d 26 37 30 30 30 30 | 32 31 0d 02 58 15 24 28 |8=&70000|21..X.$(|
|000003e0| 70 6f 73 6e 25 2b 31 32 | 29 3d 69 74 65 6d 24 0d |posn%+12|)=item$.|
|000003f0| 02 62 12 70 6f 73 6e 25 | 3d 70 6f 73 6e 25 2b 32 |.b.posn%|=posn%+2|
|00000400| 34 0d 02 6c 10 fd 69 74 | 65 6d 24 3d 22 5a 5a 5a |4..l..it|em$="ZZZ|
|00000410| 22 0d 02 76 1c 70 6f 73 | 6e 25 21 2d 32 34 3d 70 |"..v.pos|n%!-24=p|
|00000420| 6f 73 6e 25 21 2d 32 34 | 20 84 26 38 30 0d 02 80 |osn%!-24| .&80...|
|00000430| 12 de 20 73 74 72 62 75 | 66 66 25 20 32 35 35 0d |.. strbu|ff% 255.|
|00000440| 02 8a 17 6d 65 6e 75 65 | 6e 64 25 3d 6d 65 6e 75 |...menue|nd%=menu|
|00000450| 25 2b 26 34 30 30 0d 02 | 94 0b 71 75 69 74 25 3d |%+&400..|..quit%=|
|00000460| a3 0d 02 9e 20 74 61 73 | 6b 24 3d 22 43 61 6c 63 |.... tas|k$="Calc|
|00000470| 75 6c 61 22 3a 24 74 61 | 73 6b 25 3d 74 61 73 6b |ula":$ta|sk%=task|
|00000480| 24 0d 02 a8 2b c8 99 22 | 57 69 6d 70 5f 49 6e 69 |$...+.."|Wimp_Ini|
|00000490| 74 69 61 6c 69 73 65 22 | 2c 32 30 30 2c 26 34 42 |tialise"|,200,&4B|
|000004a0| 35 33 34 31 35 34 2c 74 | 61 73 6b 25 0d 02 b2 26 |534154,t|ask%...&|
|000004b0| 24 77 69 6e 62 6c 6b 25 | 3d 22 3c 43 61 6c 63 75 |$winblk%|="<Calcu|
|000004c0| 6c 61 24 44 69 72 3e 2e | 74 65 6d 70 6c 61 74 65 |la$Dir>.|template|
|000004d0| 73 22 0d 02 bc 14 77 69 | 6e 64 25 28 31 29 3d 77 |s"....wi|nd%(1)=w|
|000004e0| 69 6e 62 6c 6b 25 0d 02 | c6 23 c8 99 22 57 69 6d |inblk%..|.#.."Wim|
|000004f0| 70 5f 4f 70 65 6e 54 65 | 6d 70 6c 61 74 65 22 2c |p_OpenTe|mplate",|
|00000500| 2c 77 69 6e 64 25 28 31 | 29 0d 02 d0 4f c8 99 22 |,wind%(1|)...O.."|
|00000510| 57 69 6d 70 5f 4c 6f 61 | 64 54 65 6d 70 6c 61 74 |Wimp_Loa|dTemplat|
|00000520| 65 22 2c 2c 77 69 6e 64 | 25 28 31 29 2b 34 2c 77 |e",,wind|%(1)+4,w|
|00000530| 6b 73 70 63 25 2c 77 6b | 6e 64 25 2c 2d 31 2c 6f |kspc%,wk|nd%,-1,o|
|00000540| 6e 65 25 2c 30 20 b8 2c | 2c 77 6b 73 70 63 25 2c |ne%,0 .,|,wkspc%,|
|00000550| 2c 2c 2c 6e 65 78 74 25 | 0d 02 da 2c c8 99 22 57 |,,,next%|...,.."W|
|00000560| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|00000570| 22 2c 2c 77 69 6e 64 25 | 28 31 29 2b 34 20 b8 20 |",,wind%|(1)+4 . |
|00000580| 6f 6e 65 25 0d 02 e4 4d | 76 6d 69 6e 78 25 3d 77 |one%...M|vminx%=w|
|00000590| 69 6e 64 25 28 31 29 21 | 34 3a 76 6d 69 6e 79 25 |ind%(1)!|4:vminy%|
|000005a0| 3d 77 69 6e 64 25 28 31 | 29 21 38 3a 76 6d 61 78 |=wind%(1|)!8:vmax|
|000005b0| 78 25 3d 77 69 6e 64 25 | 28 31 29 21 31 36 3a 76 |x%=wind%|(1)!16:v|
|000005c0| 6d 61 78 79 25 3d 77 69 | 6e 64 25 28 31 29 21 31 |maxy%=wi|nd%(1)!1|
|000005d0| 36 0d 02 ee 2b de 20 69 | 63 6f 6e 25 28 32 2c 36 |6...+. i|con%(2,6|
|000005e0| 2c 31 29 3a f4 20 6c 6f | 63 61 74 69 6f 6e 73 20 |,1):. lo|cations |
|000005f0| 6f 66 20 69 63 6f 6e 20 | 64 61 74 61 0d 02 f8 28 |of icon |data...(|
|00000600| f4 20 32 6e 64 20 41 52 | 45 20 64 61 74 61 2c 69 |. 2nd AR|E data,i|
|00000610| 6e 64 69 72 65 63 74 65 | 64 20 74 65 78 74 20 73 |ndirecte|d text s|
|00000620| 74 61 72 74 0d 03 02 16 | 74 70 79 25 3d 77 69 6e |tart....|tpy%=win|
|00000630| 64 25 28 31 29 2b 34 2b | 38 38 0d 03 0c 0b e3 49 |d%(1)+4+|88.....I|
|00000640| 25 3d 30 b8 34 0d 03 16 | 16 69 63 6f 6e 25 28 31 |%=0.4...|.icon%(1|
|00000650| 2c 49 25 2c 30 29 3d 74 | 70 79 25 0d 03 20 19 69 |,I%,0)=t|py%.. .i|
|00000660| 63 6f 6e 25 28 31 2c 49 | 25 2c 31 29 3d 74 70 79 |con%(1,I|%,1)=tpy|
|00000670| 25 21 32 30 0d 03 2a 10 | 74 70 79 25 3d 74 70 79 |%!20..*.|tpy%=tpy|
|00000680| 25 2b 33 32 0d 03 34 07 | ed 49 25 0d 03 3e 12 21 |%+32..4.|.I%..>.!|
|00000690| 77 69 6e 64 25 28 31 29 | 3d 6f 6e 65 25 0d 03 48 |wind%(1)|=one%..H|
|000006a0| 11 77 69 6e 64 25 28 32 | 29 3d 74 70 79 25 0d 03 |.wind%(2|)=tpy%..|
|000006b0| 52 4f c8 99 22 57 69 6d | 70 5f 4c 6f 61 64 54 65 |RO.."Wim|p_LoadTe|
|000006c0| 6d 70 6c 61 74 65 22 2c | 2c 77 69 6e 64 25 28 32 |mplate",|,wind%(2|
|000006d0| 29 2b 34 2c 77 6b 73 70 | 63 25 2c 77 6b 6e 64 25 |)+4,wksp|c%,wknd%|
|000006e0| 2c 2d 31 2c 74 77 6f 25 | 2c 30 20 b8 2c 2c 77 6b |,-1,two%|,0 .,,wk|
|000006f0| 73 70 63 25 2c 2c 2c 2c | 6e 65 78 74 25 0d 03 5c |spc%,,,,|next%..\|
|00000700| 2c c8 99 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |,.."Wimp|_CreateW|
|00000710| 69 6e 64 6f 77 22 2c 2c | 77 69 6e 64 25 28 32 29 |indow",,|wind%(2)|
|00000720| 2b 34 20 b8 20 74 77 6f | 25 0d 03 66 23 69 63 6f |+4 . two|%..f#ico|
|00000730| 6e 25 28 32 2c 36 2c 30 | 29 3d 77 69 6e 64 25 28 |n%(2,6,0|)=wind%(|
|00000740| 32 29 2b 34 2b 38 38 2b | 33 32 2a 36 0d 03 70 20 |2)+4+88+|32*6..p |
|00000750| 69 63 6f 6e 25 28 32 2c | 36 2c 31 29 3d 69 63 6f |icon%(2,|6,1)=ico|
|00000760| 6e 25 28 32 2c 36 2c 30 | 29 21 32 30 0d 03 7a 12 |n%(2,6,0|)!20..z.|
|00000770| 21 77 69 6e 64 25 28 32 | 29 3d 74 77 6f 25 0d 03 |!wind%(2|)=two%..|
|00000780| 84 05 3a 0d 03 8e 5a 21 | 70 6f 6c 6c 62 6c 6b 25 |..:...Z!|pollblk%|
|00000790| 3d 2d 31 3a 70 6f 6c 6c | 62 6c 6b 25 21 34 3d 30 |=-1:poll|blk%!4=0|
|000007a0| 3a 70 6f 6c 6c 62 6c 6b | 25 21 38 3d 30 3a 70 6f |:pollblk|%!8=0:po|
|000007b0| 6c 6c 62 6c 6b 25 21 31 | 32 3d 36 39 3a 70 6f 6c |llblk%!1|2=69:pol|
|000007c0| 6c 62 6c 6b 25 21 31 36 | 3d 36 38 3a 70 6f 6c 6c |lblk%!16|=68:poll|
|000007d0| 62 6c 6b 25 21 32 30 3d | 26 33 30 30 32 0d 03 98 |blk%!20=|&3002...|
|000007e0| 1d 24 28 70 6f 6c 6c 62 | 6c 6b 25 2b 32 34 29 3d |.$(pollb|lk%+24)=|
|000007f0| 22 21 43 61 6c 63 75 6c | 61 22 0d 03 a2 29 c8 99 |"!Calcul|a"...)..|
|00000800| 22 57 69 6d 70 5f 43 72 | 65 61 74 65 49 63 6f 6e |"Wimp_Cr|eateIcon|
|00000810| 22 2c 2c 70 6f 6c 6c 62 | 6c 6b 25 20 b8 20 69 63 |",,pollb|lk% . ic|
|00000820| 6f 6e 25 0d 03 ac 1a c8 | 99 22 57 69 6d 70 5f 43 |on%.....|."Wimp_C|
|00000830| 6c 6f 73 65 54 65 6d 70 | 6c 61 74 65 22 0d 03 b6 |loseTemp|late"...|
|00000840| 22 f2 75 70 64 61 74 65 | 69 63 6f 6e 28 32 2c 74 |".update|icon(2,t|
|00000850| 77 6f 25 2c 36 2c 76 65 | 72 73 69 6f 6e 24 29 0d |wo%,6,ve|rsion$).|
|00000860| 03 c0 05 e1 0d 03 ca 05 | 3a 0d 03 d4 0a dd f2 70 |........|:......p|
|00000870| 6f 6c 6c 0d 03 de 26 c8 | 99 22 57 69 6d 70 5f 50 |oll...&.|."Wimp_P|
|00000880| 6f 6c 6c 22 2c 31 2c 70 | 6f 6c 6c 62 6c 6b 25 20 |oll",1,p|ollblk% |
|00000890| b8 20 72 65 61 73 6f 6e | 25 0d 03 e8 0f c8 8e 72 |. reason|%......r|
|000008a0| 65 61 73 6f 6e 25 20 ca | 0d 03 f2 1d c9 20 32 3a |eason% .|..... 2:|
|000008b0| f2 6f 70 65 6e 77 69 6e | 64 6f 77 28 70 6f 6c 6c |.openwin|dow(poll|
|000008c0| 62 6c 6b 25 29 0d 03 fc | 1e c9 20 33 3a f2 63 6c |blk%)...|.. 3:.cl|
|000008d0| 6f 73 65 77 69 6e 64 6f | 77 28 70 6f 6c 6c 62 6c |osewindo|w(pollbl|
|000008e0| 6b 25 29 0d 04 06 08 c9 | 20 34 3a 0d 04 10 08 c9 |k%).....| 4:.....|
|000008f0| 20 35 3a 0d 04 1a 18 c9 | 20 36 3a f2 6d 6f 75 73 | 5:.....| 6:.mous|
|00000900| 65 28 70 6f 6c 6c 62 6c | 6b 25 29 0d 04 24 0d c9 |e(pollbl|k%)..$..|
|00000910| 20 38 3a f2 6b 65 79 73 | 0d 04 2e 1d c9 20 39 3a | 8:.keys|..... 9:|
|00000920| f2 6d 65 6e 75 73 65 6c | 65 63 74 28 70 6f 6c 6c |.menusel|ect(poll|
|00000930| 62 6c 6b 25 29 0d 04 38 | 09 c9 20 31 31 3a 0d 04 |blk%)..8|.. 11:..|
|00000940| 42 09 c9 20 31 32 3a 0d | 04 4c 22 c9 20 31 37 2c |B.. 12:.|.L". 17,|
|00000950| 31 38 3a e7 70 6f 6c 6c | 62 6c 6b 25 21 31 36 3d |18:.poll|blk%!16=|
|00000960| 30 8c 71 75 69 74 25 3d | b9 0d 04 56 05 cb 0d 04 |0.quit%=|...V....|
|00000970| 60 05 e1 0d 04 6a 05 3a | 0d 04 74 0a dd f2 6b 65 |`....j.:|..t...ke|
|00000980| 79 73 0d 04 7e 14 6b 65 | 79 25 3d 70 6f 6c 6c 62 |ys..~.ke|y%=pollb|
|00000990| 6c 6b 25 21 32 34 0d 04 | 88 0d c8 8e 20 6b 65 79 |lk%!24..|.... key|
|000009a0| 25 20 ca 0d 04 92 1c c9 | 20 31 33 3a f2 70 72 65 |% ......| 13:.pre|
|000009b0| 73 73 72 74 6e 28 70 6f | 6c 6c 62 6c 6b 25 29 0d |ssrtn(po|llblk%).|
|000009c0| 04 9c 2d c9 20 32 37 3a | 65 72 72 62 6c 6b 25 21 |..-. 27:|errblk%!|
|000009d0| 30 3d 31 3a f2 61 70 70 | 6c 5f 65 72 72 28 22 42 |0=1:.app|l_err("B|
|000009e0| 79 65 20 42 79 65 22 29 | 3a 3d 22 22 0d 04 a6 05 |ye Bye")|:=""....|
|000009f0| 7f 0d 04 b0 1c c8 99 22 | 57 69 6d 70 5f 50 72 6f |......."|Wimp_Pro|
|00000a00| 63 65 73 73 4b 65 79 22 | 2c 6b 65 79 25 0d 04 ba |cessKey"|,key%...|
|00000a10| 05 cb 0d 04 c4 05 e1 0d | 04 ce 05 3a 0d 04 d8 0a |........|...:....|
|00000a20| dd f2 71 75 69 74 0d 04 | e2 16 c8 99 22 57 69 6d |..quit..|...."Wim|
|00000a30| 70 5f 43 6c 6f 73 65 44 | 6f 77 6e 22 0d 04 ec 05 |p_CloseD|own"....|
|00000a40| e1 0d 04 f6 05 3a 0d 05 | 00 16 dd f2 6f 70 65 6e |.....:..|....open|
|00000a50| 77 69 6e 64 6f 77 28 62 | 6c 6b 25 29 0d 05 14 1d |window(b|lk%)....|
|00000a60| c8 99 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |.."Wimp_|OpenWind|
|00000a70| 6f 77 22 2c 2c 62 6c 6b | 25 0d 05 1e 05 e1 0d 05 |ow",,blk|%.......|
|00000a80| 28 05 3a 0d 05 32 17 dd | f2 63 6c 6f 73 65 77 69 |(.:..2..|.closewi|
|00000a90| 6e 64 6f 77 28 62 6c 6b | 25 29 0d 05 3c 1e c8 99 |ndow(blk|%)..<...|
|00000aa0| 22 57 69 6d 70 5f 43 6c | 6f 73 65 57 69 6e 64 6f |"Wimp_Cl|oseWindo|
|00000ab0| 77 22 2c 2c 62 6c 6b 25 | 0d 05 46 05 e1 0d 05 50 |w",,blk%|..F....P|
|00000ac0| 05 3a 0d 05 5a 11 dd f2 | 6d 6f 75 73 65 28 62 6c |.:..Z...|mouse(bl|
|00000ad0| 6b 25 29 0d 05 64 0a ea | 78 25 2c 79 25 0d 05 6e |k%)..d..|x%,y%..n|
|00000ae0| 17 78 25 3d 62 6c 6b 25 | 21 30 3a 79 25 3d 62 6c |.x%=blk%|!0:y%=bl|
|00000af0| 6b 25 21 34 0d 05 78 10 | c8 8e 20 62 6c 6b 25 21 |k%!4..x.|.. blk%!|
|00000b00| 31 36 20 ca 0d 05 82 1f | c9 20 30 3a e7 62 6c 6b |16 .....|. 0:.blk|
|00000b10| 25 21 38 3d 34 20 f2 73 | 65 74 63 61 72 65 74 28 |%!8=4 .s|etcaret(|
|00000b20| 2d 31 29 0d 05 8c 3b c9 | 20 35 3a f2 75 70 64 61 |-1)...;.| 5:.upda|
|00000b30| 74 65 69 63 6f 6e 28 31 | 2c 6f 6e 65 25 2c 30 2c |teicon(1|,one%,0,|
|00000b40| c4 32 35 35 2c bd 31 33 | 29 29 3a f2 73 65 74 63 |.255,.13|)):.setc|
|00000b50| 61 72 65 74 28 6f 6e 65 | 25 2c 30 2c 30 29 0d 05 |aret(one|%,0,0)..|
|00000b60| 96 2c c9 20 31 31 3a f2 | 75 70 64 61 74 65 69 63 |.,. 11:.|updateic|
|00000b70| 6f 6e 28 31 2c 6f 6e 65 | 25 2c 32 2c c4 33 39 2c |on(1,one|%,2,.39,|
|00000b80| bd 31 33 29 29 3a 4d 31 | 3d 30 0d 05 a0 2c c9 20 |.13)):M1|=0...,. |
|00000b90| 31 32 3a f2 75 70 64 61 | 74 65 69 63 6f 6e 28 31 |12:.upda|teicon(1|
|00000ba0| 2c 6f 6e 65 25 2c 33 2c | c4 33 39 2c bd 31 33 29 |,one%,3,|.39,.13)|
|00000bb0| 29 3a 4d 32 3d 30 0d 05 | aa 2c c9 20 31 33 3a f2 |):M2=0..|.,. 13:.|
|00000bc0| 75 70 64 61 74 65 69 63 | 6f 6e 28 31 2c 6f 6e 65 |updateic|on(1,one|
|00000bd0| 25 2c 34 2c c4 33 39 2c | bd 31 33 29 29 3a 4d 33 |%,4,.39,|.13)):M3|
|00000be0| 3d 30 0d 05 b4 05 cb 0d | 05 be 10 c8 8e 20 62 6c |=0......|..... bl|
|00000bf0| 6b 25 21 31 32 20 ca 0d | 05 c8 08 c9 20 2d 32 0d |k%!12 ..|.... -2.|
|00000c00| 05 d2 28 77 69 6e 64 25 | 28 31 29 21 32 38 3d 2d |..(wind%|(1)!28=-|
|00000c10| 31 3a f2 6f 70 65 6e 77 | 69 6e 64 6f 77 28 77 69 |1:.openw|indow(wi|
|00000c20| 6e 64 25 28 31 29 29 0d | 05 dc 14 79 25 3d 79 25 |nd%(1)).|...y%=y%|
|00000c30| 2b 39 36 2b 65 6e 74 25 | 2a 34 34 0d 05 e6 05 cb |+96+ent%|*44.....|
|00000c40| 0d 05 f0 0f c8 8e 20 62 | 6c 6b 25 21 38 20 ca 0d |...... b|lk%!8 ..|
|00000c50| 05 fa 14 c9 20 32 3a f2 | 6d 65 6e 75 28 78 25 2c |.... 2:.|menu(x%,|
|00000c60| 79 25 29 0d 06 04 05 cb | 0d 06 0e 05 e1 0d 06 18 |y%).....|........|
|00000c70| 05 3a 0d 06 22 11 dd f2 | 6d 65 6e 75 28 78 25 2c |.:.."...|menu(x%,|
|00000c80| 79 25 29 0d 06 2c 24 c8 | 99 22 57 69 6d 70 5f 43 |y%)..,$.|."Wimp_C|
|00000c90| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 6d 65 6e 75 |reateMen|u",,menu|
|00000ca0| 25 2c 78 25 2c 79 25 0d | 06 36 05 e1 0d 06 40 05 |%,x%,y%.|.6....@.|
|00000cb0| 3a 0d 06 4a 16 dd f2 6d | 65 6e 75 73 65 6c 65 63 |:..J...m|enuselec|
|00000cc0| 74 28 62 6c 6b 25 29 0d | 06 54 10 69 74 65 6d 25 |t(blk%).|.T.item%|
|00000cd0| 3d 62 6c 6b 25 21 30 0d | 06 5e 0e c8 8e 20 69 74 |=blk%!0.|.^... it|
|00000ce0| 65 6d 25 20 ca 0d 06 68 | 07 c9 20 30 0d 06 72 37 |em% ...h|.. 0..r7|
|00000cf0| f2 75 70 64 61 74 65 69 | 63 6f 6e 28 31 2c 6f 6e |.updatei|con(1,on|
|00000d00| 65 25 2c 30 2c c4 32 35 | 35 2c bd 31 33 29 29 3a |e%,0,.25|5,.13)):|
|00000d10| f2 73 65 74 63 61 72 65 | 74 28 6f 6e 65 25 2c 30 |.setcare|t(one%,0|
|00000d20| 2c 30 29 0d 06 7c 22 f2 | 75 70 64 61 74 65 69 63 |,0)..|".|updateic|
|00000d30| 6f 6e 28 31 2c 6f 6e 65 | 25 2c 31 2c c4 33 39 2c |on(1,one|%,1,.39,|
|00000d40| bd 31 33 29 29 0d 06 7d | 27 f2 75 70 64 61 74 65 |.13))..}|'.update|
|00000d50| 69 63 6f 6e 28 31 2c 6f | 6e 65 25 2c 32 2c c4 33 |icon(1,o|ne%,2,.3|
|00000d60| 39 2c bd 31 33 29 29 3a | 4d 31 3d 30 0d 06 86 27 |9,.13)):|M1=0...'|
|00000d70| f2 75 70 64 61 74 65 69 | 63 6f 6e 28 31 2c 6f 6e |.updatei|con(1,on|
|00000d80| 65 25 2c 33 2c c4 33 39 | 2c bd 31 33 29 29 3a 4d |e%,3,.39|,.13)):M|
|00000d90| 32 3d 30 0d 06 90 27 f2 | 75 70 64 61 74 65 69 63 |2=0...'.|updateic|
|00000da0| 6f 6e 28 31 2c 6f 6e 65 | 25 2c 34 2c c4 33 39 2c |on(1,one|%,4,.39,|
|00000db0| bd 31 33 29 29 3a 4d 33 | 3d 30 0d 06 9a 2c c9 20 |.13)):M3|=0...,. |
|00000dc0| 31 3a 77 69 6e 64 25 28 | 32 29 21 32 38 3d 2d 31 |1:wind%(|2)!28=-1|
|00000dd0| 3a f2 6f 70 65 6e 77 69 | 6e 64 6f 77 28 77 69 6e |:.openwi|ndow(win|
|00000de0| 64 25 28 32 29 29 0d 06 | a4 0f c9 20 32 3a 71 75 |d%(2))..|... 2:qu|
|00000df0| 69 74 25 3d b9 0d 06 ae | 05 cb 0d 06 b8 05 e1 0d |it%=....|........|
|00000e00| 06 c2 05 3a 0d 06 cc 14 | dd f2 70 72 65 73 73 72 |...:....|..pressr|
|00000e10| 74 6e 28 62 6c 6b 25 29 | 0d 06 d6 14 61 24 3d 24 |tn(blk%)|....a$=$|
|00000e20| 69 63 6f 6e 25 28 31 2c | 30 2c 31 29 0d 06 e0 44 |icon%(1,|0,1)...D|
|00000e30| e7 a9 61 24 3d 30 20 8c | 65 72 72 62 6c 6b 25 21 |..a$=0 .|errblk%!|
|00000e40| 30 3d 30 3a f2 61 70 70 | 6c 5f 65 72 72 28 22 59 |0=0:.app|l_err("Y|
|00000e50| 6f 75 20 68 61 76 65 6e | 27 74 20 70 75 74 20 69 |ou haven|'t put i|
|00000e60| 6e 20 74 68 65 20 73 75 | 6d 20 79 65 74 21 22 29 |n the su|m yet!")|
|00000e70| 0d 06 ea 10 61 24 3d a4 | 63 61 6c 63 28 61 24 29 |....a$=.|calc(a$)|
|00000e80| 0d 06 f4 21 f2 75 70 64 | 61 74 65 69 63 6f 6e 28 |...!.upd|ateicon(|
|00000e90| 31 2c 6f 6e 65 25 2c 31 | 2c c0 61 24 2c 33 38 29 |1,one%,1|,.a$,38)|
|00000ea0| 29 0d 06 fe 09 61 24 3d | 22 22 0d 07 08 05 e1 0d |)....a$=|""......|
|00000eb0| 07 12 05 3a 0d 07 1c 27 | dd f2 75 70 64 61 74 65 |...:...'|..update|
|00000ec0| 69 63 6f 6e 28 77 6e 6f | 25 2c 77 69 6e 64 74 61 |icon(wno|%,windta|
|00000ed0| 25 2c 6e 6f 25 2c 73 74 | 72 24 29 0d 07 26 15 24 |%,no%,st|r$)..&.$|
|00000ee0| 69 63 6f 6e 62 6c 6b 25 | 3d c4 31 36 2c bd 30 29 |iconblk%|=.16,.0)|
|00000ef0| 0d 07 30 25 69 63 6f 6e | 62 6c 6b 25 21 30 3d 77 |..0%icon|blk%!0=w|
|00000f00| 69 6e 64 74 61 25 3a 69 | 63 6f 6e 62 6c 6b 25 21 |indta%:i|conblk%!|
|00000f10| 34 3d 6e 6f 25 0d 07 3a | 1b 24 69 63 6f 6e 25 28 |4=no%..:|.$icon%(|
|00000f20| 77 6e 6f 25 2c 6e 6f 25 | 2c 31 29 3d 73 74 72 24 |wno%,no%|,1)=str$|
|00000f30| 0d 07 44 2a c8 99 22 57 | 69 6d 70 5f 53 65 74 49 |..D*.."W|imp_SetI|
|00000f40| 63 6f 6e 53 74 61 74 65 | 22 2c 77 69 6e 64 74 61 |conState|",windta|
|00000f50| 25 2c 69 63 6f 6e 62 6c | 6b 25 0d 07 4e 05 e1 0d |%,iconbl|k%..N...|
|00000f60| 07 58 05 3a 0d 07 62 22 | dd f2 73 65 74 63 61 72 |.X.:..b"|..setcar|
|00000f70| 65 74 28 77 69 6e 64 6f | 77 25 2c 6e 6f 25 2c 69 |et(windo|w%,no%,i|
|00000f80| 6e 64 65 78 25 29 0d 07 | 6c 33 c8 99 22 57 69 6d |ndex%)..|l3.."Wim|
|00000f90| 70 5f 53 65 74 43 61 72 | 65 74 50 6f 73 69 74 69 |p_SetCar|etPositi|
|00000fa0| 6f 6e 22 2c 77 69 6e 64 | 6f 77 25 2c 6e 6f 25 2c |on",wind|ow%,no%,|
|00000fb0| 2c 2c 2c 69 6e 64 65 78 | 25 0d 07 76 05 e1 0d 07 |,,,index|%..v....|
|00000fc0| 80 05 3a 0d 07 8a 0d dd | f2 63 61 6c 63 65 72 72 |..:.....|.calcerr|
|00000fd0| 0d 07 94 1e e7 20 9f 3e | 32 38 20 8c f2 65 72 72 |..... .>|28 ..err|
|00000fe0| 6f 72 28 f6 24 29 3a 61 | 24 3d 22 22 3a e1 0d 07 |or(.$):a|$="":...|
|00000ff0| 9e 24 e7 20 9f 3d 36 20 | e7 63 6c 65 61 72 65 64 |.$. .=6 |.cleared|
|00001000| 25 3d b9 20 8c 20 41 24 | 3d a4 73 74 72 69 6e 67 |%=. . A$|=.string|
|00001010| 3a e1 0d 07 a8 1d 65 72 | 72 62 6c 6b 25 21 30 3d |:.....er|rblk%!0=|
|00001020| 30 3a f2 61 70 70 6c 5f | 65 72 72 28 f6 24 29 0d |0:.appl_|err(.$).|
|00001030| 07 b2 09 41 24 3d 22 22 | 0d 07 bc 05 e1 0d 07 c6 |...A$=""|........|
|00001040| 05 3a 0d 07 d0 0e dd a4 | 63 61 6c 63 28 41 24 29 |.:......|calc(A$)|
|00001050| 0d 07 da 07 ea 20 85 0d | 07 e4 16 ee 20 85 20 ea |..... ..|.... . .|
|00001060| 20 f2 63 61 6c 63 65 72 | 72 3a 3d 41 24 0d 07 ee | .calcer|r:=A$...|
|00001070| 15 63 6c 65 61 72 65 64 | 25 3d b9 3a 6d 65 6d 25 |.cleared|%=.:mem%|
|00001080| 3d 30 0d 07 f8 10 e7 20 | 41 24 3d 22 22 20 8c 3d |=0..... |A$="" .=|
|00001090| 22 22 0d 08 02 13 48 46 | 4c 41 47 3d a3 3a 42 46 |""....HF|LAG=.:BF|
|000010a0| 4c 41 47 3d a3 0d 08 0c | 0f f4 20 41 24 3d 41 24 |LAG=....|.. A$=A$|
|000010b0| 2b 22 20 22 0d 08 16 07 | 5a 3d 31 0d 08 20 25 59 |+" "....|Z=1.. %Y|
|000010c0| 3d a7 41 24 2c 22 25 22 | 29 3a e7 20 59 3e 31 20 |=.A$,"%"|):. Y>1 |
|000010d0| 8c 20 f2 70 65 72 63 65 | 6e 74 3a e5 8d 54 60 48 |. .perce|nt:..T`H|
|000010e0| 0d 08 2a 3f e7 20 a7 41 | 24 2c 22 53 44 45 56 22 |..*?. .A|$,"SDEV"|
|000010f0| 29 3d 31 20 80 20 a7 41 | 24 2c 22 2c 22 29 3d 30 |)=1 . .A|$,",")=0|
|00001100| 20 8c 20 41 24 3d c2 41 | 24 2c a9 28 41 24 29 2d | . A$=.A|$,.(A$)-|
|00001110| 34 29 3a 41 24 3d a4 73 | 64 65 76 3a 5a 3d 31 0d |4):A$=.s|dev:Z=1.|
|00001120| 08 34 23 59 3d a7 41 24 | 2c 22 2c 22 29 3a e7 20 |.4#Y=.A$|,","):. |
|00001130| 59 3e 30 20 8c 20 41 24 | 3d a4 61 76 3a e5 8d 54 |Y>0 . A$|=.av:..T|
|00001140| 6a 48 0d 08 3e 2a e7 20 | a7 41 24 2c 22 7e 22 29 |jH..>*. |.A$,"~")|
|00001150| 3d 31 20 8c 20 41 24 3d | c2 41 24 2c a9 28 41 24 |=1 . A$=|.A$,.(A$|
|00001160| 29 2d 31 29 3a 48 46 4c | 41 47 3d b9 0d 08 48 2c |)-1):HFL|AG=...H,|
|00001170| e7 20 a7 41 24 2c 22 42 | 49 4e 22 29 3d 31 20 8c |. .A$,"B|IN")=1 .|
|00001180| 20 41 24 3d c2 41 24 2c | a9 28 41 24 29 2d 33 29 | A$=.A$,|.(A$)-3)|
|00001190| 3a 42 46 4c 41 47 3d b9 | 0d 08 52 37 e7 20 a7 41 |:BFLAG=.|..R7. .A|
|000011a0| 24 2c 22 4d 31 3d 22 29 | 3d 31 20 8c 20 4d 31 3d |$,"M1=")|=1 . M1=|
|000011b0| a0 28 c2 41 24 2c a9 28 | 41 24 29 2d 33 29 29 3a |.(.A$,.(|A$)-3)):|
|000011c0| 6d 65 6d 25 3d 32 3a 6d | 65 6d 24 3d c3 4d 31 0d |mem%=2:m|em$=.M1.|
|000011d0| 08 5c 37 e7 20 a7 41 24 | 2c 22 4d 32 3d 22 29 3d |.\7. .A$|,"M2=")=|
|000011e0| 31 20 8c 20 4d 32 3d a0 | 28 c2 41 24 2c a9 28 41 |1 . M2=.|(.A$,.(A|
|000011f0| 24 29 2d 33 29 29 3a 6d | 65 6d 25 3d 33 3a 6d 65 |$)-3)):m|em%=3:me|
|00001200| 6d 24 3d c3 4d 32 0d 08 | 66 37 e7 20 a7 41 24 2c |m$=.M2..|f7. .A$,|
|00001210| 22 4d 33 3d 22 29 3d 31 | 20 8c 20 4d 33 3d a0 28 |"M3=")=1| . M3=.(|
|00001220| c2 41 24 2c a9 28 41 24 | 29 2d 33 29 29 3a 6d 65 |.A$,.(A$|)-3)):me|
|00001230| 6d 25 3d 34 3a 6d 65 6d | 24 3d c3 4d 33 0d 08 70 |m%=4:mem|$=.M3..p|
|00001240| 39 e7 6d 65 6d 25 8c f2 | 75 70 64 61 74 65 69 63 |9.mem%..|updateic|
|00001250| 6f 6e 28 31 2c 6f 6e 65 | 25 2c 6d 65 6d 25 2c c0 |on(1,one|%,mem%,.|
|00001260| 6d 65 6d 24 2c 33 38 29 | 29 3a 6d 65 6d 25 3d 30 |mem$,38)|):mem%=0|
|00001270| 3a 3d 6d 65 6d 24 0d 08 | 7a 0d 58 3d a0 28 41 24 |:=mem$..|z.X=.(A$|
|00001280| 29 2f 5a 0d 08 84 27 e7 | 20 42 46 4c 41 47 20 8c |)/Z...'.| BFLAG .|
|00001290| 20 41 24 3d a4 74 6f 62 | 69 6e 3a 42 46 4c 41 47 | A$=.tob|in:BFLAG|
|000012a0| 3d a3 3a 3d 22 25 22 2b | 41 24 0d 08 8e 26 e7 20 |=.:="%"+|A$...&. |
|000012b0| 48 46 4c 41 47 20 8c 20 | 48 46 4c 41 47 25 3d a3 |HFLAG . |HFLAG%=.|
|000012c0| 3a 3d 22 3d 26 22 2b c3 | 7e 58 20 8b 20 3d c3 58 |:="=&"+.|~X . =.X|
|000012d0| 0d 08 98 07 3d 41 24 0d | 08 a2 05 3a 0d 08 ac 0d |....=A$.|...:....|
|000012e0| dd f2 70 65 72 63 65 6e | 74 0d 08 b6 23 41 24 3d |..percen|t...#A$=|
|000012f0| c0 41 24 2c 59 2d 31 29 | 2b 22 2a 2e 30 31 22 2b |.A$,Y-1)|+"*.01"+|
|00001300| c2 41 24 2c a9 28 41 24 | 29 2d 59 29 0d 08 c0 05 |.A$,.(A$|)-Y)....|
|00001310| e1 0d 08 ca 05 3a 0d 08 | d4 0c dd a4 73 74 72 69 |.....:..|....stri|
|00001320| 6e 67 0d 08 de 0e 63 6c | 65 61 72 65 64 25 3d a3 |ng....cl|eared%=.|
|00001330| 0d 08 e8 1c 42 24 3d a0 | 28 41 24 29 3a 41 24 3d |....B$=.|(A$):A$=|
|00001340| 22 22 22 22 2b 42 24 2b | 22 22 22 22 0d 08 f2 0e |""""+B$+|""""....|
|00001350| 63 6c 65 61 72 65 64 25 | 3d b9 0d 08 fc 07 3d 41 |cleared%|=.....=A|
|00001360| 24 0d 09 06 05 3a 0d 09 | 10 08 dd a4 61 76 0d 09 |$....:..|....av..|
|00001370| 1a 26 42 24 3d c0 41 24 | 2c 59 2d 31 29 2b 22 2b |.&B$=.A$|,Y-1)+"+|
|00001380| 22 2b c2 41 24 2c a9 28 | 41 24 29 2d 59 29 3a 5a |"+.A$,.(|A$)-Y):Z|
|00001390| 3d 5a 2b 31 0d 09 24 07 | 3d 42 24 0d 09 2e 05 3a |=Z+1..$.|=B$....:|
|000013a0| 0d 09 38 0a dd a4 73 64 | 65 76 0d 09 42 0e 42 24 |..8...sd|ev..B.B$|
|000013b0| 3d 41 24 3a 5a 5a 3d 30 | 0d 09 4c 0e 54 32 3d a0 |=A$:ZZ=0|..L.T2=.|
|000013c0| 28 41 24 29 2f 5a 0d 09 | 56 05 f5 0d 09 60 0e 59 |(A$)/Z..|V....`.Y|
|000013d0| 3d a7 42 24 2c 22 2b 22 | 29 0d 09 6a 11 54 3d a0 |=.B$,"+"|)..j.T=.|
|000013e0| 28 c0 42 24 2c 59 2d 31 | 29 29 0d 09 74 12 5a 5a |(.B$,Y-1|))..t.ZZ|
|000013f0| 3d 5a 5a 2b 28 54 2d 54 | 32 29 5e 32 0d 09 7e 13 |=ZZ+(T-T|2)^2..~.|
|00001400| 42 24 3d c2 42 24 2c a9 | 28 42 24 29 2d 59 29 0d |B$=.B$,.|(B$)-Y).|
|00001410| 09 88 09 fd 20 59 3d 30 | 0d 09 92 0e 5a 5a 3d b6 |.... Y=0|....ZZ=.|
|00001420| 28 5a 5a 2f 5a 29 0d 09 | 9c 0c 42 24 3d c3 28 5a |(ZZ/Z)..|..B$=.(Z|
|00001430| 5a 29 0d 09 a6 07 3d 42 | 24 0d 09 b0 05 3a 0d 09 |Z)....=B|$....:..|
|00001440| ba 0b dd a4 74 6f 62 69 | 6e 0d 09 c4 08 ea 20 42 |....tobi|n..... B|
|00001450| 24 0d 09 ce 0a 59 3d 32 | 5e 33 30 0d 09 d8 05 f5 |$....Y=2|^30.....|
|00001460| 0d 09 e2 0b 42 3d 58 20 | 81 20 59 0d 09 ec 21 e7 |....B=X |. Y...!.|
|00001470| 20 42 3d 31 20 8c 20 42 | 24 3d 42 24 2b 22 31 22 | B=1 . B|$=B$+"1"|
|00001480| 20 8b 20 42 24 3d 42 24 | 2b 22 30 22 0d 09 f6 0f | . B$=B$|+"0"....|
|00001490| 42 3d 58 20 83 20 59 3a | 58 3d 42 0d 0a 00 09 59 |B=X . Y:|X=B....Y|
|000014a0| 3d 59 2f 32 0d 0a 0a 09 | fd 20 59 3c 31 0d 0a 14 |=Y/2....|. Y<1...|
|000014b0| 20 59 3d a7 42 24 2c 22 | 31 22 29 3a 42 24 3d c2 | Y=.B$,"|1"):B$=.|
|000014c0| 42 24 2c a9 28 42 24 29 | 2d 59 2b 31 29 0d 0a 1e |B$,.(B$)|-Y+1)...|
|000014d0| 16 e7 20 bb 28 42 24 29 | 3d 30 20 8c 20 42 24 3d |.. .(B$)|=0 . B$=|
|000014e0| 22 30 22 0d 0a 28 07 3d | 42 24 0d ff             |"0"..(.=|B$..    |
+--------+-------------------------+-------------------------+--------+--------+