home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1993-04-20 | 56.6 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 10%
| dexvert
| Truevision Targa Graphic (image/tga)
| magic
| Supported |
| 100%
| file
| data
| default
| |
| 100%
| xdgMime
| image/x-tga
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1d 20 f4 20 3e | 24 2e 21 45 61 73 69 42 |.... . >|$.!EasiB|
|00000010| 61 73 65 2e 21 52 75 6e | 49 6d 61 67 65 0d 00 14 |ase.!Run|Image...|
|00000020| 18 20 f4 20 28 63 29 20 | 44 61 76 69 64 20 52 61 |. . (c) |David Ra|
|00000030| 6d 73 64 65 6e 0d 00 1e | 14 20 f4 20 76 31 2e 30 |msden...|. . v1.0|
|00000040| 30 20 31 34 2f 31 2f 39 | 33 0d 00 28 19 20 ee 20 |0 14/1/9|3..(. . |
|00000050| 85 20 f2 73 79 73 5f 72 | 65 70 6f 72 74 65 72 72 |. .sys_r|eporterr|
|00000060| 6f 72 0d 00 32 2d 20 74 | 61 73 6b 5f 69 64 25 20 |or..2- t|ask_id% |
|00000070| 20 3d 20 a4 69 6e 69 74 | 69 61 6c 69 73 65 5f 77 | = .init|ialise_w|
|00000080| 69 6d 70 28 22 45 61 73 | 69 42 61 73 65 22 29 0d |imp("Eas|iBase").|
|00000090| 00 3c 3d 20 62 61 72 5f | 69 63 6f 6e 25 20 3d 20 |.<= bar_|icon% = |
|000000a0| a4 63 72 65 61 74 65 5f | 62 61 72 5f 69 63 6f 6e |.create_|bar_icon|
|000000b0| 28 22 21 45 61 73 69 42 | 61 73 65 22 2c 62 61 72 |("!EasiB|ase",bar|
|000000c0| 5f 69 63 6f 6e 5f 72 69 | 67 68 74 29 0d 00 46 04 |_icon_ri|ght)..F.|
|000000d0| 0d 00 50 14 20 f2 6c 6f | 61 64 5f 74 65 6d 70 6c |..P. .lo|ad_templ|
|000000e0| 61 74 65 73 0d 00 5a 14 | 20 f2 69 6e 69 74 5f 77 |ates..Z.| .init_w|
|000000f0| 6f 72 6b 73 70 61 63 65 | 0d 00 64 14 20 f2 69 6e |orkspace|..d. .in|
|00000100| 69 74 5f 76 61 72 69 61 | 62 6c 65 73 0d 00 6e 12 |it_varia|bles..n.|
|00000110| 20 f2 63 72 65 61 74 65 | 5f 6d 65 6e 75 73 0d 00 | .create|_menus..|
|00000120| 78 04 0d 00 82 04 0d 00 | 8c 06 20 f5 0d 00 96 34 |x.......|.. ....4|
|00000130| 20 c8 99 20 22 57 69 6d | 70 5f 50 6f 6c 6c 22 2c | .. "Wim|p_Poll",|
|00000140| 77 69 6d 70 5f 6d 61 73 | 6b 25 2c 77 69 6d 70 5f |wimp_mas|k%,wimp_|
|00000150| 62 6c 6f 63 6b 25 20 b8 | 20 72 65 73 75 6c 74 25 |block% .| result%|
|00000160| 0d 00 a0 11 20 c8 8e 20 | 72 65 73 75 6c 74 25 20 |.... .. |result% |
|00000170| ca 0d 00 aa 32 20 20 20 | c9 20 32 20 20 20 20 20 |....2 |. 2 |
|00000180| 3a 20 c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |: .. "Wi|mp_OpenW|
|00000190| 69 6e 64 6f 77 22 2c 2c | 77 69 6d 70 5f 62 6c 6f |indow",,|wimp_blo|
|000001a0| 63 6b 25 0d 00 b4 1e 20 | 20 20 c9 20 33 20 20 20 |ck%.... | . 3 |
|000001b0| 20 20 3a 20 f2 63 6c 6f | 73 65 5f 77 69 6e 64 6f | : .clo|se_windo|
|000001c0| 77 0d 00 be 2c 20 20 20 | c9 20 36 20 20 20 20 20 |w..., |. 6 |
|000001d0| 3a 20 f2 6d 6f 75 73 65 | 5f 63 6c 69 63 6b 28 77 |: .mouse|_click(w|
|000001e0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 38 29 0d 00 c8 |imp_bloc|k%!8)...|
|000001f0| 1b 20 20 20 c9 20 37 20 | 20 20 20 20 3a 20 f2 69 |. . 7 | : .i|
|00000200| 6e 69 74 5f 73 61 76 65 | 0d 00 d2 3a 20 20 20 c9 |nit_save|...: .|
|00000210| 20 38 20 20 20 20 20 3a | 20 f2 6b 65 79 5f 70 72 | 8 :| .key_pr|
|00000220| 65 73 73 65 64 28 77 69 | 6d 70 5f 62 6c 6f 63 6b |essed(wi|mp_block|
|00000230| 25 21 30 2c 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 21 |%!0,wimp|_block%!|
|00000240| 34 29 0d 00 dc 1f 20 20 | 20 c9 20 39 20 20 20 20 |4).... | . 9 |
|00000250| 20 3a 20 f2 6d 65 6e 75 | 5f 73 65 6c 65 63 74 65 | : .menu|_selecte|
|00000260| 64 0d 00 e6 31 20 20 20 | c9 20 31 37 2c 31 38 20 |d...1 |. 17,18 |
|00000270| 3a 20 f2 72 65 63 65 69 | 76 65 5f 6d 65 73 73 61 |: .recei|ve_messa|
|00000280| 67 65 28 77 69 6d 70 5f | 62 6c 6f 63 6b 25 21 31 |ge(wimp_|block%!1|
|00000290| 36 29 0d 00 f0 06 20 cb | 0d 00 fa 10 20 fd 20 66 |6).... .|.... . f|
|000002a0| 69 6e 69 73 68 65 64 25 | 0d 01 04 1e 20 f2 63 6c |inished%|.... .cl|
|000002b0| 6f 73 65 64 6f 77 6e 5f | 77 69 6d 70 28 74 61 73 |osedown_|wimp(tas|
|000002c0| 6b 5f 69 64 25 29 0d 01 | 0e 06 20 e0 0d 01 18 04 |k_id%)..|.. .....|
|000002d0| 0d 01 22 04 0d 01 2c 04 | 0d 01 36 32 20 f4 20 2a |.."...,.|..62 . *|
|000002e0| 20 2a 20 2a 20 50 52 49 | 4d 41 52 59 20 50 52 4f | * * PRI|MARY PRO|
|000002f0| 43 45 44 55 52 45 53 20 | 26 20 46 55 4e 43 54 49 |CEDURES |& FUNCTI|
|00000300| 4f 4e 53 20 20 2a 20 2a | 20 2a 0d 01 40 04 0d 01 |ONS * *| *..@...|
|00000310| 4a 04 0d 01 54 22 20 dd | 20 f2 6b 65 79 5f 70 72 |J...T" .| .key_pr|
|00000320| 65 73 73 65 64 28 77 69 | 6e 64 6f 77 25 2c 69 63 |essed(wi|ndow%,ic|
|00000330| 6f 6e 25 29 0d 01 5e 23 | 20 e7 20 77 69 6e 64 6f |on%)..^#| . windo|
|00000340| 77 25 20 3d 20 63 61 72 | 64 5f 61 72 65 61 25 21 |w% = car|d_area%!|
|00000350| 31 30 32 34 30 20 8c 0d | 01 68 29 20 20 20 e7 20 |10240 ..|.h) . |
|00000360| 69 63 6f 6e 25 20 3c 3e | 20 2d 31 20 20 80 20 ac |icon% <>| -1 . .|
|00000370| 20 73 65 61 72 63 68 5f | 6d 6f 64 65 25 20 20 8c | search_|mode% .|
|00000380| 0d 01 72 7d 20 20 20 20 | 20 e7 20 77 69 6d 70 5f |..r} | . wimp_|
|00000390| 62 6c 6f 63 6b 25 21 32 | 34 20 3d 20 31 33 20 20 |block%!2|4 = 13 |
|000003a0| f2 75 70 64 61 74 65 5f | 72 65 63 6f 72 64 5f 65 |.update_|record_e|
|000003b0| 6e 74 72 79 28 69 63 6f | 6e 25 29 20 3a 20 20 20 |ntry(ico|n%) : |
|000003c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000003d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000003e0| 20 20 20 20 20 20 20 f2 | 67 65 74 5f 6e 65 78 74 | .|get_next|
|000003f0| 5f 66 6f 63 75 73 28 69 | 63 6f 6e 25 29 0d 01 7c |_focus(i|con%)..||
|00000400| 08 20 20 20 cd 0d 01 86 | 06 20 cd 0d 01 90 06 20 |. ....|. ..... |
|00000410| e1 0d 01 9a 04 0d 01 a4 | 04 0d 01 ae 1b 20 dd 20 |........|..... . |
|00000420| f2 6d 6f 75 73 65 5f 63 | 6c 69 63 6b 28 63 6c 69 |.mouse_c|lick(cli|
|00000430| 63 6b 25 29 0d 01 b8 10 | 20 c8 8e 20 63 6c 69 63 |ck%)....| .. clic|
|00000440| 6b 25 20 ca 0d 01 c2 43 | 20 20 c9 20 73 65 6c 65 |k% ....C| . sele|
|00000450| 63 74 25 20 3a 20 e7 20 | 77 69 6d 70 5f 62 6c 6f |ct% : . |wimp_blo|
|00000460| 63 6b 25 21 31 32 20 3d | 20 63 61 72 64 5f 61 72 |ck%!12 =| card_ar|
|00000470| 65 61 25 21 31 30 32 34 | 30 20 20 f2 64 65 63 6f |ea%!1024|0 .deco|
|00000480| 64 65 5f 6d 61 69 6e 0d | 01 cc 41 20 20 20 20 20 |de_main.|..A |
|00000490| 20 20 20 20 20 20 20 20 | 20 20 3a 20 e7 20 77 69 | | : . wi|
|000004a0| 6d 70 5f 62 6c 6f 63 6b | 25 21 31 32 20 3d 20 63 |mp_block|%!12 = c|
|000004b0| 6f 6e 74 72 6f 6c 25 20 | 20 f2 64 65 63 6f 64 65 |ontrol% | .decode|
|000004c0| 5f 63 6f 6e 74 72 6f 6c | 0d 01 d6 4b 20 20 20 20 |_control|...K |
|000004d0| 20 20 20 20 20 20 20 20 | 20 20 20 3a 20 e7 20 77 | | : . w|
|000004e0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 31 36 20 3d 20 |imp_bloc|k%!16 = |
|000004f0| 62 61 72 5f 69 63 6f 6e | 25 20 80 20 65 61 73 69 |bar_icon|% . easi|
|00000500| 5f 6c 6f 61 64 25 20 f2 | 6f 70 65 6e 5f 77 69 6e |_load% .|open_win|
|00000510| 64 6f 77 0d 01 e0 73 20 | 20 20 20 20 20 20 20 20 |dow...s | |
|00000520| 20 20 20 20 20 20 3a 20 | e7 20 77 69 6d 70 5f 62 | : |. wimp_b|
|00000530| 6c 6f 63 6b 25 21 31 32 | 20 3d 20 73 61 76 65 5f |lock%!12| = save_|
|00000540| 65 61 73 69 25 20 80 20 | 77 69 6d 70 5f 62 6c 6f |easi% . |wimp_blo|
|00000550| 63 6b 25 21 31 36 20 3d | 20 32 20 20 20 20 20 20 |ck%!16 =| 2 |
|00000560| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 f2 | | .|
|00000570| 71 75 69 63 6b 5f 73 61 | 76 65 28 65 61 73 69 5f |quick_sa|ve(easi_|
|00000580| 73 61 76 65 24 29 0d 01 | ea 72 20 20 20 20 20 20 |save$)..|.r |
|00000590| 20 20 20 20 20 20 20 20 | 20 3a 20 e7 20 77 69 6d | | : . wim|
|000005a0| 70 5f 62 6c 6f 63 6b 25 | 21 31 32 20 3d 20 73 61 |p_block%|!12 = sa|
|000005b0| 76 65 5f 63 73 76 25 20 | 20 80 20 77 69 6d 70 5f |ve_csv% | . wimp_|
|000005c0| 62 6c 6f 63 6b 25 21 31 | 36 20 3d 20 32 20 20 20 |block%!1|6 = 2 |
|000005d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000005e0| 20 20 f2 71 75 69 63 6b | 5f 73 61 76 65 28 63 73 | .quick|_save(cs|
|000005f0| 76 5f 73 61 76 65 24 29 | 0d 01 f4 48 20 20 20 20 |v_save$)|...H |
|00000600| 20 20 20 20 20 20 20 20 | 20 20 20 3a 20 e7 20 77 | | : . w|
|00000610| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 31 32 20 3d 20 |imp_bloc|k%!12 = |
|00000620| 73 6f 72 74 25 20 80 20 | 77 69 6d 70 5f 62 6c 6f |sort% . |wimp_blo|
|00000630| 63 6b 25 21 31 36 20 3d | 20 32 20 f2 73 6f 72 74 |ck%!16 =| 2 .sort|
|00000640| 0d 01 fe 4c 20 20 20 20 | 20 20 20 20 20 20 20 20 |...L | |
|00000650| 20 20 20 3a 20 e7 20 77 | 69 6d 70 5f 62 6c 6f 63 | : . w|imp_bloc|
|00000660| 6b 25 21 31 32 20 3d 20 | 73 65 61 72 63 68 25 20 |k%!12 = |search% |
|00000670| 80 20 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 21 31 36 |. wimp_b|lock%!16|
|00000680| 20 3d 20 34 20 f2 73 65 | 61 72 63 68 0d 02 08 55 | = 4 .se|arch...U|
|00000690| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 3a | | :|
|000006a0| 20 e7 20 77 69 6d 70 5f | 62 6c 6f 63 6b 25 21 31 | . wimp_|block%!1|
|000006b0| 32 20 3d 20 67 72 61 70 | 68 5f 73 65 74 75 70 25 |2 = grap|h_setup%|
|000006c0| 20 80 20 77 69 6d 70 5f | 62 6c 6f 63 6b 25 21 31 | . wimp_|block%!1|
|000006d0| 36 20 3d 20 32 20 f2 70 | 6c 6f 74 5f 67 72 61 70 |6 = 2 .p|lot_grap|
|000006e0| 68 0d 02 12 58 20 20 20 | 20 20 20 20 20 20 20 20 |h...X | |
|000006f0| 20 20 20 20 3a 20 e7 20 | 77 69 6d 70 5f 62 6c 6f | : . |wimp_blo|
|00000700| 63 6b 25 21 31 32 20 3d | 20 67 72 61 70 68 31 25 |ck%!12 =| graph1%|
|00000710| 20 20 f2 67 72 61 70 68 | 5f 74 65 78 74 28 21 77 | .graph|_text(!w|
|00000720| 69 6d 70 5f 62 6c 6f 63 | 6b 25 2c 77 69 6d 70 5f |imp_bloc|k%,wimp_|
|00000730| 62 6c 6f 63 6b 25 21 34 | 29 0d 02 1c 3e 20 20 c9 |block%!4|)...> .|
|00000740| 20 6d 65 6e 75 25 20 20 | 20 3a 20 f2 64 69 73 70 | menu% | : .disp|
|00000750| 6c 61 79 5f 6d 65 6e 75 | 28 77 69 6d 70 5f 62 6c |lay_menu|(wimp_bl|
|00000760| 6f 63 6b 25 21 31 32 2c | 77 69 6d 70 5f 62 6c 6f |ock%!12,|wimp_blo|
|00000770| 63 6b 25 21 31 36 29 0d | 02 26 06 20 cb 0d 02 30 |ck%!16).|.&. ...0|
|00000780| 2b 20 e7 20 63 6c 69 63 | 6b 25 20 3d 20 31 36 2a |+ . clic|k% = 16*|
|00000790| 73 65 6c 65 63 74 25 20 | 20 f2 69 6e 69 74 5f 73 |select% | .init_s|
|000007a0| 61 76 65 5f 64 72 61 67 | 0d 02 3a 06 20 e1 0d 02 |ave_drag|..:. ...|
|000007b0| 44 04 0d 02 4e 04 0d 02 | 58 13 20 dd 20 f2 6f 70 |D...N...|X. . .op|
|000007c0| 65 6e 5f 77 69 6e 64 6f | 77 0d 02 62 24 20 21 77 |en_windo|w..b$ !w|
|000007d0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 20 3d 20 63 61 72 |imp_bloc|k% = car|
|000007e0| 64 5f 61 72 65 61 25 21 | 31 30 32 34 30 0d 02 6c |d_area%!|10240..l|
|000007f0| 2a 20 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 57 69 |* .. "Wi|mp_GetWi|
|00000800| 6e 64 6f 77 53 74 61 74 | 65 22 2c 2c 77 69 6d 70 |ndowStat|e",,wimp|
|00000810| 5f 62 6c 6f 63 6b 25 0d | 02 76 26 20 c8 99 20 22 |_block%.|.v& .. "|
|00000820| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00000830| 2c 2c 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 0d 02 80 |,,wimp_b|lock%...|
|00000840| 1c 20 21 77 69 6d 70 5f | 62 6c 6f 63 6b 25 20 3d |. !wimp_|block% =|
|00000850| 20 63 6f 6e 74 72 6f 6c | 25 0d 02 8a 2a 20 c8 99 | control|%...* ..|
|00000860| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|00000870| 53 74 61 74 65 22 2c 2c | 77 69 6d 70 5f 62 6c 6f |State",,|wimp_blo|
|00000880| 63 6b 25 0d 02 94 26 20 | c8 99 20 22 57 69 6d 70 |ck%...& |.. "Wimp|
|00000890| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 77 69 |_OpenWin|dow",,wi|
|000008a0| 6d 70 5f 62 6c 6f 63 6b | 25 0d 02 9e 06 20 e1 0d |mp_block|%.... ..|
|000008b0| 02 a8 04 0d 02 b2 04 0d | 02 bc 14 20 dd 20 f2 63 |........|... . .c|
|000008c0| 6c 6f 73 65 5f 77 69 6e | 64 6f 77 0d 02 c6 28 20 |lose_win|dow...( |
|000008d0| e7 20 21 77 69 6d 70 5f | 62 6c 6f 63 6b 25 20 3d |. !wimp_|block% =|
|000008e0| 20 63 61 72 64 5f 61 72 | 65 61 25 21 31 30 32 34 | card_ar|ea%!1024|
|000008f0| 30 20 8c 0d 02 d0 41 20 | 20 20 21 77 69 6d 70 5f |0 ....A | !wimp_|
|00000900| 62 6c 6f 63 6b 25 3d 63 | 6f 6e 74 72 6f 6c 25 20 |block%=c|ontrol% |
|00000910| 3a 20 c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |: .. "Wi|mp_Close|
|00000920| 57 69 6e 64 6f 77 22 2c | 2c 77 69 6d 70 5f 62 6c |Window",|,wimp_bl|
|00000930| 6f 63 6b 25 0d 02 da 2e | 20 20 20 c8 99 20 22 57 |ock%....| .. "W|
|00000940| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00000950| 2c 2c 63 61 72 64 5f 61 | 72 65 61 25 2b 31 30 32 |,,card_a|rea%+102|
|00000960| 34 30 0d 02 e4 06 20 cc | 0d 02 ee 29 20 20 20 c8 |40.... .|...) .|
|00000970| 99 20 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |. "Wimp_|CloseWin|
|00000980| 64 6f 77 22 2c 2c 77 69 | 6d 70 5f 62 6c 6f 63 6b |dow",,wi|mp_block|
|00000990| 25 0d 02 f8 06 20 cd 0d | 03 02 04 0d 03 0c 1e 20 |%.... ..|....... |
|000009a0| e7 20 21 77 69 6d 70 5f | 62 6c 6f 63 6b 25 20 3d |. !wimp_|block% =|
|000009b0| 20 73 6f 72 74 25 20 20 | 8c 0d 03 16 25 20 20 20 | sort% |....% |
|000009c0| f2 73 65 74 5f 6d 65 6e | 75 5f 74 69 63 6b 28 6d |.set_men|u_tick(m|
|000009d0| 61 69 6e 5f 6d 65 6e 75 | 25 2c 31 2c a3 29 0d 03 |ain_menu|%,1,.)..|
|000009e0| 20 15 20 20 20 73 6f 72 | 74 5f 6d 6f 64 65 25 20 | . sor|t_mode% |
|000009f0| 3d 20 a3 0d 03 2a 18 20 | 20 20 64 61 74 61 5f 61 |= ...*. | data_a|
|00000a00| 72 65 61 25 21 32 30 20 | 3d 20 30 0d 03 34 06 20 |rea%!20 |= 0..4. |
|00000a10| cd 0d 03 3e 04 0d 03 48 | 1f 20 e7 20 21 77 69 6d |...>...H|. . !wim|
|00000a20| 70 5f 62 6c 6f 63 6b 25 | 20 3d 20 73 65 61 72 63 |p_block%| = searc|
|00000a30| 68 25 20 8c 0d 03 52 27 | 20 20 20 20 20 f2 73 65 |h% ...R'| .se|
|00000a40| 74 5f 6d 65 6e 75 5f 74 | 69 63 6b 28 6d 61 69 6e |t_menu_t|ick(main|
|00000a50| 5f 6d 65 6e 75 25 2c 32 | 2c a3 29 0d 03 5c 19 20 |_menu%,2|,.)..\. |
|00000a60| 20 20 20 20 73 65 61 72 | 63 68 5f 6d 6f 64 65 25 | sear|ch_mode%|
|00000a70| 20 3d 20 a3 0d 03 66 1a | 20 20 20 20 20 64 61 74 | = ...f.| dat|
|00000a80| 61 5f 61 72 65 61 25 21 | 32 30 20 3d 20 30 0d 03 |a_area%!|20 = 0..|
|00000a90| 70 18 20 20 20 20 20 f2 | 73 68 6f 77 5f 72 65 63 |p. .|show_rec|
|00000aa0| 6f 72 64 28 30 29 0d 03 | 7a 06 20 cd 0d 03 84 04 |ord(0)..|z. .....|
|00000ab0| 0d 03 8e 24 20 e7 20 21 | 77 69 6d 70 5f 62 6c 6f |...$ . !|wimp_blo|
|00000ac0| 63 6b 25 20 3d 20 67 72 | 61 70 68 5f 73 65 74 75 |ck% = gr|aph_setu|
|00000ad0| 70 25 20 8c 0d 03 98 25 | 20 20 20 f2 73 65 74 5f |p% ....%| .set_|
|00000ae0| 6d 65 6e 75 5f 74 69 63 | 6b 28 6d 61 69 6e 5f 6d |menu_tic|k(main_m|
|00000af0| 65 6e 75 25 2c 35 2c a3 | 29 0d 03 a2 16 20 20 20 |enu%,5,.|).... |
|00000b00| 67 72 61 70 68 5f 6d 6f | 64 65 25 20 3d 20 a3 0d |graph_mo|de% = ..|
|00000b10| 03 ac 17 20 20 20 67 72 | 61 70 68 5f 69 63 6f 6e |... gr|aph_icon|
|00000b20| 31 25 20 3d 20 a3 0d 03 | b6 17 20 20 20 67 72 61 |1% = ...|.. gra|
|00000b30| 70 68 5f 69 63 6f 6e 32 | 25 20 3d 20 a3 0d 03 c0 |ph_icon2|% = ....|
|00000b40| 06 20 cd 0d 03 ca 06 20 | e1 0d 03 d4 04 0d 03 de |. ..... |........|
|00000b50| 04 0d 03 e8 14 20 dd 20 | f2 63 72 65 61 74 65 5f |..... . |.create_|
|00000b60| 6d 65 6e 75 73 0d 03 f2 | 34 20 62 61 72 5f 6d 65 |menus...|4 bar_me|
|00000b70| 6e 75 25 20 20 3d 20 a4 | 63 72 65 61 74 65 5f 6d |nu% = .|create_m|
|00000b80| 65 6e 75 28 22 45 61 73 | 69 42 61 73 65 2c 49 6e |enu("Eas|iBase,In|
|00000b90| 66 6f 2c 51 75 69 74 22 | 29 0d 03 fc 28 20 f2 6d |fo,Quit"|)...( .m|
|00000ba0| 65 6e 75 5f 61 74 74 61 | 63 68 28 62 61 72 5f 6d |enu_atta|ch(bar_m|
|00000bb0| 65 6e 75 25 2c 31 2c 70 | 72 6f 67 49 6e 66 6f 25 |enu%,1,p|rogInfo%|
|00000bc0| 29 0d 04 06 4e 20 6d 61 | 69 6e 5f 6d 65 6e 75 25 |)...N ma|in_menu%|
|00000bd0| 20 3d 20 a4 63 72 65 61 | 74 65 5f 6d 65 6e 75 28 | = .crea|te_menu(|
|00000be0| 22 45 61 73 69 42 61 73 | 65 2c 53 6f 72 74 2c 53 |"EasiBas|e,Sort,S|
|00000bf0| 65 61 72 63 68 2c 53 65 | 6c 65 63 74 2c 53 61 76 |earch,Se|lect,Sav|
|00000c00| 65 2c 47 72 61 70 68 2c | 50 72 69 6e 74 22 29 0d |e,Graph,|Print").|
|00000c10| 04 10 29 20 f2 6d 65 6e | 75 5f 61 74 74 61 63 68 |..) .men|u_attach|
|00000c20| 28 6d 61 69 6e 5f 6d 65 | 6e 75 25 2c 33 2c 73 61 |(main_me|nu%,3,sa|
|00000c30| 76 65 5f 63 73 76 25 29 | 0d 04 1a 2a 20 f2 6d 65 |ve_csv%)|...* .me|
|00000c40| 6e 75 5f 61 74 74 61 63 | 68 28 6d 61 69 6e 5f 6d |nu_attac|h(main_m|
|00000c50| 65 6e 75 25 2c 34 2c 73 | 61 76 65 5f 65 61 73 69 |enu%,4,s|ave_easi|
|00000c60| 25 29 0d 04 24 37 20 67 | 72 61 70 68 5f 6d 65 6e |%)..$7 g|raph_men|
|00000c70| 75 25 20 3d 20 a4 63 72 | 65 61 74 65 5f 6d 65 6e |u% = .cr|eate_men|
|00000c80| 75 28 22 45 61 73 69 42 | 61 73 65 2c 50 72 69 6e |u("EasiB|ase,Prin|
|00000c90| 74 20 67 72 61 70 68 22 | 29 0d 04 2e 06 20 e1 0d |t graph"|).... ..|
|00000ca0| 04 38 04 0d 04 42 04 0d | 04 4c 16 20 dd 20 f2 69 |.8...B..|.L. . .i|
|00000cb0| 6e 69 74 5f 77 6f 72 6b | 73 70 61 63 65 0d 04 56 |nit_work|space..V|
|00000cc0| 42 20 f2 69 6e 64 69 72 | 65 63 74 65 64 5f 69 63 |B .indir|ected_ic|
|00000cd0| 6f 6e 5f 73 74 72 69 6e | 67 5f 73 65 74 28 70 72 |on_strin|g_set(pr|
|00000ce0| 6f 67 49 6e 66 6f 25 2c | 34 2c 22 31 2e 30 31 20 |ogInfo%,|4,"1.01 |
|00000cf0| 28 32 30 2d 41 70 72 2d | 31 39 39 33 29 22 29 0d |(20-Apr-|1993)").|
|00000d00| 04 60 18 20 de 20 64 61 | 74 61 5f 61 72 65 61 25 |.`. . da|ta_area%|
|00000d10| 20 31 33 31 30 37 32 0d | 04 6a 04 0d 04 74 17 20 | 131072.|.j...t. |
|00000d20| de 20 63 61 72 64 5f 61 | 72 65 61 25 20 31 36 33 |. card_a|rea% 163|
|00000d30| 38 34 0d 04 7e 19 20 de | 20 73 70 72 69 74 65 5f |84..~. .| sprite_|
|00000d40| 61 72 65 61 25 20 34 30 | 39 36 30 0d 04 88 1c 20 |area% 40|960.... |
|00000d50| 21 73 70 72 69 74 65 5f | 61 72 65 61 25 20 20 20 |!sprite_|area% |
|00000d60| 3d 20 34 30 39 36 30 0d | 04 92 18 20 73 70 72 69 |= 40960.|... spri|
|00000d70| 74 65 5f 61 72 65 61 25 | 21 34 20 20 3d 20 30 0d |te_area%|!4 = 0.|
|00000d80| 04 9c 19 20 73 70 72 69 | 74 65 5f 61 72 65 61 25 |... spri|te_area%|
|00000d90| 21 38 20 20 3d 20 31 36 | 0d 04 a6 19 20 73 70 72 |!8 = 16|.... spr|
|00000da0| 69 74 65 5f 61 72 65 61 | 25 21 31 32 20 3d 20 31 |ite_area|%!12 = 1|
|00000db0| 36 0d 04 b0 04 0d 04 ba | 16 20 de 20 66 6f 6e 74 |6.......|. . font|
|00000dc0| 5f 62 75 66 66 65 72 25 | 20 34 30 0d 04 c4 16 20 |_buffer%| 40.... |
|00000dd0| de 20 74 65 78 74 5f 62 | 75 66 66 65 72 25 20 34 |. text_b|uffer% 4|
|00000de0| 38 0d 04 ce 12 20 de 20 | 76 61 6c 69 64 25 20 36 |8.... . |valid% 6|
|00000df0| 34 32 34 0d 04 d8 19 20 | 76 61 6c 69 64 31 24 20 |424.... |valid1$ |
|00000e00| 3d 20 22 41 30 2d 39 2d | 3c 3e 3d 22 0d 04 e2 1a |= "A0-9-|<>="....|
|00000e10| 20 76 61 6c 69 64 32 24 | 20 3d 20 22 41 30 2d 39 | valid2$| = "A0-9|
|00000e20| 2e 2d 3c 3e 3d 22 0d 04 | ec 1c 20 76 61 6c 69 64 |.-<>="..|.. valid|
|00000e30| 33 24 20 3d 20 22 41 30 | 2d 39 2e 2f 23 2a 3c 3e |3$ = "A0|-9./#*<>|
|00000e40| 3d 22 0d 04 f6 04 0d 05 | 00 0f 20 de 20 72 65 63 |="......|.. . rec|
|00000e50| 74 25 20 31 36 0d 05 0a | 04 0d 05 14 10 20 de 20 |t% 16...|..... . |
|00000e60| 74 72 61 6e 73 25 20 31 | 36 0d 05 1e 25 20 21 74 |trans% 1|6...% !t|
|00000e70| 72 61 6e 73 25 20 20 3d | 20 31 3c 3c 31 36 20 3a |rans% =| 1<<16 :|
|00000e80| 20 74 72 61 6e 73 25 21 | 34 20 20 3d 20 30 0d 05 | trans%!|4 = 0..|
|00000e90| 28 29 20 74 72 61 6e 73 | 25 21 38 20 3d 20 30 20 |() trans|%!8 = 0 |
|00000ea0| 20 20 20 20 3a 20 74 72 | 61 6e 73 25 21 31 32 20 | : tr|ans%!12 |
|00000eb0| 3d 20 31 3c 3c 31 36 0d | 05 32 04 0d 05 3c 10 20 |= 1<<16.|.2...<. |
|00000ec0| de 20 70 6c 6f 74 61 74 | 25 20 38 0d 05 46 06 20 |. plotat|% 8..F. |
|00000ed0| e1 0d 05 50 04 0d 05 5a | 04 0d 05 64 16 20 dd 20 |...P...Z|...d. . |
|00000ee0| f2 69 6e 69 74 5f 76 61 | 72 69 61 62 6c 65 73 0d |.init_va|riables.|
|00000ef0| 05 6e 14 20 e3 20 6c 6f | 6f 70 25 3d 31 20 b8 20 |.n. . lo|op%=1 . |
|00000f00| 32 35 34 0d 05 78 25 20 | 20 3f 28 64 61 74 61 5f |254..x% | ?(data_|
|00000f10| 61 72 65 61 25 2b 31 32 | 37 2b 6c 6f 6f 70 25 29 |area%+12|7+loop%)|
|00000f20| 20 3d 20 6c 6f 6f 70 25 | 0d 05 82 06 20 ed 0d 05 | = loop%|.... ...|
|00000f30| 8c 13 20 65 61 73 69 5f | 73 61 76 65 25 20 3d 20 |.. easi_|save% = |
|00000f40| a3 0d 05 96 13 20 65 61 | 73 69 5f 70 6c 75 73 25 |..... ea|si_plus%|
|00000f50| 20 3d 20 a3 0d 05 a0 13 | 20 65 61 73 69 5f 6c 6f | = .....| easi_lo|
|00000f60| 61 64 25 20 3d 20 a3 0d | 05 aa 18 20 65 61 73 69 |ad% = ..|... easi|
|00000f70| 5f 73 61 76 65 24 20 3d | 20 22 45 61 73 69 22 0d |_save$ =| "Easi".|
|00000f80| 05 b4 17 20 63 73 76 5f | 73 61 76 65 24 20 20 3d |... csv_|save$ =|
|00000f90| 20 22 63 73 76 22 0d 05 | be 39 20 f2 69 6e 64 69 | "csv"..|.9 .indi|
|00000fa0| 72 65 63 74 65 64 5f 69 | 63 6f 6e 5f 73 74 72 69 |rected_i|con_stri|
|00000fb0| 6e 67 5f 73 65 74 28 73 | 61 76 65 5f 65 61 73 69 |ng_set(s|ave_easi|
|00000fc0| 25 2c 31 2c 65 61 73 69 | 5f 73 61 76 65 24 29 0d |%,1,easi|_save$).|
|00000fd0| 05 c8 37 20 f2 69 6e 64 | 69 72 65 63 74 65 64 5f |..7 .ind|irected_|
|00000fe0| 69 63 6f 6e 5f 73 74 72 | 69 6e 67 5f 73 65 74 28 |icon_str|ing_set(|
|00000ff0| 73 61 76 65 5f 63 73 76 | 25 2c 31 2c 63 73 76 5f |save_csv|%,1,csv_|
|00001000| 73 61 76 65 24 29 0d 05 | d2 15 20 73 75 62 73 65 |save$)..|.. subse|
|00001010| 74 25 20 20 20 20 20 20 | 3d 20 a3 0d 05 dc 15 20 |t% |= ..... |
|00001020| 73 75 62 73 65 74 5f 73 | 65 6c 25 20 20 3d 20 a3 |subset_s|el% = .|
|00001030| 0d 05 e6 15 20 72 65 63 | 6f 72 64 5f 61 64 64 25 |.... rec|ord_add%|
|00001040| 20 20 3d 20 a3 0d 05 f0 | 15 20 73 6f 72 74 5f 6d | = ....|. sort_m|
|00001050| 6f 64 65 25 20 20 20 3d | 20 a3 0d 05 fa 15 20 73 |ode% =| ..... s|
|00001060| 65 61 72 63 68 5f 6d 6f | 64 65 25 20 3d 20 a3 0d |earch_mo|de% = ..|
|00001070| 06 04 15 20 73 65 6c 65 | 63 74 5f 6d 6f 64 65 25 |... sele|ct_mode%|
|00001080| 20 3d 20 a3 0d 06 0e 15 | 20 67 72 61 70 68 5f 6d | = .....| graph_m|
|00001090| 6f 64 65 25 20 20 3d 20 | a3 0d 06 18 15 20 66 69 |ode% = |..... fi|
|000010a0| 6e 69 73 68 65 64 25 20 | 20 20 20 3d 20 a3 0d 06 |nished% | = ...|
|000010b0| 22 15 20 67 72 61 70 68 | 5f 70 6c 6f 74 25 20 20 |". graph|_plot% |
|000010c0| 3d 20 a3 0d 06 2c 15 20 | 73 65 61 72 63 68 5f 74 |= ...,. |search_t|
|000010d0| 79 70 65 25 20 3d 20 30 | 0d 06 36 16 20 67 72 61 |ype% = 0|..6. gra|
|000010e0| 70 68 31 25 20 20 20 20 | 20 20 3d 20 2d 31 0d 06 |ph1% | = -1..|
|000010f0| 40 15 20 77 69 6d 70 5f | 6d 61 73 6b 25 20 20 20 |@. wimp_|mask% |
|00001100| 3d 20 30 0d 06 4a 06 20 | e1 0d 06 54 04 0d 06 5e |= 0..J. |...T...^|
|00001110| 04 0d 06 68 0d 20 dd 20 | f2 63 6c 65 61 72 0d 06 |...h. . |.clear..|
|00001120| 72 3b 20 e7 20 65 61 73 | 69 5f 6c 6f 61 64 25 20 |r; . eas|i_load% |
|00001130| 20 c8 99 20 22 57 69 6d | 70 5f 44 65 6c 65 74 65 | .. "Wim|p_Delete|
|00001140| 57 69 6e 64 6f 77 22 2c | 2c 63 61 72 64 5f 61 72 |Window",|,card_ar|
|00001150| 65 61 25 2b 31 30 32 34 | 30 0d 06 7c 1c 20 e3 20 |ea%+1024|0..|. . |
|00001160| 6c 6f 6f 70 25 20 3d 20 | 30 20 b8 20 31 36 33 38 |loop% = |0 . 1638|
|00001170| 34 20 88 20 34 0d 06 86 | 1e 20 20 20 21 28 63 61 |4 . 4...|. !(ca|
|00001180| 72 64 5f 61 72 65 61 25 | 2b 6c 6f 6f 70 25 29 20 |rd_area%|+loop%) |
|00001190| 3d 20 30 0d 06 90 06 20 | ed 0d 06 9a 1d 20 e3 20 |= 0.... |..... . |
|000011a0| 6c 6f 6f 70 25 20 3d 20 | 30 20 b8 20 31 33 31 30 |loop% = |0 . 1310|
|000011b0| 37 32 20 88 20 34 0d 06 | a4 1e 20 20 20 21 28 64 |72 . 4..|.. !(d|
|000011c0| 61 74 61 5f 61 72 65 61 | 25 2b 6c 6f 6f 70 25 29 |ata_area|%+loop%)|
|000011d0| 20 3d 20 30 0d 06 ae 06 | 20 ed 0d 06 b8 06 20 e1 | = 0....| ..... .|
|000011e0| 0d 06 c2 04 0d 06 cc 04 | 0d 06 d6 15 20 dd 20 f2 |........|.... . .|
|000011f0| 6d 65 6e 75 5f 73 65 6c | 65 63 74 65 64 0d 06 e0 |menu_sel|ected...|
|00001200| 1d 20 73 65 6c 65 63 74 | 65 64 24 20 3d 20 a4 64 |. select|ed$ = .d|
|00001210| 65 63 6f 64 65 5f 6d 65 | 6e 75 0d 06 ea 13 20 c8 |ecode_me|nu.... .|
|00001220| 8e 20 73 65 6c 65 63 74 | 65 64 24 20 ca 0d 06 f4 |. select|ed$ ....|
|00001230| 29 20 20 20 c9 20 22 53 | 6f 72 74 22 20 20 20 20 |) . "S|ort" |
|00001240| 20 20 20 20 3a 20 f2 73 | 68 6f 77 5f 73 6f 72 74 | : .s|how_sort|
|00001250| 5f 70 61 6e 65 6c 0d 06 | fe 2b 20 20 20 c9 20 22 |_panel..|.+ . "|
|00001260| 53 65 61 72 63 68 22 20 | 20 20 20 20 20 3a 20 f2 |Search" | : .|
|00001270| 73 68 6f 77 5f 73 65 61 | 72 63 68 5f 70 61 6e 65 |show_sea|rch_pane|
|00001280| 6c 0d 07 08 25 20 20 20 | c9 20 22 53 65 6c 65 63 |l...% |. "Selec|
|00001290| 74 22 20 20 20 20 20 20 | 3a 20 f2 73 65 6c 65 63 |t" |: .selec|
|000012a0| 74 5f 6d 6f 64 65 0d 07 | 12 31 20 20 20 c9 20 22 |t_mode..|.1 . "|
|000012b0| 50 72 69 6e 74 22 20 20 | 20 20 20 20 20 3a 20 f2 |Print" | : .|
|000012c0| 70 72 69 6e 74 28 63 61 | 72 64 5f 61 72 65 61 25 |print(ca|rd_area%|
|000012d0| 21 31 30 32 34 30 29 0d | 07 1c 1f 20 20 20 c9 20 |!10240).|... . |
|000012e0| 22 47 72 61 70 68 22 20 | 20 20 20 20 20 20 3a 20 |"Graph" | : |
|000012f0| f2 67 72 61 70 68 0d 07 | 26 28 20 20 20 c9 20 22 |.graph..|&( . "|
|00001300| 50 72 69 6e 74 20 67 72 | 61 70 68 22 20 3a 20 f2 |Print gr|aph" : .|
|00001310| 70 72 69 6e 74 28 67 72 | 61 70 68 31 25 29 0d 07 |print(gr|aph1%)..|
|00001320| 30 24 20 20 20 c9 20 22 | 51 75 69 74 22 20 20 20 |0$ . "|Quit" |
|00001330| 20 20 20 20 20 3a 20 f2 | 63 68 65 63 6b 5f 71 75 | : .|check_qu|
|00001340| 69 74 0d 07 3a 06 20 cb | 0d 07 44 26 20 61 64 6a |it..:. .|..D& adj|
|00001350| 75 73 74 5f 70 72 65 73 | 73 65 64 25 20 3d 20 a4 |ust_pres|sed% = .|
|00001360| 61 64 6a 75 73 74 5f 70 | 72 65 73 73 65 64 0d 07 |adjust_p|ressed..|
|00001370| 4e 33 20 e7 20 28 61 64 | 6a 75 73 74 5f 70 72 65 |N3 . (ad|just_pre|
|00001380| 73 73 65 64 25 20 80 20 | ac 20 66 69 6e 69 73 68 |ssed% . |. finish|
|00001390| 65 64 25 29 20 f2 72 65 | 73 68 6f 77 5f 6d 65 6e |ed%) .re|show_men|
|000013a0| 75 0d 07 58 06 20 e1 0d | 07 62 04 0d 07 6c 04 0d |u..X. ..|.b...l..|
|000013b0| 07 76 21 20 dd 20 f2 72 | 65 63 65 69 76 65 5f 6d |.v! . .r|eceive_m|
|000013c0| 65 73 73 61 67 65 28 6d | 65 73 73 61 67 65 25 29 |essage(m|essage%)|
|000013d0| 0d 07 80 12 20 c8 8e 20 | 6d 65 73 73 61 67 65 25 |.... .. |message%|
|000013e0| 20 ca 0d 07 8a 25 20 20 | 20 c9 20 71 75 69 74 25 | ....% | . quit%|
|000013f0| 20 20 20 20 20 20 20 20 | 20 20 3a 20 f2 63 68 65 | | : .che|
|00001400| 63 6b 5f 71 75 69 74 0d | 07 94 43 20 20 20 c9 20 |ck_quit.|..C . |
|00001410| 64 61 74 61 5f 73 61 76 | 65 5f 61 63 6b 25 20 3a |data_sav|e_ack% :|
|00001420| 20 f2 73 61 76 65 5f 64 | 61 74 61 28 a4 67 65 74 | .save_d|ata(.get|
|00001430| 5f 73 74 72 69 6e 67 28 | 77 69 6d 70 5f 62 6c 6f |_string(|wimp_blo|
|00001440| 63 6b 25 2b 34 34 29 2c | b9 29 0d 07 9e 24 20 20 |ck%+44),|.)...$ |
|00001450| 20 c9 20 64 61 74 61 5f | 6c 6f 61 64 25 20 20 20 | . data_|load% |
|00001460| 20 20 3a 20 f2 64 61 74 | 61 5f 6c 6f 61 64 0d 07 | : .dat|a_load..|
|00001470| a8 26 20 20 20 c9 20 6d | 6f 64 65 5f 63 68 61 6e |.& . m|ode_chan|
|00001480| 67 65 25 20 20 20 3a 20 | f2 63 68 65 63 6b 5f 66 |ge% : |.check_f|
|00001490| 6f 6e 74 73 0d 07 b2 06 | 20 cb 0d 07 bc 06 20 e1 |onts....| ..... .|
|000014a0| 0d 07 c6 04 0d 07 d0 04 | 0d 07 da 04 0d 07 e4 35 |........|.......5|
|000014b0| 20 f4 20 2a 20 2a 20 2a | 20 20 53 45 43 4f 4e 44 | . * * *| SECOND|
|000014c0| 41 52 59 20 50 52 4f 43 | 45 44 55 52 45 53 20 26 |ARY PROC|EDURES &|
|000014d0| 20 46 55 4e 43 54 49 4f | 4e 53 20 20 2a 20 2a 20 | FUNCTIO|NS * * |
|000014e0| 2a 0d 07 ee 04 0d 07 f8 | 04 0d 08 02 13 20 dd 20 |*.......|..... . |
|000014f0| f2 73 65 6c 65 63 74 5f | 6d 6f 64 65 0d 08 0c 1a |.select_|mode....|
|00001500| 20 e7 20 73 6f 72 74 5f | 6d 6f 64 65 25 20 20 20 | . sort_|mode% |
|00001510| 3d 20 b9 20 20 e1 0d 08 | 16 1a 20 e7 20 67 72 61 |= . ...|.. . gra|
|00001520| 70 68 5f 6d 6f 64 65 25 | 20 20 3d 20 b9 20 20 e1 |ph_mode%| = . .|
|00001530| 0d 08 20 1a 20 e7 20 73 | 65 61 72 63 68 5f 6d 6f |.. . . s|earch_mo|
|00001540| 64 65 25 20 3d 20 b9 20 | 20 e1 0d 08 2a 22 20 73 |de% = . | ...*" s|
|00001550| 65 6c 65 63 74 5f 6d 6f | 64 65 25 20 3d 20 ac 20 |elect_mo|de% = . |
|00001560| 73 65 6c 65 63 74 5f 6d | 6f 64 65 25 0d 08 34 24 |select_m|ode%..4$|
|00001570| 20 f2 6d 65 6e 75 5f 74 | 69 63 6b 5f 74 6f 67 67 | .menu_t|ick_togg|
|00001580| 6c 65 28 6d 61 69 6e 5f | 6d 65 6e 75 25 2c 33 29 |le(main_|menu%,3)|
|00001590| 0d 08 3e 18 20 e7 20 ac | 20 73 65 6c 65 63 74 5f |..>. . .| select_|
|000015a0| 6d 6f 64 65 25 20 20 8c | 0d 08 48 16 20 20 20 f2 |mode% .|..H. .|
|000015b0| 73 68 6f 77 5f 72 65 63 | 6f 72 64 28 30 29 0d 08 |show_rec|ord(0)..|
|000015c0| 52 08 20 20 20 e1 0d 08 | 5c 06 20 cd 0d 08 66 16 |R. ...|\. ...f.|
|000015d0| 20 64 61 74 61 5f 61 72 | 65 61 25 21 32 30 20 3d | data_ar|ea%!20 =|
|000015e0| 20 30 0d 08 70 22 20 e3 | 20 6c 6f 6f 70 25 20 3d | 0..p" .| loop% =|
|000015f0| 20 30 20 b8 20 63 61 72 | 64 5f 61 72 65 61 25 21 | 0 . car|d_area%!|
|00001600| 39 33 35 32 0d 08 7a 24 | 20 e7 20 63 61 72 64 5f |9352..z$| . card_|
|00001610| 61 72 65 61 25 3f 28 36 | 38 2b 6c 6f 6f 70 25 29 |area%?(6|8+loop%)|
|00001620| 20 3c 20 32 30 30 20 8c | 0d 08 84 4b 20 f2 69 6e | < 200 .|...K .in|
|00001630| 64 69 72 65 63 74 65 64 | 5f 69 63 6f 6e 5f 73 74 |directed|_icon_st|
|00001640| 72 69 6e 67 5f 73 65 74 | 28 63 61 72 64 5f 61 72 |ring_set|(card_ar|
|00001650| 65 61 25 21 31 30 32 34 | 30 2c 63 61 72 64 5f 61 |ea%!1024|0,card_a|
|00001660| 72 65 61 25 3f 28 36 38 | 2b 6c 6f 6f 70 25 29 2c |rea%?(68|+loop%),|
|00001670| 22 22 29 0d 08 8e 06 20 | cd 0d 08 98 06 20 ed 0d |"").... |..... ..|
|00001680| 08 a2 15 20 73 65 6c 65 | 63 74 5f 6d 6f 64 65 25 |... sele|ct_mode%|
|00001690| 20 3d 20 b9 0d 08 ac 06 | 20 e1 0d 08 b6 04 0d 08 | = .....| .......|
|000016a0| c0 04 0d 08 ca 13 20 dd | 20 f2 64 65 63 6f 64 65 |...... .| .decode|
|000016b0| 5f 6d 61 69 6e 0d 08 d4 | 8b 20 e7 20 73 6f 72 74 |_main...|. . sort|
|000016c0| 5f 6d 6f 64 65 25 20 20 | 20 3d 20 b9 20 20 c8 99 |_mode% | = . ..|
|000016d0| 20 22 57 69 6d 70 5f 53 | 65 74 43 61 72 65 74 50 | "Wimp_S|etCaretP|
|000016e0| 6f 73 69 74 69 6f 6e 22 | 2c 2d 31 20 3a 20 20 20 |osition"|,-1 : |
|000016f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001700| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001710| 20 20 20 20 20 20 20 f2 | 61 64 64 5f 69 63 6f 6e | .|add_icon|
|00001720| 5f 74 6f 5f 73 6f 72 74 | 5f 6c 69 73 74 28 77 69 |_to_sort|_list(wi|
|00001730| 6d 70 5f 62 6c 6f 63 6b | 25 21 31 36 29 3a ef 37 |mp_block|%!16):.7|
|00001740| 0d 08 de 89 20 e7 20 67 | 72 61 70 68 5f 6d 6f 64 |.... . g|raph_mod|
|00001750| 65 25 20 20 3d 20 b9 20 | 20 c8 99 20 22 57 69 6d |e% = . | .. "Wim|
|00001760| 70 5f 53 65 74 43 61 72 | 65 74 50 6f 73 69 74 69 |p_SetCar|etPositi|
|00001770| 6f 6e 22 2c 2d 31 20 3a | 20 20 20 20 20 20 20 20 |on",-1 :| |
|00001780| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001790| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000017a0| 20 20 f2 61 64 64 5f 69 | 63 6f 6e 5f 74 6f 5f 67 | .add_i|con_to_g|
|000017b0| 72 61 70 68 5f 6c 69 73 | 74 28 77 69 6d 70 5f 62 |raph_lis|t(wimp_b|
|000017c0| 6c 6f 63 6b 25 21 31 36 | 29 0d 08 e8 41 20 e7 20 |lock%!16|)...A . |
|000017d0| 73 65 61 72 63 68 5f 6d | 6f 64 65 25 20 3d 20 b9 |search_m|ode% = .|
|000017e0| 20 20 f2 61 64 64 5f 69 | 63 6f 6e 5f 74 6f 5f 73 | .add_i|con_to_s|
|000017f0| 65 61 72 63 68 5f 6c 69 | 73 74 28 77 69 6d 70 5f |earch_li|st(wimp_|
|00001800| 62 6c 6f 63 6b 25 21 31 | 36 29 0d 08 f2 8a 20 e7 |block%!1|6).... .|
|00001810| 20 73 65 6c 65 63 74 5f | 6d 6f 64 65 25 20 3d 20 | select_|mode% = |
|00001820| b9 20 20 c8 99 20 22 57 | 69 6d 70 5f 53 65 74 43 |. .. "W|imp_SetC|
|00001830| 61 72 65 74 50 6f 73 69 | 74 69 6f 6e 22 2c 2d 31 |aretPosi|tion",-1|
|00001840| 20 3a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | : | |
|00001850| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00001860| 20 20 20 20 20 20 20 20 | 20 20 20 20 f2 61 64 64 | | .add|
|00001870| 5f 69 63 6f 6e 5f 74 6f | 5f 73 65 61 72 63 68 5f |_icon_to|_search_|
|00001880| 6c 69 73 74 28 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |list(wim|p_block%|
|00001890| 21 31 36 29 0d 08 fc 06 | 20 e1 0d 09 06 04 0d 09 |!16)....| .......|
|000018a0| 10 04 0d 09 1a 1d 20 dd | 20 f2 67 65 74 5f 6e 65 |...... .| .get_ne|
|000018b0| 78 74 5f 66 6f 63 75 73 | 28 69 63 6f 6e 25 29 0d |xt_focus|(icon%).|
|000018c0| 09 24 22 20 e3 20 6c 6f | 6f 70 25 20 3d 20 30 20 |.$" . lo|op% = 0 |
|000018d0| b8 20 63 61 72 64 5f 61 | 72 65 61 25 21 39 33 35 |. card_a|rea%!935|
|000018e0| 32 0d 09 2e 3e 20 20 20 | e7 20 69 63 6f 6e 25 20 |2...> |. icon% |
|000018f0| 3d 20 3f 28 63 61 72 64 | 5f 61 72 65 61 25 2b 38 |= ?(card|_area%+8|
|00001900| 31 39 32 2b 6c 6f 6f 70 | 25 29 20 20 6f 66 66 73 |192+loop|%) offs|
|00001910| 65 74 25 20 3d 20 6c 6f | 6f 70 25 20 2b 20 31 0d |et% = lo|op% + 1.|
|00001920| 09 38 06 20 ed 0d 09 42 | 23 20 e7 20 6f 66 66 73 |.8. ...B|# . offs|
|00001930| 65 74 25 20 3d 20 63 61 | 72 64 5f 61 72 65 61 25 |et% = ca|rd_area%|
|00001940| 21 39 33 35 32 20 20 8c | 0d 09 4c 24 20 20 20 c8 |!9352 .|..L$ .|
|00001950| 99 20 22 57 69 6d 70 5f | 53 65 74 43 61 72 65 74 |. "Wimp_|SetCaret|
|00001960| 50 6f 73 69 74 69 6f 6e | 22 2c 2d 31 0d 09 56 08 |Position|",-1..V.|
|00001970| 20 20 20 e1 0d 09 60 06 | 20 cc 0d 09 6a 57 20 20 | ...`.| ...jW |
|00001980| 20 c8 99 20 22 57 69 6d | 70 5f 53 65 74 43 61 72 | .. "Wim|p_SetCar|
|00001990| 65 74 50 6f 73 69 74 69 | 6f 6e 22 2c 21 28 63 61 |etPositi|on",!(ca|
|000019a0| 72 64 5f 61 72 65 61 25 | 2b 31 30 32 34 30 29 2c |rd_area%|+10240),|
|000019b0| 3f 28 63 61 72 64 5f 61 | 72 65 61 25 2b 38 31 39 |?(card_a|rea%+819|
|000019c0| 32 2b 6f 66 66 73 65 74 | 25 29 2c 2c 2c 2d 31 2c |2+offset|%),,,-1,|
|000019d0| 30 0d 09 74 06 20 cd 0d | 09 7e 06 20 e1 0d 09 88 |0..t. ..|.~. ....|
|000019e0| 04 0d 09 92 04 0d 09 9c | 22 20 dd 20 f2 75 70 64 |........|" . .upd|
|000019f0| 61 74 65 5f 72 65 63 6f | 72 64 5f 65 6e 74 72 79 |ate_reco|rd_entry|
|00001a00| 28 69 63 6f 6e 25 29 0d | 09 a6 22 20 e3 20 6c 6f |(icon%).|.." . lo|
|00001a10| 6f 70 25 20 3d 20 30 20 | b8 20 63 61 72 64 5f 61 |op% = 0 |. card_a|
|00001a20| 72 65 61 25 21 39 33 35 | 32 0d 09 b0 3b 20 20 20 |rea%!935|2...; |
|00001a30| e7 20 69 63 6f 6e 25 20 | 3d 20 3f 28 63 61 72 64 |. icon% |= ?(card|
|00001a40| 5f 61 72 65 61 25 2b 36 | 38 2b 6c 6f 6f 70 25 29 |_area%+6|8+loop%)|
|00001a50| 20 20 6f 66 66 73 65 74 | 25 20 3d 20 34 38 2a 6c | offset|% = 48*l|
|00001a60| 6f 6f 70 25 0d 09 ba 06 | 20 ed 0d 09 c4 83 20 24 |oop%....| ..... $|
|00001a70| 28 64 61 74 61 5f 61 72 | 65 61 25 2b 31 32 38 30 |(data_ar|ea%+1280|
|00001a80| 2b 28 3f 28 64 61 74 61 | 5f 61 72 65 61 25 2b 31 |+(?(data|_area%+1|
|00001a90| 32 37 2b 64 61 74 61 5f | 61 72 65 61 25 21 38 29 |27+data_|area%!8)|
|00001aa0| 2d 31 29 2a 64 61 74 61 | 5f 61 72 65 61 25 21 31 |-1)*data|_area%!1|
|00001ab0| 32 2b 6f 66 66 73 65 74 | 25 29 20 3d 20 a4 67 65 |2+offset|%) = .ge|
|00001ac0| 74 5f 69 63 6f 6e 5f 73 | 74 72 69 6e 67 28 63 61 |t_icon_s|tring(ca|
|00001ad0| 72 64 5f 61 72 65 61 25 | 21 31 30 32 34 30 2c 69 |rd_area%|!10240,i|
|00001ae0| 63 6f 6e 25 29 20 2b 20 | bd 28 31 33 29 0d 09 ce |con%) + |.(13)...|
|00001af0| 06 20 e1 0d 09 d8 04 0d | 09 e2 04 0d 09 ec 16 20 |. ......|....... |
|00001b00| dd 20 f2 64 65 63 6f 64 | 65 5f 63 6f 6e 74 72 6f |. .decod|e_contro|
|00001b10| 6c 0d 09 f6 16 20 e7 20 | 73 65 61 72 63 68 5f 6d |l.... . |search_m|
|00001b20| 6f 64 65 25 20 20 e1 0d | 0a 00 18 20 c8 8e 20 77 |ode% ..|... .. w|
|00001b30| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 31 36 20 ca 0d |imp_bloc|k%!16 ..|
|00001b40| 0a 0a 18 20 20 20 c9 20 | 30 20 20 3a 20 f2 73 68 |... . |0 : .sh|
|00001b50| 6f 77 5f 6c 61 73 74 0d | 0a 14 1d 20 20 20 c9 20 |ow_last.|... . |
|00001b60| 31 20 20 3a 20 f2 73 68 | 6f 77 5f 72 65 63 6f 72 |1 : .sh|ow_recor|
|00001b70| 64 28 31 29 0d 0a 1e 1e | 20 20 20 c9 20 33 20 20 |d(1)....| . 3 |
|00001b80| 3a 20 f2 73 68 6f 77 5f | 72 65 63 6f 72 64 28 2d |: .show_|record(-|
|00001b90| 31 29 0d 0a 28 2e 20 20 | 20 c9 20 34 20 20 3a 20 |1)..(. | . 4 : |
|00001ba0| 64 61 74 61 5f 61 72 65 | 61 25 21 38 3d 31 20 3a |data_are|a%!8=1 :|
|00001bb0| 20 f2 73 68 6f 77 5f 72 | 65 63 6f 72 64 28 30 29 | .show_r|ecord(0)|
|00001bc0| 0d 0a 32 41 20 20 20 c9 | 20 36 20 20 3a 20 c8 99 |..2A .| 6 : ..|
|00001bd0| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 6e 22 20 | "Hourgl|ass_On" |
|00001be0| 3a 20 f2 61 75 74 6f 5f | 73 6f 72 74 20 3a 20 c8 |: .auto_|sort : .|
|00001bf0| 99 20 22 48 6f 75 72 67 | 6c 61 73 73 5f 4f 66 66 |. "Hourg|lass_Off|
|00001c00| 22 0d 0a 3c 1c 20 20 20 | c9 20 37 20 20 3a 20 f2 |"..<. |. 7 : .|
|00001c10| 74 6f 67 67 6c 65 5f 73 | 75 62 73 65 74 0d 0a 46 |toggle_s|ubset..F|
|00001c20| 20 20 20 20 c9 20 31 33 | 20 3a 20 f2 63 72 65 61 | . 13| : .crea|
|00001c30| 74 65 5f 6e 65 77 5f 72 | 65 63 6f 72 64 0d 0a 50 |te_new_r|ecord..P|
|00001c40| 1c 20 20 20 c9 20 31 34 | 20 3a 20 f2 64 65 6c 65 |. . 14| : .dele|
|00001c50| 74 65 5f 72 65 63 6f 72 | 64 0d 0a 5a 06 20 cb 0d |te_recor|d..Z. ..|
|00001c60| 0a 64 06 20 e1 0d 0a 6e | 04 0d 0a 78 04 0d 0a 82 |.d. ...n|...x....|
|00001c70| 23 20 dd 20 f2 64 69 73 | 70 6c 61 79 5f 6d 65 6e |# . .dis|play_men|
|00001c80| 75 28 77 69 6e 64 6f 77 | 25 2c 69 63 6f 6e 25 29 |u(window|%,icon%)|
|00001c90| 0d 0a 8c 54 20 e7 20 77 | 69 6e 64 6f 77 25 20 3d |...T . w|indow% =|
|00001ca0| 20 2d 32 20 20 80 20 20 | 69 63 6f 6e 25 20 3d 20 | -2 . |icon% = |
|00001cb0| 62 61 72 5f 69 63 6f 6e | 25 20 20 f2 73 68 6f 77 |bar_icon|% .show|
|00001cc0| 5f 6d 65 6e 75 28 62 61 | 72 5f 6d 65 6e 75 25 2c |_menu(ba|r_menu%,|
|00001cd0| 21 77 69 6d 70 5f 62 6c | 6f 63 6b 25 2d 36 34 2c |!wimp_bl|ock%-64,|
|00001ce0| 31 38 38 29 0d 0a 96 5a | 20 e7 20 77 69 6e 64 6f |188)...Z| . windo|
|00001cf0| 77 25 20 3d 20 63 61 72 | 64 5f 61 72 65 61 25 21 |w% = car|d_area%!|
|00001d00| 31 30 32 34 30 20 20 f2 | 73 68 6f 77 5f 6d 65 6e |10240 .|show_men|
|00001d10| 75 28 6d 61 69 6e 5f 6d | 65 6e 75 25 2c 21 77 69 |u(main_m|enu%,!wi|
|00001d20| 6d 70 5f 62 6c 6f 63 6b | 25 2d 36 34 2c 77 69 6d |mp_block|%-64,wim|
|00001d30| 70 5f 62 6c 6f 63 6b 25 | 21 34 2d 32 34 29 0d 0a |p_block%|!4-24)..|
|00001d40| a0 52 20 e7 20 77 69 6e | 64 6f 77 25 20 3d 20 67 |.R . win|dow% = g|
|00001d50| 72 61 70 68 31 25 20 20 | f2 73 68 6f 77 5f 6d 65 |raph1% |.show_me|
|00001d60| 6e 75 28 67 72 61 70 68 | 5f 6d 65 6e 75 25 2c 21 |nu(graph|_menu%,!|
|00001d70| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 2d 36 34 2c 77 |wimp_blo|ck%-64,w|
|00001d80| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 34 2d 32 34 29 |imp_bloc|k%!4-24)|
|00001d90| 0d 0a aa 06 20 e1 0d 0a | b4 04 0d 0a be 04 0d 0a |.... ...|........|
|00001da0| c8 12 20 dd 20 f2 63 68 | 65 63 6b 5f 71 75 69 74 |.. . .ch|eck_quit|
|00001db0| 0d 0a d2 30 20 e7 20 28 | 65 61 73 69 5f 73 61 76 |...0 . (|easi_sav|
|00001dc0| 65 25 20 3d 20 a3 29 20 | 20 80 20 20 28 72 65 63 |e% = .) | . (rec|
|00001dd0| 6f 72 64 5f 61 64 64 25 | 20 3d 20 b9 29 20 20 8c |ord_add%| = .) .|
|00001de0| 0d 0a dc 50 20 20 20 61 | 6e 25 3d a4 71 75 65 72 |...P a|n%=.quer|
|00001df0| 79 28 22 44 61 74 61 20 | 61 64 64 65 64 20 62 75 |y("Data |added bu|
|00001e00| 74 20 6e 6f 74 20 73 61 | 76 65 64 2e 20 43 6f 6e |t not sa|ved. Con|
|00001e10| 74 69 6e 75 65 3f 22 2c | 22 57 61 72 6e 69 6e 67 |tinue?",|"Warning|
|00001e20| 20 66 72 6f 6d 20 45 61 | 73 69 42 61 73 65 22 29 | from Ea|siBase")|
|00001e30| 0d 0a e6 1e 20 20 20 e7 | 20 61 6e 25 20 3d 20 31 |.... .| an% = 1|
|00001e40| 20 66 69 6e 69 73 68 65 | 64 25 20 3d 20 b9 0d 0a | finishe|d% = ...|
|00001e50| f0 06 20 cc 0d 0a fa 14 | 20 20 20 66 69 6e 69 73 |.. .....| finis|
|00001e60| 68 65 64 25 20 3d 20 b9 | 0d 0b 04 06 20 cd 0d 0b |hed% = .|.... ...|
|00001e70| 0e 06 20 e1 0d 0b 18 04 | 0d 0b 22 04 0d 0b 2c 04 |.. .....|.."...,.|
|00001e80| 0d 0b 36 34 20 f4 20 2a | 20 2a 20 2a 20 20 54 48 |..64 . *| * * TH|
|00001e90| 49 52 44 41 52 59 20 50 | 52 4f 43 45 44 55 52 45 |IRDARY P|ROCEDURE|
|00001ea0| 53 20 26 20 46 55 4e 43 | 54 49 4f 4e 53 20 20 2a |S & FUNC|TIONS *|
|00001eb0| 20 2a 20 2a 0d 0b 40 04 | 0d 0b 4a 04 0d 0b 54 11 | * *..@.|..J...T.|
|00001ec0| 20 dd 20 f2 73 68 6f 77 | 5f 6c 61 73 74 0d 0b 5e | . .show|_last..^|
|00001ed0| 15 20 e7 20 73 75 62 73 | 65 74 5f 73 65 6c 25 20 |. . subs|et_sel% |
|00001ee0| 20 8c 0d 0b 68 23 20 20 | 20 64 61 74 61 5f 61 72 | ...h# | data_ar|
|00001ef0| 65 61 25 21 38 20 3d 20 | 64 61 74 61 5f 61 72 65 |ea%!8 = |data_are|
|00001f00| 61 25 21 32 34 0d 0b 72 | 06 20 cc 0d 0b 7c 22 20 |a%!24..r|. ...|" |
|00001f10| 20 20 64 61 74 61 5f 61 | 72 65 61 25 21 38 20 3d | data_a|rea%!8 =|
|00001f20| 20 64 61 74 61 5f 61 72 | 65 61 25 21 34 0d 0b 86 | data_ar|ea%!4...|
|00001f30| 06 20 cd 0d 0b 90 14 20 | f2 73 68 6f 77 5f 72 65 |. ..... |.show_re|
|00001f40| 63 6f 72 64 28 30 29 0d | 0b 9a 06 20 e1 0d 0b a4 |cord(0).|... ....|
|00001f50| 04 0d 0b ae 04 0d 0b b8 | 15 20 dd 20 f2 74 6f 67 |........|. . .tog|
|00001f60| 67 6c 65 5f 73 75 62 73 | 65 74 0d 0b c2 15 20 e7 |gle_subs|et.... .|
|00001f70| 20 73 75 62 73 65 74 25 | 20 3d 20 a3 20 20 e1 0d | subset%| = . ..|
|00001f80| 0b cc 25 20 f2 69 63 6f | 6e 5f 66 6c 61 67 5f 74 |..% .ico|n_flag_t|
|00001f90| 6f 67 67 6c 65 28 63 6f | 6e 74 72 6f 6c 25 2c 37 |oggle(co|ntrol%,7|
|00001fa0| 2c 32 31 29 0d 0b d6 29 | 20 e7 20 a4 69 63 6f 6e |,21)...)| . .icon|
|00001fb0| 5f 66 6c 61 67 5f 63 68 | 65 63 6b 28 63 6f 6e 74 |_flag_ch|eck(cont|
|00001fc0| 72 6f 6c 25 2c 37 2c 32 | 31 29 20 20 8c 0d 0b e0 |rol%,7,2|1) ....|
|00001fd0| 16 20 20 20 73 75 62 73 | 65 74 5f 73 65 6c 25 20 |. subs|et_sel% |
|00001fe0| 3d 20 b9 0d 0b ea 3b 20 | 20 20 f2 64 69 72 65 63 |= ....; | .direc|
|00001ff0| 74 5f 69 63 6f 6e 5f 73 | 74 72 69 6e 67 5f 73 65 |t_icon_s|tring_se|
|00002000| 74 28 63 6f 6e 74 72 6f | 6c 25 2c 38 2c c3 28 64 |t(contro|l%,8,.(d|
|00002010| 61 74 61 5f 61 72 65 61 | 25 21 32 34 29 29 0d 0b |ata_area|%!24))..|
|00002020| f4 06 20 cc 0d 0b fe 16 | 20 20 20 73 75 62 73 65 |.. .....| subse|
|00002030| 74 5f 73 65 6c 25 20 3d | 20 a3 0d 0c 08 3a 20 20 |t_sel% =| ....: |
|00002040| 20 f2 64 69 72 65 63 74 | 5f 69 63 6f 6e 5f 73 74 | .direct|_icon_st|
|00002050| 72 69 6e 67 5f 73 65 74 | 28 63 6f 6e 74 72 6f 6c |ring_set|(control|
|00002060| 25 2c 38 2c c3 28 64 61 | 74 61 5f 61 72 65 61 25 |%,8,.(da|ta_area%|
|00002070| 21 34 29 29 0d 0c 12 06 | 20 cd 0d 0c 1c 15 20 64 |!4))....| ..... d|
|00002080| 61 74 61 5f 61 72 65 61 | 25 21 38 20 3d 20 31 0d |ata_area|%!8 = 1.|
|00002090| 0c 26 14 20 f2 73 68 6f | 77 5f 72 65 63 6f 72 64 |.&. .sho|w_record|
|000020a0| 28 30 29 0d 0c 30 06 20 | e1 0d 0c 3a 04 0d 0c 44 |(0)..0. |...:...D|
|000020b0| 04 0d 0c 4e 1c 20 dd 20 | f2 73 68 6f 77 5f 72 65 |...N. . |.show_re|
|000020c0| 63 6f 72 64 28 6f 66 66 | 73 65 74 25 29 0d 0c 58 |cord(off|set%)..X|
|000020d0| 14 20 e7 20 73 75 62 73 | 65 74 5f 73 65 6c 25 20 |. . subs|et_sel% |
|000020e0| 8c 0d 0c 62 32 20 20 20 | e7 20 64 61 74 61 5f 61 |...b2 |. data_a|
|000020f0| 72 65 61 25 21 38 20 2b | 20 6f 66 66 73 65 74 25 |rea%!8 +| offset%|
|00002100| 20 3e 20 64 61 74 61 5f | 61 72 65 61 25 21 32 34 | > data_|area%!24|
|00002110| 20 20 e1 0d 0c 6c 15 20 | 20 20 6f 66 66 73 65 74 | ...l. | offset|
|00002120| 31 25 20 3d 20 33 38 33 | 0d 0c 76 06 20 cc 0d 0c |1% = 383|..v. ...|
|00002130| 80 31 20 20 20 e7 20 64 | 61 74 61 5f 61 72 65 61 |.1 . d|ata_area|
|00002140| 25 21 38 20 2b 20 6f 66 | 66 73 65 74 25 20 3e 20 |%!8 + of|fset% > |
|00002150| 64 61 74 61 5f 61 72 65 | 61 25 21 34 20 20 e1 0d |data_are|a%!4 ..|
|00002160| 0c 8a 15 20 20 20 6f 66 | 66 73 65 74 31 25 20 3d |... of|fset1% =|
|00002170| 20 31 32 37 0d 0c 94 06 | 20 cd 0d 0c 9e 31 20 e7 | 127....| ....1 .|
|00002180| 20 64 61 74 61 5f 61 72 | 65 61 25 21 38 20 2b 20 | data_ar|ea%!8 + |
|00002190| 6f 66 66 73 65 74 25 20 | 3e 20 64 61 74 61 5f 61 |offset% |> data_a|
|000021a0| 72 65 61 25 21 31 36 20 | 20 20 e1 0d 0c a8 25 20 |rea%!16 | ....% |
|000021b0| e7 20 64 61 74 61 5f 61 | 72 65 61 25 21 38 20 2b |. data_a|rea%!8 +|
|000021c0| 20 6f 66 66 73 65 74 25 | 20 3c 20 31 20 20 20 e1 | offset%| < 1 .|
|000021d0| 0d 0c b2 1a 20 64 61 74 | 61 5f 61 72 65 61 25 21 |.... dat|a_area%!|
|000021e0| 38 2b 3d 6f 66 66 73 65 | 74 25 0d 0c bc 22 20 c8 |8+=offse|t%..." .|
|000021f0| 99 20 22 57 69 6d 70 5f | 53 65 74 43 61 72 65 74 |. "Wimp_|SetCaret|
|00002200| 50 6f 73 69 74 69 6f 6e | 22 2c 2d 31 0d 0c c6 22 |Position|",-1..."|
|00002210| 20 e3 20 6c 6f 6f 70 25 | 20 3d 20 30 20 b8 20 63 | . loop%| = 0 . c|
|00002220| 61 72 64 5f 61 72 65 61 | 25 21 39 33 35 32 0d 0c |ard_area|%!9352..|
|00002230| d0 3a 20 20 20 69 63 6f | 6e 25 20 3d 20 3f 28 63 |.: ico|n% = ?(c|
|00002240| 61 72 64 5f 61 72 65 61 | 25 2b 36 38 2b 6c 6f 6f |ard_area|%+68+loo|
|00002250| 70 25 29 20 3a 20 6f 66 | 66 73 65 74 25 20 3d 20 |p%) : of|fset% = |
|00002260| 34 38 2a 6c 6f 6f 70 25 | 0d 0c da 17 20 20 20 e7 |48*loop%|.... .|
|00002270| 20 69 63 6f 6e 25 20 3c | 20 31 32 38 20 20 8c 0d | icon% <| 128 ..|
|00002280| 0c e4 63 20 20 20 73 74 | 72 69 6e 67 24 20 3d 20 |..c st|ring$ = |
|00002290| 28 24 28 64 61 74 61 5f | 61 72 65 61 25 2b 31 32 |($(data_|area%+12|
|000022a0| 38 30 2b 28 3f 28 64 61 | 74 61 5f 61 72 65 61 25 |80+(?(da|ta_area%|
|000022b0| 2b 64 61 74 61 5f 61 72 | 65 61 25 21 38 2b 6f 66 |+data_ar|ea%!8+of|
|000022c0| 66 73 65 74 31 25 29 2d | 31 29 2a 64 61 74 61 5f |fset1%)-|1)*data_|
|000022d0| 61 72 65 61 25 21 31 32 | 2b 6f 66 66 73 65 74 25 |area%!12|+offset%|
|000022e0| 29 29 0d 0c ee 49 20 20 | 20 20 20 f2 69 6e 64 69 |))...I | .indi|
|000022f0| 72 65 63 74 65 64 5f 69 | 63 6f 6e 5f 73 74 72 69 |rected_i|con_stri|
|00002300| 6e 67 5f 73 65 74 28 63 | 61 72 64 5f 61 72 65 61 |ng_set(c|ard_area|
|00002310| 25 21 31 30 32 34 30 2c | 69 63 6f 6e 25 2c c0 73 |%!10240,|icon%,.s|
|00002320| 74 72 69 6e 67 24 2c 33 | 30 29 29 0d 0c f8 08 20 |tring$,3|0)).... |
|00002330| 20 20 cd 0d 0d 02 06 20 | ed 0d 0d 0c 38 20 f2 64 | ..... |....8 .d|
|00002340| 69 72 65 63 74 5f 69 63 | 6f 6e 5f 73 74 72 69 6e |irect_ic|on_strin|
|00002350| 67 5f 73 65 74 28 63 6f | 6e 74 72 6f 6c 25 2c 32 |g_set(co|ntrol%,2|
|00002360| 2c c3 28 64 61 74 61 5f | 61 72 65 61 25 21 38 29 |,.(data_|area%!8)|
|00002370| 29 0d 0d 16 06 20 e1 0d | 0d 20 04 0d 0d 2a 04 0d |).... ..|. ...*..|
|00002380| 0d 34 19 20 dd 20 f2 63 | 72 65 61 74 65 5f 6e 65 |.4. . .c|reate_ne|
|00002390| 77 5f 72 65 63 6f 72 64 | 0d 0d 3e 73 20 e7 20 64 |w_record|..>s . d|
|000023a0| 61 74 61 5f 61 72 65 61 | 25 21 34 20 3d 20 64 61 |ata_area|%!4 = da|
|000023b0| 74 61 5f 61 72 65 61 25 | 21 31 36 20 20 f2 6f 6b |ta_area%|!16 .ok|
|000023c0| 28 22 54 68 65 72 65 20 | 69 73 20 6e 6f 20 73 70 |("There |is no sp|
|000023d0| 61 63 65 20 6c 65 66 74 | 20 66 6f 72 20 61 6e 6f |ace left| for ano|
|000023e0| 74 68 65 72 20 72 65 63 | 6f 72 64 2e 22 2c 22 4d |ther rec|ord.","M|
|000023f0| 65 73 73 61 67 65 20 66 | 72 6f 6d 20 21 45 61 73 |essage f|rom !Eas|
|00002400| 69 42 61 73 65 22 29 20 | 3a 20 e1 0d 0d 48 14 20 |iBase") |: ...H. |
|00002410| 64 61 74 61 5f 61 72 65 | 61 25 21 34 2b 3d 31 0d |data_are|a%!4+=1.|
|00002420| 0d 52 32 20 3f 28 64 61 | 74 61 5f 61 72 65 61 25 |.R2 ?(da|ta_area%|
|00002430| 2b 31 32 37 2b 64 61 74 | 61 5f 61 72 65 61 25 21 |+127+dat|a_area%!|
|00002440| 34 29 20 3d 20 64 61 74 | 61 5f 61 72 65 61 25 21 |4) = dat|a_area%!|
|00002450| 34 0d 0d 5c 38 20 f2 64 | 69 72 65 63 74 5f 69 63 |4..\8 .d|irect_ic|
|00002460| 6f 6e 5f 73 74 72 69 6e | 67 5f 73 65 74 28 63 6f |on_strin|g_set(co|
|00002470| 6e 74 72 6f 6c 25 2c 38 | 2c c3 28 64 61 74 61 5f |ntrol%,8|,.(data_|
|00002480| 61 72 65 61 25 21 34 29 | 29 0d 0d 66 20 20 64 61 |area%!4)|)..f da|
|00002490| 74 61 5f 61 72 65 61 25 | 21 38 20 3d 20 64 61 74 |ta_area%|!8 = dat|
|000024a0| 61 5f 61 72 65 61 25 21 | 34 0d 0d 70 38 20 f2 64 |a_area%!|4..p8 .d|
|000024b0| 69 72 65 63 74 5f 69 63 | 6f 6e 5f 73 74 72 69 6e |irect_ic|on_strin|
|000024c0| 67 5f 73 65 74 28 63 6f | 6e 74 72 6f 6c 25 2c 32 |g_set(co|ntrol%,2|
|000024d0| 2c c3 28 64 61 74 61 5f | 61 72 65 61 25 21 38 29 |,.(data_|area%!8)|
|000024e0| 29 0d 0d 7a 23 20 e3 20 | 6c 6f 6f 70 7a 25 20 3d |)..z# . |loopz% =|
|000024f0| 20 30 20 b8 20 63 61 72 | 64 5f 61 72 65 61 25 21 | 0 . car|d_area%!|
|00002500| 39 33 35 32 0d 0d 84 26 | 20 20 20 69 63 6f 6e 25 |9352...&| icon%|
|00002510| 20 3d 20 3f 28 63 61 72 | 64 5f 61 72 65 61 25 2b | = ?(car|d_area%+|
|00002520| 36 38 2b 6c 6f 6f 70 7a | 25 29 0d 0d 8e 4c 20 20 |68+loopz|%)...L |
|00002530| 20 e7 20 69 63 6f 6e 25 | 20 3c 20 32 30 30 20 20 | . icon%| < 200 |
|00002540| f2 69 6e 64 69 72 65 63 | 74 65 64 5f 69 63 6f 6e |.indirec|ted_icon|
|00002550| 5f 73 74 72 69 6e 67 5f | 73 65 74 28 63 61 72 64 |_string_|set(card|
|00002560| 5f 61 72 65 61 25 21 31 | 30 32 34 30 2c 69 63 6f |_area%!1|0240,ico|
|00002570| 6e 25 2c 22 22 29 0d 0d | 98 34 20 20 20 f2 75 70 |n%,"")..|.4 .up|
|00002580| 64 61 74 65 5f 72 65 63 | 6f 72 64 5f 65 6e 74 72 |date_rec|ord_entr|
|00002590| 79 28 3f 28 63 61 72 64 | 5f 61 72 65 61 25 2b 36 |y(?(card|_area%+6|
|000025a0| 38 2b 6c 6f 6f 70 7a 25 | 29 29 0d 0d a2 06 20 ed |8+loopz%|)).... .|
|000025b0| 0d 0d ac 24 20 f2 69 63 | 6f 6e 5f 66 6c 61 67 5f |...$ .ic|on_flag_|
|000025c0| 63 6c 65 61 72 28 63 6f | 6e 74 72 6f 6c 25 2c 37 |clear(co|ntrol%,7|
|000025d0| 2c 32 31 29 0d 0d b6 14 | 20 72 65 63 6f 72 64 5f |,21)....| record_|
|000025e0| 61 64 64 25 20 3d 20 b9 | 0d 0d c0 14 20 73 75 62 |add% = .|.... sub|
|000025f0| 73 65 74 5f 73 65 6c 25 | 20 3d 20 a3 0d 0d ca 22 |set_sel%| = ...."|
|00002600| 20 c8 99 20 22 57 69 6d | 70 5f 53 65 74 43 61 72 | .. "Wim|p_SetCar|
|00002610| 65 74 50 6f 73 69 74 69 | 6f 6e 22 2c 2d 31 0d 0d |etPositi|on",-1..|
|00002620| d4 06 20 e1 0d 0d de 04 | 0d 0d e8 04 0d 0d f2 15 |.. .....|........|
|00002630| 20 dd 20 f2 64 65 6c 65 | 74 65 5f 72 65 63 6f 72 | . .dele|te_recor|
|00002640| 64 0d 0d fc 16 20 c8 99 | 20 22 48 6f 75 72 67 6c |d.... ..| "Hourgl|
|00002650| 61 73 73 5f 4f 6e 22 0d | 0e 06 16 20 e7 20 ac 20 |ass_On".|... . . |
|00002660| 73 75 62 73 65 74 5f 73 | 65 6c 25 20 8c 0d 0e 10 |subset_s|el% ....|
|00002670| 04 0d 0e 1a 3f 20 20 20 | 64 61 74 61 5f 65 6e 64 |....? |data_end|
|00002680| 25 20 3d 20 64 61 74 61 | 5f 61 72 65 61 25 21 31 |% = data|_area%!1|
|00002690| 32 2a 28 64 61 74 61 5f | 61 72 65 61 25 21 34 29 |2*(data_|area%!4)|
|000026a0| 2b 64 61 74 61 5f 61 72 | 65 61 25 2b 31 32 38 30 |+data_ar|ea%+1280|
|000026b0| 0d 0e 24 55 20 20 20 64 | 61 74 61 5f 73 74 61 72 |..$U d|ata_star|
|000026c0| 74 25 20 3d 20 64 61 74 | 61 5f 61 72 65 61 25 21 |t% = dat|a_area%!|
|000026d0| 31 32 2a 28 3f 28 64 61 | 74 61 5f 61 72 65 61 25 |12*(?(da|ta_area%|
|000026e0| 2b 31 32 37 2b 64 61 74 | 61 5f 61 72 65 61 25 21 |+127+dat|a_area%!|
|000026f0| 38 29 2d 31 29 2b 64 61 | 74 61 5f 61 72 65 61 25 |8)-1)+da|ta_area%|
|00002700| 2b 31 32 38 30 0d 0e 2e | 3c 20 20 20 e3 20 64 61 |+1280...|< . da|
|00002710| 74 61 5f 70 74 72 25 20 | 3d 20 64 61 74 61 5f 73 |ta_ptr% |= data_s|
|00002720| 74 61 72 74 25 20 b8 20 | 64 61 74 61 5f 65 6e 64 |tart% . |data_end|
|00002730| 25 20 88 20 64 61 74 61 | 5f 61 72 65 61 25 21 31 |% . data|_area%!1|
|00002740| 32 0d 0e 38 28 20 20 20 | 20 20 e3 20 6c 6f 6f 70 |2..8( | . loop|
|00002750| 25 20 3d 20 30 20 b8 20 | 64 61 74 61 5f 61 72 65 |% = 0 . |data_are|
|00002760| 61 25 21 31 32 20 88 20 | 34 0d 0e 42 40 20 20 20 |a%!12 . |4..B@ |
|00002770| 20 20 20 20 21 28 64 61 | 74 61 5f 70 74 72 25 2b | !(da|ta_ptr%+|
|00002780| 6c 6f 6f 70 25 29 20 3d | 20 21 28 64 61 74 61 5f |loop%) =| !(data_|
|00002790| 70 74 72 25 2b 6c 6f 6f | 70 25 2b 64 61 74 61 5f |ptr%+loo|p%+data_|
|000027a0| 61 72 65 61 25 21 31 32 | 29 0d 0e 4c 0a 20 20 20 |area%!12|)..L. |
|000027b0| 20 20 ed 0d 0e 56 08 20 | 20 20 ed 0d 0e 60 16 20 | ...V. | ...`. |
|000027c0| 20 20 64 61 74 61 5f 61 | 72 65 61 25 21 34 2d 3d | data_a|rea%!4-=|
|000027d0| 31 0d 0e 6a 1c 20 20 20 | e7 20 64 61 74 61 5f 61 |1..j. |. data_a|
|000027e0| 72 65 61 25 21 34 20 3d | 20 30 20 20 8c 0d 0e 74 |rea%!4 =| 0 ...t|
|000027f0| 1d 20 20 20 20 20 f2 61 | 6c 6c 5f 72 65 63 6f 72 |. .a|ll_recor|
|00002800| 64 73 5f 64 65 6c 65 74 | 65 64 0d 0e 7e 08 20 20 |ds_delet|ed..~. |
|00002810| 20 cc 0d 0e 88 34 20 20 | 20 20 20 72 65 63 6f 72 | ....4 | recor|
|00002820| 64 5f 6e 6f 25 20 3d 20 | 3f 28 64 61 74 61 5f 61 |d_no% = |?(data_a|
|00002830| 72 65 61 25 2b 31 32 37 | 2b 64 61 74 61 5f 61 72 |rea%+127|+data_ar|
|00002840| 65 61 25 21 38 29 0d 0e | 92 2c 20 20 20 20 20 e3 |ea%!8)..|., .|
|00002850| 20 6c 6f 6f 70 25 20 3d | 20 72 65 63 6f 72 64 5f | loop% =| record_|
|00002860| 6e 6f 25 20 b8 20 64 61 | 74 61 5f 61 72 65 61 25 |no% . da|ta_area%|
|00002870| 21 34 0d 0e 9c 3e 20 20 | 20 20 20 20 20 3f 28 64 |!4...> | ?(d|
|00002880| 61 74 61 5f 61 72 65 61 | 25 2b 31 32 37 2b 6c 6f |ata_area|%+127+lo|
|00002890| 6f 70 25 29 20 3d 20 3f | 28 64 61 74 61 5f 61 72 |op%) = ?|(data_ar|
|000028a0| 65 61 25 2b 31 32 37 2b | 6c 6f 6f 70 25 2b 31 29 |ea%+127+|loop%+1)|
|000028b0| 0d 0e a6 0a 20 20 20 20 | 20 ed 0d 0e b0 23 20 20 |.... | ....# |
|000028c0| 20 20 20 e3 20 6c 6f 6f | 70 25 20 3d 20 30 20 b8 | . loo|p% = 0 .|
|000028d0| 20 64 61 74 61 5f 61 72 | 65 61 25 21 34 0d 0e ba | data_ar|ea%!4...|
|000028e0| 33 20 20 20 20 20 20 20 | e7 20 72 65 63 6f 72 64 |3 |. record|
|000028f0| 5f 6e 6f 25 20 3c 20 3f | 28 64 61 74 61 5f 61 72 |_no% < ?|(data_ar|
|00002900| 65 61 25 2b 31 32 38 2b | 6c 6f 6f 70 25 29 20 8c |ea%+128+|loop%) .|
|00002910| 0d 0e c4 42 20 20 20 20 | 20 20 20 20 20 3f 28 64 |...B | ?(d|
|00002920| 61 74 61 5f 61 72 65 61 | 25 2b 6c 6f 6f 70 25 2b |ata_area|%+loop%+|
|00002930| 31 32 38 29 20 3d 20 3f | 28 64 61 74 61 5f 61 72 |128) = ?|(data_ar|
|00002940| 65 61 25 2b 6c 6f 6f 70 | 25 2b 31 32 38 29 20 2d |ea%+loop|%+128) -|
|00002950| 20 31 0d 0e ce 0c 20 20 | 20 20 20 20 20 cd 0d 0e | 1.... | ...|
|00002960| d8 0a 20 20 20 20 20 ed | 0d 0e e2 08 20 20 20 cd |.. .|.... .|
|00002970| 0d 0e ec 3a 20 20 20 f2 | 64 69 72 65 63 74 5f 69 |...: .|direct_i|
|00002980| 63 6f 6e 5f 73 74 72 69 | 6e 67 5f 73 65 74 28 63 |con_stri|ng_set(c|
|00002990| 6f 6e 74 72 6f 6c 25 2c | 38 2c c3 28 64 61 74 61 |ontrol%,|8,.(data|
|000029a0| 5f 61 72 65 61 25 21 34 | 29 29 0d 0e f6 35 20 20 |_area%!4|))...5 |
|000029b0| 20 e7 20 64 61 74 61 5f | 61 72 65 61 25 21 34 20 | . data_|area%!4 |
|000029c0| 3c 20 64 61 74 61 5f 61 | 72 65 61 25 21 38 20 20 |< data_a|rea%!8 |
|000029d0| 64 61 74 61 5f 61 72 65 | 61 25 21 38 2d 3d 31 0d |data_are|a%!8-=1.|
|000029e0| 0f 00 11 20 20 20 f2 61 | 75 74 6f 5f 73 6f 72 74 |... .a|uto_sort|
|000029f0| 0d 0f 0a 16 20 20 20 f2 | 73 68 6f 77 5f 72 65 63 |.... .|show_rec|
|00002a00| 6f 72 64 28 30 29 0d 0f | 14 04 0d 0f 1e 06 20 cc |ord(0)..|...... .|
|00002a10| 0d 0f 28 04 0d 0f 32 3c | 20 20 20 e3 20 6c 6f 6f |..(...2<| . loo|
|00002a20| 70 25 20 3d 20 64 61 74 | 61 5f 61 72 65 61 25 21 |p% = dat|a_area%!|
|00002a30| 38 20 b8 20 64 61 74 61 | 5f 61 72 65 61 25 21 32 |8 . data|_area%!2|
|00002a40| 34 20 2d 20 64 61 74 61 | 5f 61 72 65 61 25 21 38 |4 - data|_area%!8|
|00002a50| 0d 0f 3c 3a 20 20 20 20 | 20 3f 28 64 61 74 61 5f |..<: | ?(data_|
|00002a60| 61 72 65 61 25 2b 33 38 | 33 2b 6c 6f 6f 70 25 29 |area%+38|3+loop%)|
|00002a70| 20 3d 20 3f 28 64 61 74 | 61 5f 61 72 65 61 25 2b | = ?(dat|a_area%+|
|00002a80| 33 38 34 2b 6c 6f 6f 70 | 25 29 0d 0f 46 08 20 20 |384+loop|%)..F. |
|00002a90| 20 ed 0d 0f 50 17 20 20 | 20 64 61 74 61 5f 61 72 | ...P. | data_ar|
|00002aa0| 65 61 25 21 32 34 2d 3d | 31 0d 0f 5a 1d 20 20 20 |ea%!24-=|1..Z. |
|00002ab0| e7 20 64 61 74 61 5f 61 | 72 65 61 25 21 32 34 20 |. data_a|rea%!24 |
|00002ac0| 3d 20 30 20 20 8c 0d 0f | 64 24 20 20 20 20 20 f2 |= 0 ...|d$ .|
|00002ad0| 61 6c 6c 5f 73 75 62 73 | 65 74 5f 72 65 63 6f 72 |all_subs|et_recor|
|00002ae0| 64 73 5f 64 65 6c 65 74 | 65 64 0d 0f 6e 08 20 20 |ds_delet|ed..n. |
|00002af0| 20 cc 0d 0f 78 3d 20 20 | 20 20 20 f2 64 69 72 65 | ...x= | .dire|
|00002b00| 63 74 5f 69 63 6f 6e 5f | 73 74 72 69 6e 67 5f 73 |ct_icon_|string_s|
|00002b10| 65 74 28 63 6f 6e 74 72 | 6f 6c 25 2c 38 2c c3 28 |et(contr|ol%,8,.(|
|00002b20| 64 61 74 61 5f 61 72 65 | 61 25 21 32 34 29 29 0d |data_are|a%!24)).|
|00002b30| 0f 82 38 20 20 20 20 20 | e7 20 64 61 74 61 5f 61 |..8 |. data_a|
|00002b40| 72 65 61 25 21 32 34 20 | 3c 20 64 61 74 61 5f 61 |rea%!24 |< data_a|
|00002b50| 72 65 61 25 21 38 20 20 | 64 61 74 61 5f 61 72 65 |rea%!8 |data_are|
|00002b60| 61 25 21 38 2d 3d 31 0d | 0f 8c 18 20 20 20 20 20 |a%!8-=1.|... |
|00002b70| f2 73 68 6f 77 5f 72 65 | 63 6f 72 64 28 30 29 0d |.show_re|cord(0).|
|00002b80| 0f 96 08 20 20 20 cd 0d | 0f a0 06 20 cd 0d 0f aa |... ..|... ....|
|00002b90| 17 20 c8 99 20 22 48 6f | 75 72 67 6c 61 73 73 5f |. .. "Ho|urglass_|
|00002ba0| 4f 66 66 22 0d 0f b4 06 | 20 e1 0d 0f be 04 0d 0f |Off"....| .......|
|00002bb0| c8 04 0d 0f d2 17 20 dd | 20 f2 63 68 65 63 6b 5f |...... .| .check_|
|00002bc0| 64 69 72 65 63 74 6f 72 | 79 0d 0f dc 18 20 66 69 |director|y.... fi|
|00002bd0| 6c 65 5f 6e 61 6d 65 24 | 2b 3d 22 2e 43 61 72 64 |le_name$|+=".Card|
|00002be0| 22 0d 0f e6 2a 20 e7 20 | a4 66 69 6e 64 5f 66 69 |"...* . |.find_fi|
|00002bf0| 6c 65 28 66 69 6c 65 5f | 6e 61 6d 65 24 29 20 20 |le(file_|name$) |
|00002c00| f2 63 68 65 63 6b 5f 66 | 69 6c 65 0d 0f f0 06 20 |.check_f|ile.... |
|00002c10| e1 0d 0f fa 04 0d 10 04 | 04 0d 10 0e 12 20 dd 20 |........|..... . |
|00002c20| f2 63 68 65 63 6b 5f 66 | 69 6c 65 0d 10 18 0b 20 |.check_f|ile.... |
|00002c30| f2 63 6c 65 61 72 0d 10 | 22 2d 20 c8 99 20 22 4f |.clear..|"- .. "O|
|00002c40| 53 5f 46 69 6e 64 22 2c | 31 2c 66 69 6c 65 5f 6e |S_Find",|1,file_n|
|00002c50| 61 6d 65 24 20 b8 20 66 | 69 6c 65 5f 68 61 6e 64 |ame$ . f|ile_hand|
|00002c60| 6c 65 25 0d 10 2c 2f 20 | c8 99 20 22 4f 53 5f 47 |le%..,/ |.. "OS_G|
|00002c70| 42 50 42 22 2c 33 2c 66 | 69 6c 65 5f 68 61 6e 64 |BPB",3,f|ile_hand|
|00002c80| 6c 65 25 2c 64 61 74 61 | 5f 61 72 65 61 25 2c 34 |le%,data|_area%,4|
|00002c90| 2c 30 0d 10 36 20 20 c8 | 99 20 22 4f 53 5f 46 69 |,0..6 .|. "OS_Fi|
|00002ca0| 6e 64 22 2c 30 2c 66 69 | 6c 65 5f 68 61 6e 64 6c |nd",0,fi|le_handl|
|00002cb0| 65 25 0d 10 40 8a 20 e7 | 20 21 64 61 74 61 5f 61 |e%..@. .| !data_a|
|00002cc0| 72 65 61 25 20 3c 3e 20 | 26 34 39 35 33 34 31 34 |rea% <> |&4953414|
|00002cd0| 35 20 20 80 20 20 21 64 | 61 74 61 5f 61 72 65 61 |5 . !d|ata_area|
|00002ce0| 25 20 3c 3e 20 26 34 33 | 34 31 35 32 34 34 20 20 |% <> &43|415244 |
|00002cf0| f2 6f 6b 28 22 54 68 69 | 73 20 69 73 20 6e 6f 74 |.ok("Thi|s is not|
|00002d00| 20 61 20 43 61 72 64 20 | 66 69 6c 65 20 6f 72 20 | a Card |file or |
|00002d10| 45 61 73 69 42 61 73 65 | 20 64 61 74 61 20 66 69 |EasiBase| data fi|
|00002d20| 6c 65 22 2c 22 45 72 72 | 6f 72 20 66 72 6f 6d 20 |le","Err|or from |
|00002d30| 45 61 73 69 42 61 73 65 | 22 29 3a e1 0d 10 4a 3c |EasiBase|"):...J<|
|00002d40| 20 e7 20 21 64 61 74 61 | 5f 61 72 65 61 25 20 20 | . !data|_area% |
|00002d50| 3d 20 26 34 39 35 33 34 | 31 34 35 20 20 f2 6c 6f |= &49534|145 .lo|
|00002d60| 61 64 5f 64 61 74 61 20 | 3a 20 f2 6c 6f 61 64 5f |ad_data |: .load_|
|00002d70| 6f 74 68 65 72 28 30 29 | 0d 10 54 3c 20 e7 20 21 |other(0)|..T< . !|
|00002d80| 64 61 74 61 5f 61 72 65 | 61 25 20 20 3d 20 26 34 |data_are|a% = &4|
|00002d90| 33 34 31 35 32 34 34 20 | 20 f2 6c 6f 61 64 5f 63 |3415244 | .load_c|
|00002da0| 61 72 64 20 3a 20 f2 6c | 6f 61 64 5f 6f 74 68 65 |ard : .l|oad_othe|
|00002db0| 72 28 31 29 0d 10 5e 15 | 20 64 61 74 61 5f 61 72 |r(1)..^.| data_ar|
|00002dc0| 65 61 25 21 38 20 3d 20 | 31 0d 10 68 30 20 64 61 |ea%!8 = |1..h0 da|
|00002dd0| 74 61 5f 61 72 65 61 25 | 21 31 36 20 3d 20 a8 28 |ta_area%|!16 = .(|
|00002de0| 31 35 32 33 32 30 2f 64 | 61 74 61 5f 61 72 65 61 |152320/d|ata_area|
|00002df0| 25 21 31 32 29 20 2d 20 | 31 0d 10 72 1a 20 e7 20 |%!12) - |1..r. . |
|00002e00| 64 61 74 61 5f 61 72 65 | 61 25 21 34 20 3e 20 30 |data_are|a%!4 > 0|
|00002e10| 20 20 8c 0d 10 7c 16 20 | 20 20 f2 73 68 6f 77 5f | ...|. | .show_|
|00002e20| 72 65 63 6f 72 64 28 30 | 29 0d 10 86 06 20 cc 0d |record(0|).... ..|
|00002e30| 10 90 19 20 20 20 f2 63 | 72 65 61 74 65 5f 6e 65 |... .c|reate_ne|
|00002e40| 77 5f 72 65 63 6f 72 64 | 0d 10 9a 06 20 cd 0d 10 |w_record|.... ...|
|00002e50| a4 1c 20 21 64 61 74 61 | 5f 61 72 65 61 25 20 3d |.. !data|_area% =|
|00002e60| 20 26 34 33 34 31 35 32 | 34 34 0d 10 ae 1a 20 f2 | &434152|44.... .|
|00002e70| 6d 61 6b 65 5f 69 63 6f | 6e 73 5f 77 72 69 74 65 |make_ico|ns_write|
|00002e80| 61 62 6c 65 0d 10 b8 06 | 20 e1 0d 10 c2 04 0d 10 |able....| .......|
|00002e90| cc 04 0d 10 d6 04 0d 10 | e0 38 20 f4 20 2a 20 2a |........|.8 . * *|
|00002ea0| 20 2a 20 46 4f 55 52 54 | 48 20 4c 45 56 45 4c 20 | * FOURT|H LEVEL |
|00002eb0| 50 52 4f 43 45 44 55 52 | 45 53 20 41 4e 44 20 46 |PROCEDUR|ES AND F|
|00002ec0| 55 4e 43 54 49 4f 4e 53 | 20 2a 20 2a 20 2a 0d 10 |UNCTIONS| * * *..|
|00002ed0| ea 04 0d 10 f4 04 0d 10 | fe 1b 20 dd 20 f2 61 6c |........|.. . .al|
|00002ee0| 6c 5f 72 65 63 6f 72 64 | 73 5f 64 65 6c 65 74 65 |l_record|s_delete|
|00002ef0| 64 0d 11 08 15 20 64 61 | 74 61 5f 61 72 65 61 25 |d.... da|ta_area%|
|00002f00| 21 34 20 3d 20 31 0d 11 | 12 15 20 64 61 74 61 5f |!4 = 1..|.. data_|
|00002f10| 61 72 65 61 25 21 38 20 | 3d 20 31 0d 11 1c 22 20 |area%!8 |= 1..." |
|00002f20| e3 20 6c 6f 6f 70 25 20 | 3d 20 30 20 b8 20 63 61 |. loop% |= 0 . ca|
|00002f30| 72 64 5f 61 72 65 61 25 | 21 39 33 35 32 0d 11 26 |rd_area%|!9352..&|
|00002f40| 6e 20 20 20 e7 20 3f 28 | 63 61 72 64 5f 61 72 65 |n . ?(|card_are|
|00002f50| 61 25 2b 36 38 2b 6c 6f | 6f 70 25 29 20 3c 20 31 |a%+68+lo|op%) < 1|
|00002f60| 32 38 20 20 f2 69 6e 64 | 69 72 65 63 74 65 64 5f |28 .ind|irected_|
|00002f70| 69 63 6f 6e 5f 73 74 72 | 69 6e 67 5f 73 65 74 28 |icon_str|ing_set(|
|00002f80| 63 61 72 64 5f 61 72 65 | 61 25 21 31 30 32 34 30 |card_are|a%!10240|
|00002f90| 2c 3f 28 63 61 72 64 5f | 61 72 65 61 25 2b 36 38 |,?(card_|area%+68|
|00002fa0| 2b 6c 6f 6f 70 25 29 2c | 22 22 29 0d 11 30 06 20 |+loop%),|"")..0. |
|00002fb0| ed 0d 11 3a 06 20 e1 0d | 11 44 04 0d 11 4e 04 0d |...:. ..|.D...N..|
|00002fc0| 11 58 22 20 dd 20 f2 61 | 6c 6c 5f 73 75 62 73 65 |.X" . .a|ll_subse|
|00002fd0| 74 5f 72 65 63 6f 72 64 | 73 5f 64 65 6c 65 74 65 |t_record|s_delete|
|00002fe0| 64 0d 11 62 10 20 73 75 | 62 73 65 74 25 20 3d 20 |d..b. su|bset% = |
|00002ff0| a3 0d 11 6c 14 20 73 75 | 62 73 65 74 5f 73 65 6c |...l. su|bset_sel|
|00003000| 25 20 3d 20 a3 0d 11 76 | 15 20 64 61 74 61 5f 61 |% = ...v|. data_a|
|00003010| 72 65 61 25 21 38 20 3d | 20 31 0d 11 80 38 20 f2 |rea%!8 =| 1...8 .|
|00003020| 64 69 72 65 63 74 5f 69 | 63 6f 6e 5f 73 74 72 69 |direct_i|con_stri|
|00003030| 6e 67 5f 73 65 74 28 63 | 6f 6e 74 72 6f 6c 25 2c |ng_set(c|ontrol%,|
|00003040| 38 2c c3 28 64 61 74 61 | 5f 61 72 65 61 25 21 34 |8,.(data|_area%!4|
|00003050| 29 29 0d 11 8a 24 20 f2 | 69 63 6f 6e 5f 66 6c 61 |))...$ .|icon_fla|
|00003060| 67 5f 63 6c 65 61 72 28 | 63 6f 6e 74 72 6f 6c 25 |g_clear(|control%|
|00003070| 2c 37 2c 32 31 29 0d 11 | 94 14 20 f2 73 68 6f 77 |,7,21)..|.. .show|
|00003080| 5f 72 65 63 6f 72 64 28 | 30 29 0d 11 9e 06 20 e1 |_record(|0).... .|
|00003090| 0d 11 a8 04 0d 11 b2 04 | 0d 11 bc 25 20 dd 20 f2 |........|...% . .|
|000030a0| 73 61 76 65 5f 62 61 63 | 6b 67 72 6f 75 6e 64 5f |save_bac|kground_|
|000030b0| 63 6f 6c 6f 75 72 28 69 | 63 6f 6e 25 29 0d 11 c6 |colour(i|con%)...|
|000030c0| 25 20 21 77 69 6d 70 5f | 62 6c 6f 63 6b 25 20 20 |% !wimp_|block% |
|000030d0| 3d 20 63 61 72 64 5f 61 | 72 65 61 25 21 31 30 32 |= card_a|rea%!102|
|000030e0| 34 30 0d 11 d0 1a 20 77 | 69 6d 70 5f 62 6c 6f 63 |40.... w|imp_bloc|
|000030f0| 6b 25 21 34 20 3d 20 69 | 63 6f 6e 25 0d 11 da 28 |k%!4 = i|con%...(|
|00003100| 20 c8 99 20 22 57 69 6d | 70 5f 47 65 74 49 63 6f | .. "Wim|p_GetIco|
|00003110| 6e 53 74 61 74 65 22 2c | 2c 77 69 6d 70 5f 62 6c |nState",|,wimp_bl|
|00003120| 6f 63 6b 25 0d 11 e4 3b | 20 3f 28 64 61 74 61 5f |ock%...;| ?(data_|
|00003130| 61 72 65 61 25 2b 38 33 | 32 2b 64 61 74 61 5f 61 |area%+83|2+data_a|
|00003140| 72 65 61 25 21 32 30 29 | 20 3d 20 77 69 6d 70 5f |rea%!20)| = wimp_|
|00003150| 62 6c 6f 63 6b 25 21 32 | 34 20 3e 3e 20 32 38 0d |block%!2|4 >> 28.|
|00003160| 11 ee 06 20 e1 0d 11 f8 | 04 0d 12 02 04 0d 12 0c |... ....|........|
|00003170| 1c 20 dd 20 f2 6d 61 6b | 65 5f 69 63 6f 6e 73 5f |. . .mak|e_icons_|
|00003180| 77 72 69 74 65 61 62 6c | 65 0d 12 16 22 20 e3 20 |writeabl|e..." . |
|00003190| 6c 6f 6f 70 25 20 3d 20 | 30 20 b8 20 63 61 72 64 |loop% = |0 . card|
|000031a0| 5f 61 72 65 61 25 21 39 | 33 35 32 0d 12 20 41 20 |_area%!9|352.. A |
|000031b0| 20 20 f2 69 63 6f 6e 5f | 66 6c 61 67 5f 73 65 74 | .icon_|flag_set|
|000031c0| 28 63 61 72 64 5f 61 72 | 65 61 25 21 31 30 32 34 |(card_ar|ea%!1024|
|000031d0| 30 2c 3f 28 63 61 72 64 | 5f 61 72 65 61 25 2b 36 |0,?(card|_area%+6|
|000031e0| 38 2b 6c 6f 6f 70 25 29 | 2c 31 35 29 0d 12 2a 42 |8+loop%)|,15)..*B|
|000031f0| 20 20 20 f2 69 63 6f 6e | 5f 66 6c 61 67 5f 63 6c | .icon|_flag_cl|
|00003200| 65 61 72 28 63 61 72 64 | 5f 61 72 65 61 25 21 31 |ear(card|_area%!1|
|00003210| 30 32 34 30 2c 3f 28 63 | 61 72 64 5f 61 72 65 61 |0240,?(c|ard_area|
|00003220| 25 2b 36 38 2b 6c 6f 6f | 70 25 29 2c 33 29 0d 12 |%+68+loo|p%),3)..|
|00003230| 34 06 20 ed 0d 12 3e 06 | 20 e1 0d 12 48 04 0d 12 |4. ...>.| ...H...|
|00003240| 52 04 0d 12 5c 2a 20 dd | 20 a4 67 65 74 5f 66 6f |R...\* .| .get_fo|
|00003250| 63 75 73 5f 6e 75 6d 62 | 65 72 28 6f 66 66 73 65 |cus_numb|er(offse|
|00003260| 74 25 2c 6f 66 66 73 65 | 74 31 25 29 0d 12 66 0e |t%,offse|t1%)..f.|
|00003270| 20 ea 20 6e 75 6d 62 65 | 72 25 0d 12 70 0e 20 66 | . numbe|r%..p. f|
|00003280| 6c 61 67 25 20 3d 20 a3 | 0d 12 7a 26 20 e3 20 6c |lag% = .|..z& . l|
|00003290| 6f 6f 70 25 3d 30 20 b8 | 20 21 28 63 61 72 64 5f |oop%=0 .| !(card_|
|000032a0| 61 72 65 61 25 2b 6f 66 | 66 73 65 74 25 29 0d 12 |area%+of|fset%)..|
|000032b0| 84 46 20 20 20 e7 20 3f | 28 63 61 72 64 5f 61 72 |.F . ?|(card_ar|
|000032c0| 65 61 25 2b 6f 66 66 73 | 65 74 31 25 2b 6c 6f 6f |ea%+offs|et1%+loo|
|000032d0| 70 25 29 20 3d 20 32 35 | 35 20 20 66 6c 61 67 25 |p%) = 25|5 flag%|
|000032e0| 20 3d 20 b9 20 3a 20 6e | 75 6d 62 65 72 25 3d 6c | = . : n|umber%=l|
|000032f0| 6f 6f 70 25 0d 12 8e 06 | 20 ed 0d 12 98 48 20 e7 |oop%....| ....H .|
|00003300| 20 ac 20 66 6c 61 67 25 | 20 20 6e 75 6d 62 65 72 | . flag%| number|
|00003310| 25 3d 21 28 63 61 72 64 | 5f 61 72 65 61 25 2b 6f |%=!(card|_area%+o|
|00003320| 66 66 73 65 74 25 29 20 | 3a 20 21 28 63 61 72 64 |ffset%) |: !(card|
|00003330| 5f 61 72 65 61 25 2b 6f | 66 66 73 65 74 25 29 2b |_area%+o|ffset%)+|
|00003340| 3d 31 0d 12 a2 0e 20 3d | 20 6e 75 6d 62 65 72 25 |=1.... =| number%|
|00003350| 0d 12 ac 04 0d 12 b6 04 | 0d 12 c0 04 0d 12 ca 23 |........|.......#|
|00003360| 20 f4 20 2a 20 2a 20 2a | 20 20 47 52 41 50 48 20 | . * * *| GRAPH |
|00003370| 52 4f 55 54 49 4e 45 53 | 20 20 2a 20 2a 20 2a 0d |ROUTINES| * * *.|
|00003380| 12 d4 04 0d 12 de 04 0d | 12 e8 0d 20 dd 20 f2 67 |........|... . .g|
|00003390| 72 61 70 68 0d 12 f2 16 | 20 e7 20 73 65 6c 65 63 |raph....| . selec|
|000033a0| 74 5f 6d 6f 64 65 25 20 | 20 e1 0d 12 fc 16 20 e7 |t_mode% | ..... .|
|000033b0| 20 73 6f 72 74 5f 6d 6f | 64 65 25 20 20 20 20 e1 | sort_mo|de% .|
|000033c0| 0d 13 06 16 20 e7 20 73 | 65 61 72 63 68 5f 6d 6f |.... . s|earch_mo|
|000033d0| 64 65 25 20 20 e1 0d 13 | 10 20 20 67 72 61 70 68 |de% ...|. graph|
|000033e0| 5f 6d 6f 64 65 25 20 3d | 20 ac 20 67 72 61 70 68 |_mode% =| . graph|
|000033f0| 5f 6d 6f 64 65 25 0d 13 | 1a 24 20 f2 6d 65 6e 75 |_mode%..|.$ .menu|
|00003400| 5f 74 69 63 6b 5f 74 6f | 67 67 6c 65 28 6d 61 69 |_tick_to|ggle(mai|
|00003410| 6e 5f 6d 65 6e 75 25 2c | 35 29 0d 13 24 15 20 67 |n_menu%,|5)..$. g|
|00003420| 72 61 70 68 5f 69 63 6f | 6e 31 25 20 3d 20 a3 0d |raph_ico|n1% = ..|
|00003430| 13 2e 15 20 67 72 61 70 | 68 5f 69 63 6f 6e 32 25 |... grap|h_icon2%|
|00003440| 20 3d 20 a3 0d 13 38 16 | 20 e7 20 ac 20 67 72 61 | = ...8.| . . gra|
|00003450| 70 68 5f 6d 6f 64 65 25 | 20 8c 0d 13 42 22 20 20 |ph_mode%| ...B" |
|00003460| 20 21 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 20 3d 20 | !wimp_b|lock% = |
|00003470| 67 72 61 70 68 5f 73 65 | 74 75 70 25 0d 13 4c 29 |graph_se|tup%..L)|
|00003480| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 | .. "W|imp_Clos|
|00003490| 65 57 69 6e 64 6f 77 22 | 2c 2c 77 69 6d 70 5f 62 |eWindow"|,,wimp_b|
|000034a0| 6c 6f 63 6b 25 0d 13 56 | 08 20 20 20 e1 0d 13 60 |lock%..V|. ...`|
|000034b0| 06 20 cd 0d 13 6a 16 20 | 64 61 74 61 5f 61 72 65 |. ...j. |data_are|
|000034c0| 61 25 21 32 30 20 3d 20 | 30 0d 13 74 19 20 64 61 |a%!20 = |0..t. da|
|000034d0| 74 61 5f 61 72 65 61 25 | 3f 37 36 38 20 3d 20 32 |ta_area%|?768 = 2|
|000034e0| 35 35 0d 13 7e 19 20 64 | 61 74 61 5f 61 72 65 61 |55..~. d|ata_area|
|000034f0| 25 3f 37 36 39 20 3d 20 | 32 35 35 0d 13 88 20 20 |%?769 = |255... |
|00003500| 21 77 69 6d 70 5f 62 6c | 6f 63 6b 25 20 3d 20 67 |!wimp_bl|ock% = g|
|00003510| 72 61 70 68 5f 73 65 74 | 75 70 25 0d 13 92 2a 20 |raph_set|up%...* |
|00003520| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |.. "Wimp|_GetWind|
|00003530| 6f 77 53 74 61 74 65 22 | 2c 2c 77 69 6d 70 5f 62 |owState"|,,wimp_b|
|00003540| 6c 6f 63 6b 25 0d 13 9c | 40 20 77 69 6d 70 5f 62 |lock%...|@ wimp_b|
|00003550| 6c 6f 63 6b 25 21 38 20 | 20 3d 20 6d 65 6e 75 5f |lock%!8 | = menu_|
|00003560| 79 25 20 2d 20 28 77 69 | 6d 70 5f 62 6c 6f 63 6b |y% - (wi|mp_block|
|00003570| 25 21 31 36 20 2d 20 77 | 69 6d 70 5f 62 6c 6f 63 |%!16 - w|imp_bloc|
|00003580| 6b 25 21 38 29 0d 13 a6 | 40 20 77 69 6d 70 5f 62 |k%!8)...|@ wimp_b|
|00003590| 6c 6f 63 6b 25 21 31 32 | 20 3d 20 6d 65 6e 75 5f |lock%!12| = menu_|
|000035a0| 78 25 20 2b 20 28 77 69 | 6d 70 5f 62 6c 6f 63 6b |x% + (wi|mp_block|
|000035b0| 25 21 31 32 20 2d 20 77 | 69 6d 70 5f 62 6c 6f 63 |%!12 - w|imp_bloc|
|000035c0| 6b 25 21 34 29 0d 13 b0 | 38 20 77 69 6d 70 5f 62 |k%!4)...|8 wimp_b|
|000035d0| 6c 6f 63 6b 25 21 34 20 | 20 3d 20 6d 65 6e 75 5f |lock%!4 | = menu_|
|000035e0| 78 25 20 3a 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |x% : wim|p_block%|
|000035f0| 21 31 36 20 3d 20 6d 65 | 6e 75 5f 79 25 0d 13 ba |!16 = me|nu_y%...|
|00003600| 26 20 c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 57 |& .. "Wi|mp_OpenW|
|00003610| 69 6e 64 6f 77 22 2c 2c | 77 69 6d 70 5f 62 6c 6f |indow",,|wimp_blo|
|00003620| 63 6b 25 0d 13 c4 06 20 | e1 0d 13 ce 04 0d 13 d8 |ck%.... |........|
|00003630| 04 0d 13 e2 25 20 dd 20 | f2 61 64 64 5f 69 63 6f |....% . |.add_ico|
|00003640| 6e 5f 74 6f 5f 67 72 61 | 70 68 5f 6c 69 73 74 28 |n_to_gra|ph_list(|
|00003650| 69 63 6f 6e 25 29 0d 13 | ec 0e 20 66 6c 61 67 25 |icon%)..|.. flag%|
|00003660| 20 3d 20 a3 0d 13 f6 22 | 20 e3 20 6c 6f 6f 70 25 | = ...."| . loop%|
|00003670| 20 3d 20 30 20 b8 20 63 | 61 72 64 5f 61 72 65 61 | = 0 . c|ard_area|
|00003680| 25 21 39 33 35 32 0d 14 | 00 32 20 20 20 e7 20 69 |%!9352..|.2 . i|
|00003690| 63 6f 6e 25 20 3d 20 3f | 28 63 61 72 64 5f 61 72 |con% = ?|(card_ar|
|000036a0| 65 61 25 2b 36 38 2b 6c | 6f 6f 70 25 29 20 20 66 |ea%+68+l|oop%) f|
|000036b0| 6c 61 67 25 20 3d 20 b9 | 0d 14 0a 06 20 ed 0d 14 |lag% = .|.... ...|
|000036c0| 14 11 20 e7 20 ac 20 66 | 6c 61 67 25 20 20 e1 0d |.. . . f|lag% ..|
|000036d0| 14 1e 2d 20 e7 20 a4 69 | 63 6f 6e 5f 66 6c 61 67 |..- . .i|con_flag|
|000036e0| 5f 63 68 65 63 6b 28 67 | 72 61 70 68 5f 73 65 74 |_check(g|raph_set|
|000036f0| 75 70 25 2c 30 2c 32 31 | 29 20 20 8c 0d 14 28 27 |up%,0,21|) ...('|
|00003700| 20 20 20 69 63 6f 6e 5f | 70 74 72 25 20 3d 20 30 | icon_|ptr% = 0|
|00003710| 20 3a 20 67 72 61 70 68 | 5f 69 63 6f 6e 31 25 20 | : graph|_icon1% |
|00003720| 3d 20 b9 0d 14 32 06 20 | cc 0d 14 3c 27 20 20 20 |= ...2. |...<' |
|00003730| 69 63 6f 6e 5f 70 74 72 | 25 20 3d 20 31 20 3a 20 |icon_ptr|% = 1 : |
|00003740| 67 72 61 70 68 5f 69 63 | 6f 6e 32 25 20 3d 20 b9 |graph_ic|on2% = .|
|00003750| 0d 14 46 06 20 cd 0d 14 | 50 28 20 3f 28 64 61 74 |..F. ...|P( ?(dat|
|00003760| 61 5f 61 72 65 61 25 2b | 37 36 38 2b 69 63 6f 6e |a_area%+|768+icon|
|00003770| 5f 70 74 72 25 29 20 3d | 20 69 63 6f 6e 25 0d 14 |_ptr%) =| icon%..|
|00003780| 5a 23 20 f2 73 61 76 65 | 5f 62 61 63 6b 67 72 6f |Z# .save|_backgro|
|00003790| 75 6e 64 5f 63 6f 6c 6f | 75 72 28 69 63 6f 6e 25 |und_colo|ur(icon%|
|000037a0| 29 0d 14 64 06 20 e1 0d | 14 6e 04 0d 14 78 04 0d |)..d. ..|.n...x..|
|000037b0| 14 82 12 20 dd 20 f2 70 | 6c 6f 74 5f 67 72 61 70 |... . .p|lot_grap|
|000037c0| 68 0d 14 8c 20 20 69 63 | 6f 6e 25 20 3d 20 3f 28 |h... ic|on% = ?(|
|000037d0| 64 61 74 61 5f 61 72 65 | 61 25 20 2b 20 37 36 39 |data_are|a% + 769|
|000037e0| 29 0d 14 96 22 20 e3 20 | 6c 6f 6f 70 25 20 3d 20 |)..." . |loop% = |
|000037f0| 30 20 b8 20 63 61 72 64 | 5f 61 72 65 61 25 21 39 |0 . card|_area%!9|
|00003800| 33 35 32 0d 14 a0 38 20 | 20 20 e7 20 69 63 6f 6e |352...8 | . icon|
|00003810| 25 20 3d 20 3f 28 63 61 | 72 64 5f 61 72 65 61 25 |% = ?(ca|rd_area%|
|00003820| 2b 36 38 2b 6c 6f 6f 70 | 25 29 20 20 6f 66 66 73 |+68+loop|%) offs|
|00003830| 65 74 25 20 3d 20 6c 6f | 6f 70 25 0d 14 aa 06 20 |et% = lo|op%.... |
|00003840| ed 0d 14 b4 53 20 e7 20 | 3f 28 63 61 72 64 5f 61 |....S . |?(card_a|
|00003850| 72 65 61 25 2b 33 32 30 | 34 2b 34 38 2a 6f 66 66 |rea%+320|4+48*off|
|00003860| 73 65 74 25 29 20 3c 3e | 20 31 20 20 80 20 20 3f |set%) <>| 1 . ?|
|00003870| 28 63 61 72 64 5f 61 72 | 65 61 25 2b 33 32 30 34 |(card_ar|ea%+3204|
|00003880| 2b 34 38 2a 6f 66 66 73 | 65 74 25 29 20 3c 3e 20 |+48*offs|et%) <> |
|00003890| 32 20 20 8c 0d 14 be 54 | 20 20 20 f2 6f 6b 28 22 |2 ....T| .ok("|
|000038a0| 54 68 65 20 79 20 61 78 | 69 73 20 6d 75 73 74 20 |The y ax|is must |
|000038b0| 62 65 20 61 20 64 65 63 | 69 6d 61 6c 20 6f 72 20 |be a dec|imal or |
|000038c0| 61 6e 20 69 6e 74 65 67 | 65 72 20 66 69 65 6c 64 |an integ|er field|
|000038d0| 22 2c 22 45 72 72 6f 72 | 20 66 72 6f 6d 20 45 61 |","Error| from Ea|
|000038e0| 73 69 42 61 73 65 22 29 | 0d 14 c8 08 20 20 20 e1 |siBase")|.... .|
|000038f0| 0d 14 d2 06 20 cd 0d 14 | dc 31 20 6e 75 6d 62 65 |.... ...|.1 numbe|
|00003900| 72 5f 70 74 72 25 20 3d | 20 64 61 74 61 5f 61 72 |r_ptr% =| data_ar|
|00003910| 65 61 25 20 2b 20 31 32 | 38 30 20 2b 20 34 38 2a |ea% + 12|80 + 48*|
|00003920| 6f 66 66 73 65 74 25 0d | 14 e6 04 0d 14 f0 34 20 |offset%.|......4 |
|00003930| 21 77 69 6d 70 5f 62 6c | 6f 63 6b 25 20 3d 20 67 |!wimp_bl|ock% = g|
|00003940| 72 61 70 68 5f 73 65 74 | 75 70 25 20 3a 20 77 69 |raph_set|up% : wi|
|00003950| 6d 70 5f 62 6c 6f 63 6b | 25 21 34 20 3d 20 35 0d |mp_block|%!4 = 5.|
|00003960| 14 fa 28 20 c8 99 20 22 | 57 69 6d 70 5f 47 65 74 |..( .. "|Wimp_Get|
|00003970| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 77 69 6d 70 |IconStat|e",,wimp|
|00003980| 5f 62 6c 6f 63 6b 25 0d | 15 04 2b 20 73 63 61 6c |_block%.|..+ scal|
|00003990| 65 20 3d 20 bb 28 a4 67 | 65 74 5f 73 74 72 69 6e |e = .(.g|et_strin|
|000039a0| 67 28 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 21 32 38 |g(wimp_b|lock%!28|
|000039b0| 29 29 0d 15 0e 04 0d 15 | 18 34 20 21 77 69 6d 70 |))......|.4 !wimp|
|000039c0| 5f 62 6c 6f 63 6b 25 20 | 3d 20 67 72 61 70 68 5f |_block% |= graph_|
|000039d0| 73 65 74 75 70 25 20 3a | 20 77 69 6d 70 5f 62 6c |setup% :| wimp_bl|
|000039e0| 6f 63 6b 25 21 34 20 3d | 20 36 0d 15 22 28 20 c8 |ock%!4 =| 6.."( .|
|000039f0| 99 20 22 57 69 6d 70 5f | 47 65 74 49 63 6f 6e 53 |. "Wimp_|GetIconS|
|00003a00| 74 61 74 65 22 2c 2c 77 | 69 6d 70 5f 62 6c 6f 63 |tate",,w|imp_bloc|
|00003a10| 6b 25 0d 15 2c 30 20 62 | 61 72 5f 77 69 64 74 68 |k%..,0 b|ar_width|
|00003a20| 25 20 3d 20 bb 28 a4 67 | 65 74 5f 73 74 72 69 6e |% = .(.g|et_strin|
|00003a30| 67 28 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 21 32 38 |g(wimp_b|lock%!28|
|00003a40| 29 29 0d 15 36 04 0d 15 | 40 14 20 e7 20 73 75 62 |))..6...|@. . sub|
|00003a50| 73 65 74 5f 73 65 6c 25 | 20 8c 0d 15 4a 3c 20 20 |set_sel%| ...J< |
|00003a60| 20 62 61 72 5f 6e 6f 25 | 20 3d 20 64 61 74 61 5f | bar_no%| = data_|
|00003a70| 61 72 65 61 25 21 32 34 | 20 3a 20 62 61 72 5f 70 |area%!24| : bar_p|
|00003a80| 74 72 25 20 3d 20 64 61 | 74 61 5f 61 72 65 61 25 |tr% = da|ta_area%|
|00003a90| 20 2b 20 33 38 33 0d 15 | 54 06 20 cc 0d 15 5e 3c | + 383..|T. ...^<|
|00003aa0| 20 20 20 62 61 72 5f 6e | 6f 25 20 3d 20 64 61 74 | bar_n|o% = dat|
|00003ab0| 61 5f 61 72 65 61 25 21 | 34 20 20 3a 20 62 61 72 |a_area%!|4 : bar|
|00003ac0| 5f 70 74 72 25 20 3d 20 | 64 61 74 61 5f 61 72 65 |_ptr% = |data_are|
|00003ad0| 61 25 20 2b 20 31 32 37 | 0d 15 68 06 20 cd 0d 15 |a% + 127|..h. ...|
|00003ae0| 72 04 0d 15 7c 28 20 79 | 5f 6d 69 6e 20 3d 20 bb |r...|( y|_min = .|
|00003af0| 28 a4 67 65 74 5f 73 74 | 72 69 6e 67 28 6e 75 6d |(.get_st|ring(num|
|00003b00| 62 65 72 5f 70 74 72 25 | 29 29 0d 15 86 12 20 79 |ber_ptr%|)).... y|
|00003b10| 5f 6d 61 78 20 3d 20 79 | 5f 6d 69 6e 0d 15 90 1a |_max = y|_min....|
|00003b20| 20 e3 20 6c 6f 6f 70 25 | 20 3d 20 30 20 b8 20 62 | . loop%| = 0 . b|
|00003b30| 61 72 5f 6e 6f 25 0d 15 | 9a 4f 20 20 20 6e 75 6d |ar_no%..|.O num|
|00003b40| 62 65 72 20 3d 20 bb 28 | a4 67 65 74 5f 73 74 72 |ber = .(|.get_str|
|00003b50| 69 6e 67 28 6e 75 6d 62 | 65 72 5f 70 74 72 25 2b |ing(numb|er_ptr%+|
|00003b60| 28 3f 28 62 61 72 5f 70 | 74 72 25 2b 6c 6f 6f 70 |(?(bar_p|tr%+loop|
|00003b70| 25 29 2d 31 29 2a 64 61 | 74 61 5f 61 72 65 61 25 |%)-1)*da|ta_area%|
|00003b80| 21 31 32 29 29 0d 15 a4 | 27 20 20 20 e7 20 79 5f |!12))...|' . y_|
|00003b90| 6d 69 6e 20 3e 20 6e 75 | 6d 62 65 72 20 20 79 5f |min > nu|mber y_|
|00003ba0| 6d 69 6e 20 3d 20 6e 75 | 6d 62 65 72 0d 15 ae 27 |min = nu|mber...'|
|00003bb0| 20 20 20 e7 20 79 5f 6d | 61 78 20 3c 20 6e 75 6d | . y_m|ax < num|
|00003bc0| 62 65 72 20 20 79 5f 6d | 61 78 20 3d 20 6e 75 6d |ber y_m|ax = num|
|00003bd0| 62 65 72 0d 15 b8 06 20 | ed 0d 15 c2 04 0d 15 cc |ber.... |........|
|00003be0| 19 20 f2 63 72 65 61 74 | 65 5f 67 72 61 70 68 5f |. .creat|e_graph_|
|00003bf0| 77 69 6e 64 6f 77 0d 15 | d6 10 20 63 6f 6c 6f 75 |window..|.. colou|
|00003c00| 72 25 20 3d 20 38 0d 15 | e0 21 20 e3 20 63 75 72 |r% = 8..|.! . cur|
|00003c10| 72 65 6e 74 5f 62 61 72 | 25 20 3d 20 31 20 b8 20 |rent_bar|% = 1 . |
|00003c20| 62 61 72 5f 6e 6f 25 0d | 15 ea 57 20 20 20 68 65 |bar_no%.|..W he|
|00003c30| 69 67 68 74 20 20 3d 20 | bb 28 a4 67 65 74 5f 73 |ight = |.(.get_s|
|00003c40| 74 72 69 6e 67 28 6e 75 | 6d 62 65 72 5f 70 74 72 |tring(nu|mber_ptr|
|00003c50| 25 2b 28 3f 28 62 61 72 | 5f 70 74 72 25 2b 63 75 |%+(?(bar|_ptr%+cu|
|00003c60| 72 72 65 6e 74 5f 62 61 | 72 25 29 2d 31 29 2a 64 |rrent_ba|r%)-1)*d|
|00003c70| 61 74 61 5f 61 72 65 61 | 25 21 31 32 29 29 0d 15 |ata_area|%!12))..|
|00003c80| f4 10 20 20 20 f2 70 6c | 6f 74 5f 62 61 72 0d 15 |.. .pl|ot_bar..|
|00003c90| fe 11 20 20 20 63 6f 6c | 6f 75 72 25 2b 3d 31 0d |.. col|our%+=1.|
|00003ca0| 16 08 22 20 20 20 e7 20 | 63 6f 6c 6f 75 72 25 20 |.." . |colour% |
|00003cb0| 3d 20 31 36 20 20 63 6f | 6c 6f 75 72 25 20 3d 20 |= 16 co|lour% = |
|00003cc0| 38 0d 16 12 06 20 ed 0d | 16 1c 04 0d 16 26 23 20 |8.... ..|.....&# |
|00003cd0| f2 73 65 74 5f 6d 65 6e | 75 5f 74 69 63 6b 28 6d |.set_men|u_tick(m|
|00003ce0| 61 69 6e 5f 6d 65 6e 75 | 25 2c 35 2c a3 29 0d 16 |ain_menu|%,5,.)..|
|00003cf0| 30 20 20 21 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 20 |0 !wimp|_block% |
|00003d00| 3d 20 67 72 61 70 68 5f | 73 65 74 75 70 25 0d 16 |= graph_|setup%..|
|00003d10| 3a 27 20 c8 99 20 22 57 | 69 6d 70 5f 43 6c 6f 73 |:' .. "W|imp_Clos|
|00003d20| 65 57 69 6e 64 6f 77 22 | 2c 2c 77 69 6d 70 5f 62 |eWindow"|,,wimp_b|
|00003d30| 6c 6f 63 6b 25 0d 16 44 | 14 20 67 72 61 70 68 5f |lock%..D|. graph_|
|00003d40| 70 6c 6f 74 25 20 3d 20 | b9 0d 16 4e 14 20 67 72 |plot% = |...N. gr|
|00003d50| 61 70 68 5f 6d 6f 64 65 | 25 20 3d 20 a3 0d 16 58 |aph_mode|% = ...X|
|00003d60| 06 20 e1 0d 16 62 04 0d | 16 6c 04 0d 16 76 1b 20 |. ...b..|.l...v. |
|00003d70| dd 20 f2 63 72 65 61 74 | 65 5f 67 72 61 70 68 5f |. .creat|e_graph_|
|00003d80| 77 69 6e 64 6f 77 0d 16 | 80 14 20 e7 20 67 72 61 |window..|.. . gra|
|00003d90| 70 68 5f 70 6c 6f 74 25 | 20 8c 0d 16 8a 1d 20 20 |ph_plot%| ..... |
|00003da0| 20 21 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 20 3d 20 | !wimp_b|lock% = |
|00003db0| 67 72 61 70 68 31 25 0d | 16 94 29 20 20 20 c8 99 |graph1%.|..) ..|
|00003dc0| 20 22 57 69 6d 70 5f 43 | 6c 6f 73 65 57 69 6e 64 | "Wimp_C|loseWind|
|00003dd0| 6f 77 22 2c 2c 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |ow",,wim|p_block%|
|00003de0| 0d 16 9e 06 20 cd 0d 16 | a8 1a 20 21 77 69 6d 70 |.... ...|.. !wimp|
|00003df0| 5f 62 6c 6f 63 6b 25 20 | 3d 20 67 72 61 70 68 25 |_block% |= graph%|
|00003e00| 0d 16 b2 29 20 c8 99 20 | 22 57 69 6d 70 5f 47 65 |...) .. |"Wimp_Ge|
|00003e10| 74 57 69 6e 64 6f 77 49 | 6e 66 6f 22 2c 2c 77 69 |tWindowI|nfo",,wi|
|00003e20| 6d 70 5f 62 6c 6f 63 6b | 25 0d 16 bc 47 20 77 69 |mp_block|%...G wi|
|00003e30| 6d 70 5f 62 6c 6f 63 6b | 25 21 34 34 20 3d 20 30 |mp_block|%!44 = 0|
|00003e40| 20 3a 20 77 69 6d 70 5f | 62 6c 6f 63 6b 25 21 35 | : wimp_|block%!5|
|00003e50| 32 20 3d 20 62 61 72 5f | 77 69 64 74 68 25 2a 28 |2 = bar_|width%*(|
|00003e60| 62 61 72 5f 6e 6f 25 2b | 31 29 20 2b 20 33 32 30 |bar_no%+|1) + 320|
|00003e70| 0d 16 c6 46 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |...F wim|p_block%|
|00003e80| 21 34 38 20 3d 20 2d 20 | 28 79 5f 6d 61 78 2d 79 |!48 = - |(y_max-y|
|00003e90| 5f 6d 69 6e 29 2a 73 63 | 61 6c 65 20 2d 20 33 34 |_min)*sc|ale - 34|
|00003ea0| 30 20 3a 20 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 21 |0 : wimp|_block%!|
|00003eb0| 35 36 20 3d 20 30 0d 16 | d0 34 20 c8 99 20 22 57 |56 = 0..|.4 .. "W|
|00003ec0| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|00003ed0| 22 2c 2c 77 69 6d 70 5f | 62 6c 6f 63 6b 25 2b 34 |",,wimp_|block%+4|
|00003ee0| 20 b8 20 67 72 61 70 68 | 31 25 0d 16 da 1b 20 21 | . graph|1%.... !|
|00003ef0| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 20 3d 20 67 72 |wimp_blo|ck% = gr|
|00003f00| 61 70 68 31 25 0d 16 e4 | 29 20 c8 99 20 22 57 69 |aph1%...|) .. "Wi|
|00003f10| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 49 6e 66 6f |mp_GetWi|ndowInfo|
|00003f20| 22 2c 2c 77 69 6d 70 5f | 62 6c 6f 63 6b 25 0d 16 |",,wimp_|block%..|
|00003f30| ee 26 20 c8 99 20 22 57 | 69 6d 70 5f 4f 70 65 6e |.& .. "W|imp_Open|
|00003f40| 57 69 6e 64 6f 77 22 2c | 2c 77 69 6d 70 5f 62 6c |Window",|,wimp_bl|
|00003f50| 6f 63 6b 25 0d 16 f8 0c | 20 f2 78 5f 61 78 69 73 |ock%....| .x_axis|
|00003f60| 0d 17 02 0c 20 f2 79 5f | 61 78 69 73 0d 17 0c 06 |.... .y_|axis....|
|00003f70| 20 e1 0d 17 16 04 0d 17 | 20 04 0d 17 2a 0e 20 dd | .......| ...*. .|
|00003f80| 20 f2 78 5f 61 78 69 73 | 0d 17 34 1b 20 21 77 69 | .x_axis|..4. !wi|
|00003f90| 6d 70 5f 62 6c 6f 63 6b | 25 20 3d 20 67 72 61 70 |mp_block|% = grap|
|00003fa0| 68 31 25 0d 17 3e 29 20 | c8 99 20 22 57 69 6d 70 |h1%..>) |.. "Wimp|
|00003fb0| 5f 47 65 74 57 69 6e 64 | 6f 77 49 6e 66 6f 22 2c |_GetWind|owInfo",|
|00003fc0| 2c 77 69 6d 70 5f 62 6c | 6f 63 6b 25 0d 17 48 2a |,wimp_bl|ock%..H*|
|00003fd0| 20 77 69 6d 70 5f 62 6c | 6f 63 6b 25 21 34 20 20 | wimp_bl|ock%!4 |
|00003fe0| 3d 20 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 21 34 34 |= wimp_b|lock%!44|
|00003ff0| 20 2b 20 33 36 30 0d 17 | 52 2a 20 77 69 6d 70 5f | + 360..|R* wimp_|
|00004000| 62 6c 6f 63 6b 25 21 38 | 20 20 3d 20 77 69 6d 70 |block%!8| = wimp|
|00004010| 5f 62 6c 6f 63 6b 25 21 | 34 38 20 2b 20 31 36 30 |_block%!|48 + 160|
|00004020| 0d 17 5c 29 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |..\) wim|p_block%|
|00004030| 21 31 32 20 3d 20 77 69 | 6d 70 5f 62 6c 6f 63 6b |!12 = wi|mp_block|
|00004040| 25 21 35 32 20 2d 20 34 | 30 0d 17 66 27 20 77 69 |%!52 - 4|0..f' wi|
|00004050| 6d 70 5f 62 6c 6f 63 6b | 25 21 31 36 20 3d 20 77 |mp_block|%!16 = w|
|00004060| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 38 20 2b 20 38 |imp_bloc|k%!8 + 8|
|00004070| 0d 17 70 26 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |..p& wim|p_block%|
|00004080| 21 32 30 20 3d 20 31 20 | 3c 3c 20 35 20 84 20 37 |!20 = 1 |<< 5 . 7|
|00004090| 20 3c 3c 20 32 38 0d 17 | 7a 30 20 c8 99 20 22 57 | << 28..|z0 .. "W|
|000040a0| 69 6d 70 5f 43 72 65 61 | 74 65 49 63 6f 6e 22 2c |imp_Crea|teIcon",|
|000040b0| 2c 77 69 6d 70 5f 62 6c | 6f 63 6b 25 20 b8 20 78 |,wimp_bl|ock% . x|
|000040c0| 5f 61 78 69 73 25 0d 17 | 84 27 20 69 63 6f 6e 5f |_axis%..|.' icon_|
|000040d0| 73 74 61 72 74 25 20 3d | 20 77 69 6d 70 5f 62 6c |start% =| wimp_bl|
|000040e0| 6f 63 6b 25 21 34 34 20 | 2b 20 33 36 30 0d 17 8e |ock%!44 |+ 360...|
|000040f0| 22 20 79 5f 6d 69 6e 25 | 20 3d 20 77 69 6d 70 5f |" y_min%| = wimp_|
|00004100| 62 6c 6f 63 6b 25 21 34 | 38 20 2b 20 31 31 32 0d |block%!4|8 + 112.|
|00004110| 17 98 19 20 79 5f 6d 61 | 78 25 20 3d 20 79 5f 6d |... y_ma|x% = y_m|
|00004120| 69 6e 25 20 2b 20 34 30 | 0d 17 a2 1e 20 69 63 6f |in% + 40|.... ico|
|00004130| 6e 25 20 3d 20 3f 28 64 | 61 74 61 5f 61 72 65 61 |n% = ?(d|ata_area|
|00004140| 25 2b 37 36 38 29 0d 17 | ac 22 20 e3 20 6c 6f 6f |%+768)..|." . loo|
|00004150| 70 25 20 3d 20 30 20 b8 | 20 63 61 72 64 5f 61 72 |p% = 0 .| card_ar|
|00004160| 65 61 25 21 39 33 35 32 | 0d 17 b6 39 20 20 20 e7 |ea%!9352|...9 .|
|00004170| 20 69 63 6f 6e 25 20 3d | 20 3f 28 63 61 72 64 5f | icon% =| ?(card_|
|00004180| 61 72 65 61 25 2b 36 38 | 2b 6c 6f 6f 70 25 29 20 |area%+68|+loop%) |
|00004190| 20 6f 66 66 73 65 74 25 | 20 20 3d 20 6c 6f 6f 70 | offset%| = loop|
|000041a0| 25 0d 17 c0 06 20 ed 0d | 17 ca 31 20 73 74 72 69 |%.... ..|..1 stri|
|000041b0| 6e 67 5f 70 74 72 25 20 | 3d 20 64 61 74 61 5f 61 |ng_ptr% |= data_a|
|000041c0| 72 65 61 25 20 2b 20 31 | 32 38 30 20 2b 20 34 38 |rea% + 1|280 + 48|
|000041d0| 2a 6f 66 66 73 65 74 25 | 0d 17 d4 15 20 e7 20 73 |*offset%|.... . s|
|000041e0| 75 62 73 65 74 5f 73 65 | 6c 25 20 20 8c 0d 17 de |ubset_se|l% ....|
|000041f0| 3e 20 20 20 63 61 72 64 | 5f 6e 6f 25 20 3d 20 64 |> card|_no% = d|
|00004200| 61 74 61 5f 61 72 65 61 | 25 21 32 34 20 3a 20 63 |ata_area|%!24 : c|
|00004210| 61 72 64 5f 70 74 72 25 | 20 3d 20 64 61 74 61 5f |ard_ptr%| = data_|
|00004220| 61 72 65 61 25 20 2b 20 | 33 38 34 0d 17 e8 06 20 |area% + |384.... |
|00004230| cc 0d 17 f2 3e 20 20 20 | 63 61 72 64 5f 6e 6f 25 |....> |card_no%|
|00004240| 20 3d 20 64 61 74 61 5f | 61 72 65 61 25 21 34 20 | = data_|area%!4 |
|00004250| 20 3a 20 63 61 72 64 5f | 70 74 72 25 20 3d 20 64 | : card_|ptr% = d|
|00004260| 61 74 61 5f 61 72 65 61 | 25 20 2b 20 31 32 38 0d |ata_area|% + 128.|
|00004270| 17 fc 06 20 cd 0d 18 06 | 1f 20 e3 20 6c 6f 6f 70 |... ....|. . loop|
|00004280| 25 20 3d 20 30 20 b8 20 | 63 61 72 64 5f 6e 6f 25 |% = 0 . |card_no%|
|00004290| 20 2d 20 31 0d 18 10 3c | 20 20 21 77 69 6d 70 5f | - 1...<| !wimp_|
|000042a0| 62 6c 6f 63 6b 25 20 20 | 3d 20 67 72 61 70 68 31 |block% |= graph1|
|000042b0| 25 20 3a 20 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 21 |% : wimp|_block%!|
|000042c0| 34 20 20 3d 20 69 63 6f | 6e 5f 73 74 61 72 74 25 |4 = ico|n_start%|
|000042d0| 0d 18 1a 49 20 20 77 69 | 6d 70 5f 62 6c 6f 63 6b |...I wi|mp_block|
|000042e0| 25 21 38 20 3d 20 79 5f | 6d 69 6e 25 20 20 3a 20 |%!8 = y_|min% : |
|000042f0| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 21 31 32 20 3d |wimp_blo|ck%!12 =|
|00004300| 20 69 63 6f 6e 5f 73 74 | 61 72 74 25 20 2b 20 62 | icon_st|art% + b|
|00004310| 61 72 5f 77 69 64 74 68 | 25 0d 18 24 5b 20 20 77 |ar_width|%..$[ w|
|00004320| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 31 36 20 3d 20 |imp_bloc|k%!16 = |
|00004330| 79 5f 6d 61 78 25 20 3a | 20 77 69 6d 70 5f 62 6c |y_max% :| wimp_bl|
|00004340| 6f 63 6b 25 21 32 30 20 | 3d 20 31 20 84 20 31 3c |ock%!20 |= 1 . 1<|
|00004350| 3c 33 20 84 20 31 3c 3c | 35 20 84 20 31 35 3c 3c |<3 . 1<<|5 . 15<<|
|00004360| 31 32 20 84 20 37 3c 3c | 32 34 20 84 20 31 20 3c |12 . 7<<|24 . 1 <|
|00004370| 3c 20 32 38 0d 18 2e 4d | 20 20 73 74 72 69 6e 67 |< 28...M| string|
|00004380| 24 20 3d 20 a4 67 65 74 | 5f 73 74 72 69 6e 67 28 |$ = .get|_string(|
|00004390| 73 74 72 69 6e 67 5f 70 | 74 72 25 2b 28 3f 28 63 |string_p|tr%+(?(c|
|000043a0| 61 72 64 5f 70 74 72 25 | 2b 6c 6f 6f 70 25 29 2d |ard_ptr%|+loop%)-|
|000043b0| 31 29 2a 64 61 74 61 5f | 61 72 65 61 25 21 31 32 |1)*data_|area%!12|
|000043c0| 29 0d 18 38 36 20 20 e7 | 20 a9 28 73 74 72 69 6e |)..86 .| .(strin|
|000043d0| 67 24 29 20 3e 20 31 31 | 20 20 73 74 72 69 6e 67 |g$) > 11| string|
|000043e0| 24 20 3d 20 c0 73 74 72 | 69 6e 67 24 2c 31 31 29 |$ = .str|ing$,11)|
|000043f0| 20 2b 20 bd 28 30 29 0d | 18 42 21 20 20 24 28 77 | + .(0).|.B! $(w|
|00004400| 69 6d 70 5f 62 6c 6f 63 | 6b 25 2b 32 34 29 20 3d |imp_bloc|k%+24) =|
|00004410| 20 73 74 72 69 6e 67 24 | 0d 18 4c 27 20 20 c8 99 | string$|..L' ..|
|00004420| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 49 63 6f | "Wimp_C|reateIco|
|00004430| 6e 22 2c 2c 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 0d |n",,wimp|_block%.|
|00004440| 18 56 1d 20 20 69 63 6f | 6e 5f 73 74 61 72 74 25 |.V. ico|n_start%|
|00004450| 2b 3d 62 61 72 5f 77 69 | 64 74 68 25 0d 18 60 06 |+=bar_wi|dth%..`.|
|00004460| 20 ed 0d 18 6a 06 20 e1 | 0d 18 74 04 0d 18 7e 04 | ...j. .|..t...~.|
|00004470| 0d 18 88 0e 20 dd 20 f2 | 79 5f 61 78 69 73 0d 18 |.... . .|y_axis..|
|00004480| 92 1b 20 21 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 20 |.. !wimp|_block% |
|00004490| 3d 20 67 72 61 70 68 31 | 25 0d 18 9c 29 20 c8 99 |= graph1|%...) ..|
|000044a0| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|000044b0| 49 6e 66 6f 22 2c 2c 77 | 69 6d 70 5f 62 6c 6f 63 |Info",,w|imp_bloc|
|000044c0| 6b 25 0d 18 a6 19 20 77 | 69 6d 70 5f 62 6c 6f 63 |k%.... w|imp_bloc|
|000044d0| 6b 25 21 34 20 20 3d 20 | 33 35 32 0d 18 b0 2a 20 |k%!4 = |352...* |
|000044e0| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 21 38 20 20 3d |wimp_blo|ck%!8 =|
|000044f0| 20 77 69 6d 70 5f 62 6c | 6f 63 6b 25 21 34 38 20 | wimp_bl|ock%!48 |
|00004500| 2b 20 31 36 30 0d 18 ba | 27 20 77 69 6d 70 5f 62 |+ 160...|' wimp_b|
|00004510| 6c 6f 63 6b 25 21 31 32 | 20 3d 20 77 69 6d 70 5f |lock%!12| = wimp_|
|00004520| 62 6c 6f 63 6b 25 21 34 | 20 2b 20 38 0d 18 c4 1a |block%!4| + 8....|
|00004530| 20 77 69 6d 70 5f 62 6c | 6f 63 6b 25 21 31 36 20 | wimp_bl|ock%!16 |
|00004540| 3d 20 2d 31 32 30 0d 18 | ce 26 20 77 69 6d 70 5f |= -120..|.& wimp_|
|00004550| 62 6c 6f 63 6b 25 21 32 | 30 20 3d 20 31 20 3c 3c |block%!2|0 = 1 <<|
|00004560| 20 35 20 84 20 37 20 3c | 3c 20 32 38 0d 18 d8 30 | 5 . 7 <|< 28...0|
|00004570| 20 c8 99 20 22 57 69 6d | 70 5f 43 72 65 61 74 65 | .. "Wim|p_Create|
|00004580| 49 63 6f 6e 22 2c 2c 77 | 69 6d 70 5f 62 6c 6f 63 |Icon",,w|imp_bloc|
|00004590| 6b 25 20 b8 20 79 5f 61 | 78 69 73 25 0d 18 e2 2d |k% . y_a|xis%...-|
|000045a0| 20 69 6e 74 65 72 76 61 | 6c 25 20 3d 20 94 28 28 | interva|l% = .((|
|000045b0| 28 79 5f 6d 61 78 20 2d | 20 79 5f 6d 69 6e 29 2a |(y_max -| y_min)*|
|000045c0| 73 63 61 6c 65 29 2f 35 | 29 0d 18 ec 1f 20 72 61 |scale)/5|).... ra|
|000045d0| 6e 67 65 20 20 3d 20 28 | 79 5f 6d 61 78 20 2d 20 |nge = (|y_max - |
|000045e0| 79 5f 6d 69 6e 29 2f 35 | 0d 18 f6 13 20 6e 75 6d |y_min)/5|.... num|
|000045f0| 62 65 72 20 3d 20 72 61 | 6e 67 65 0d 19 00 13 20 |ber = ra|nge.... |
|00004600| 79 25 20 3d 20 69 6e 74 | 65 72 76 61 6c 25 0d 19 |y% = int|erval%..|
|00004610| 0a 14 20 e3 20 6c 6f 6f | 70 25 20 3d 20 31 20 b8 |.. . loo|p% = 1 .|
|00004620| 20 35 0d 19 14 1e 20 20 | 20 21 77 69 6d 70 5f 62 | 5.... | !wimp_b|
|00004630| 6c 6f 63 6b 25 20 20 3d | 20 67 72 61 70 68 31 25 |lock% =| graph1%|
|00004640| 0d 19 1e 31 20 20 20 77 | 69 6d 70 5f 62 6c 6f 63 |...1 w|imp_bloc|
|00004650| 6b 25 21 34 20 3d 20 32 | 34 30 20 3a 20 77 69 6d |k%!4 = 2|40 : wim|
|00004660| 70 5f 62 6c 6f 63 6b 25 | 21 31 32 20 3d 20 33 34 |p_block%|!12 = 34|
|00004670| 30 0d 19 28 2f 20 20 20 | 77 69 6d 70 5f 62 6c 6f |0..(/ |wimp_blo|
|00004680| 63 6b 25 21 38 20 3d 20 | 77 69 6d 70 5f 62 6c 6f |ck%!8 = |wimp_blo|
|00004690| 63 6b 25 21 34 38 2b 31 | 36 30 2b 79 25 2d 32 30 |ck%!48+1|60+y%-20|
|000046a0| 0d 19 32 28 20 20 20 77 | 69 6d 70 5f 62 6c 6f 63 |..2( w|imp_bloc|
|000046b0| 6b 25 21 31 36 20 3d 20 | 77 69 6d 70 5f 62 6c 6f |k%!16 = |wimp_blo|
|000046c0| 63 6b 25 21 38 2b 34 30 | 0d 19 3c 3b 20 20 20 77 |ck%!8+40|..<; w|
|000046d0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 32 30 20 3d 20 |imp_bloc|k%!20 = |
|000046e0| 31 20 84 20 31 3c 3c 35 | 20 84 20 31 35 3c 3c 31 |1 . 1<<5| . 15<<1|
|000046f0| 32 20 84 20 37 3c 3c 32 | 34 20 84 20 31 20 3c 3c |2 . 7<<2|4 . 1 <<|
|00004700| 20 32 38 0d 19 46 28 20 | 20 20 24 28 77 69 6d 70 | 28..F( | $(wimp|
|00004710| 5f 62 6c 6f 63 6b 25 2b | 32 34 29 20 3d 20 c0 c3 |_block%+|24) = ..|
|00004720| 28 6e 75 6d 62 65 72 29 | 2c 36 29 0d 19 50 28 20 |(number)|,6)..P( |
|00004730| 20 20 c8 99 20 22 57 69 | 6d 70 5f 43 72 65 61 74 | .. "Wi|mp_Creat|
|00004740| 65 49 63 6f 6e 22 2c 2c | 77 69 6d 70 5f 62 6c 6f |eIcon",,|wimp_blo|
|00004750| 63 6b 25 0d 19 5a 14 20 | 20 20 6e 75 6d 62 65 72 |ck%..Z. | number|
|00004760| 2b 3d 72 61 6e 67 65 0d | 19 64 14 20 20 20 79 25 |+=range.|.d. y%|
|00004770| 2b 3d 69 6e 74 65 72 76 | 61 6c 25 0d 19 6e 06 20 |+=interv|al%..n. |
|00004780| ed 0d 19 78 06 20 e1 0d | 19 82 04 0d 19 8c 04 0d |...x. ..|........|
|00004790| 19 96 10 20 dd 20 f2 70 | 6c 6f 74 5f 62 61 72 0d |... . .p|lot_bar.|
|000047a0| 19 a0 1b 20 21 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |... !wim|p_block%|
|000047b0| 20 3d 20 67 72 61 70 68 | 31 25 0d 19 aa 29 20 c8 | = graph|1%...) .|
|000047c0| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|000047d0| 77 49 6e 66 6f 22 2c 2c | 77 69 6d 70 5f 62 6c 6f |wInfo",,|wimp_blo|
|000047e0| 63 6b 25 0d 19 b4 37 20 | 77 69 6d 70 5f 62 6c 6f |ck%...7 |wimp_blo|
|000047f0| 63 6b 25 21 34 20 20 3d | 20 33 36 30 20 2b 20 28 |ck%!4 =| 360 + (|
|00004800| 63 75 72 72 65 6e 74 5f | 62 61 72 25 2d 31 29 2a |current_|bar%-1)*|
|00004810| 62 61 72 5f 77 69 64 74 | 68 25 0d 19 be 2a 20 77 |bar_widt|h%...* w|
|00004820| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 38 20 20 3d 20 |imp_bloc|k%!8 = |
|00004830| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 21 34 38 20 2b |wimp_blo|ck%!48 +|
|00004840| 20 31 36 38 0d 19 c8 30 | 20 77 69 6d 70 5f 62 6c | 168...0| wimp_bl|
|00004850| 6f 63 6b 25 21 31 32 20 | 3d 20 77 69 6d 70 5f 62 |ock%!12 |= wimp_b|
|00004860| 6c 6f 63 6b 25 21 34 20 | 2b 20 62 61 72 5f 77 69 |lock%!4 |+ bar_wi|
|00004870| 64 74 68 25 0d 19 d2 32 | 20 77 69 6d 70 5f 62 6c |dth%...2| wimp_bl|
|00004880| 6f 63 6b 25 21 31 36 20 | 3d 20 77 69 6d 70 5f 62 |ock%!16 |= wimp_b|
|00004890| 6c 6f 63 6b 25 21 38 20 | 2b 20 68 65 69 67 68 74 |lock%!8 |+ height|
|000048a0| 2a 73 63 61 6c 65 0d 19 | dc 2c 20 77 69 6d 70 5f |*scale..|., wimp_|
|000048b0| 62 6c 6f 63 6b 25 21 32 | 30 20 3d 20 31 20 3c 3c |block%!2|0 = 1 <<|
|000048c0| 20 35 20 84 20 63 6f 6c | 6f 75 72 25 20 3c 3c 20 | 5 . col|our% << |
|000048d0| 32 38 0d 19 e6 26 20 c8 | 99 20 22 57 69 6d 70 5f |28...& .|. "Wimp_|
|000048e0| 43 72 65 61 74 65 49 63 | 6f 6e 22 2c 2c 77 69 6d |CreateIc|on",,wim|
|000048f0| 70 5f 62 6c 6f 63 6b 25 | 0d 19 f0 06 20 e1 0d 19 |p_block%|.... ...|
|00004900| fa 04 0d 1a 04 04 0d 1a | 0e 25 20 dd 20 f2 67 72 |........|.% . .gr|
|00004910| 61 70 68 5f 74 65 78 74 | 28 6d 6f 75 73 65 5f 78 |aph_text|(mouse_x|
|00004920| 25 2c 6d 6f 75 73 65 5f | 79 25 29 0d 1a 18 1b 20 |%,mouse_|y%).... |
|00004930| 21 77 69 6d 70 5f 62 6c | 6f 63 6b 25 20 3d 20 67 |!wimp_bl|ock% = g|
|00004940| 72 61 70 68 31 25 0d 1a | 22 2a 20 c8 99 20 22 57 |raph1%..|"* .. "W|
|00004950| 69 6d 70 5f 47 65 74 57 | 69 6e 64 6f 77 53 74 61 |imp_GetW|indowSta|
|00004960| 74 65 22 2c 2c 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |te",,wim|p_block%|
|00004970| 0d 1a 2c 22 20 78 25 20 | 3d 20 6d 6f 75 73 65 5f |..," x% |= mouse_|
|00004980| 78 25 20 2d 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |x% - wim|p_block%|
|00004990| 21 34 0d 1a 36 26 20 79 | 25 20 3d 20 2d 28 77 69 |!4..6& y|% = -(wi|
|000049a0| 6d 70 5f 62 6c 6f 63 6b | 25 21 31 36 20 2d 20 6d |mp_block|%!16 - m|
|000049b0| 6f 75 73 65 5f 79 25 29 | 0d 1a 40 33 20 77 69 6d |ouse_y%)|..@3 wim|
|000049c0| 70 5f 62 6c 6f 63 6b 25 | 21 34 20 3d 20 78 25 20 |p_block%|!4 = x% |
|000049d0| 3a 20 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 21 31 32 |: wimp_b|lock%!12|
|000049e0| 20 3d 20 78 25 20 2b 20 | 31 39 32 0d 1a 4a 32 20 | = x% + |192..J2 |
|000049f0| 77 69 6d 70 5f 62 6c 6f | 63 6b 25 21 38 20 3d 20 |wimp_blo|ck%!8 = |
|00004a00| 79 25 20 3a 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |y% : wim|p_block%|
|00004a10| 21 31 36 20 3d 20 79 25 | 20 2b 20 34 30 0d 1a 54 |!16 = y%| + 40..T|
|00004a20| 37 20 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 21 32 30 |7 wimp_b|lock%!20|
|00004a30| 20 3d 20 31 20 84 20 31 | 3c 3c 35 20 84 20 31 35 | = 1 . 1|<<5 . 15|
|00004a40| 3c 3c 31 32 20 84 20 37 | 3c 3c 32 34 20 84 20 31 |<<12 . 7|<<24 . 1|
|00004a50| 3c 3c 32 38 0d 1a 5e 1b | 20 24 28 77 69 6d 70 5f |<<28..^.| $(wimp_|
|00004a60| 62 6c 6f 63 6b 25 2b 32 | 34 29 20 3d 20 22 22 0d |block%+2|4) = "".|
|00004a70| 1a 68 2e 20 c8 99 20 22 | 57 69 6d 70 5f 43 72 65 |.h. .. "|Wimp_Cre|
|00004a80| 61 74 65 49 63 6f 6e 22 | 2c 2c 77 69 6d 70 5f 62 |ateIcon"|,,wimp_b|
|00004a90| 6c 6f 63 6b 25 20 b8 20 | 69 63 6f 6e 25 0d 1a 72 |lock% . |icon%..r|
|00004aa0| 20 20 f2 69 63 6f 6e 5f | 72 65 64 72 61 77 28 67 | .icon_|redraw(g|
|00004ab0| 72 61 70 68 31 25 2c 69 | 63 6f 6e 25 29 0d 1a 7c |raph1%,i|con%)..||
|00004ac0| 06 20 e1 0d 1a 86 04 0d | 1a 90 04 0d 1a 9a 04 0d |. ......|........|
|00004ad0| 1a a4 20 20 f4 20 2a 20 | 2a 20 2a 20 50 52 49 4e |.. . * |* * PRIN|
|00004ae0| 54 20 52 4f 55 54 49 4e | 45 20 2a 20 2a 20 2a 0d |T ROUTIN|E * * *.|
|00004af0| 1a ae 04 0d 1a b8 04 0d | 1a c2 16 20 dd 20 f2 70 |........|... . .p|
|00004b00| 72 69 6e 74 28 77 69 6e | 64 6f 77 25 29 0d 1a cc |rint(win|dow%)...|
|00004b10| 04 0d 1a d6 16 20 c8 99 | 20 22 48 6f 75 72 67 6c |..... ..| "Hourgl|
|00004b20| 61 73 73 5f 4f 6e 22 0d | 1a e0 18 20 70 66 25 20 |ass_On".|... pf% |
|00004b30| 3d 20 ae 28 22 70 72 69 | 6e 74 65 72 3a 22 29 0d |= .("pri|nter:").|
|00004b40| 1a ea 30 20 c8 99 20 22 | 50 44 72 69 76 65 72 5f |..0 .. "|PDriver_|
|00004b50| 53 65 6c 65 63 74 4a 6f | 62 22 2c 70 66 25 2c 22 |SelectJo|b",pf%,"|
|00004b60| 45 61 73 69 42 61 73 65 | 20 50 72 69 6e 74 22 0d |EasiBase| Print".|
|00004b70| 1a f4 04 0d 1a fe 08 20 | ea 20 85 0d 1b 08 61 20 |....... |. ....a |
|00004b80| ee 20 85 20 ea 3a f7 20 | 85 3a c8 99 20 22 50 44 |. . .:. |.:.. "PD|
|00004b90| 72 69 76 65 72 5f 41 62 | 6f 72 74 4a 6f 62 22 2c |river_Ab|ortJob",|
|00004ba0| 70 66 25 3a d9 23 70 66 | 25 3a c8 99 20 22 48 6f |pf%:.#pf|%:.. "Ho|
|00004bb0| 75 72 67 6c 61 73 73 5f | 4f 66 66 22 3a f2 6f 6b |urglass_|Off":.ok|
|00004bc0| 28 f6 24 2c 22 45 72 72 | 6f 72 20 66 72 6f 6d 20 |(.$,"Err|or from |
|00004bd0| 45 61 73 69 42 61 73 65 | 22 29 3a e1 0d 1b 12 04 |EasiBase|"):.....|
|00004be0| 0d 1b 1c 1b 20 21 77 69 | 6d 70 5f 62 6c 6f 63 6b |.... !wi|mp_block|
|00004bf0| 25 20 3d 20 77 69 6e 64 | 6f 77 25 0d 1b 26 2a 20 |% = wind|ow%..&* |
|00004c00| c8 99 20 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |.. "Wimp|_GetWind|
|00004c10| 6f 77 53 74 61 74 65 22 | 2c 2c 77 69 6d 70 5f 62 |owState"|,,wimp_b|
|00004c20| 6c 6f 63 6b 25 0d 1b 30 | 1d 20 21 72 65 63 74 25 |lock%..0|. !rect%|
|00004c30| 20 20 20 3d 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 | = wim|p_block%|
|00004c40| 21 34 0d 1b 3a 1d 20 72 | 65 63 74 25 21 34 20 20 |!4..:. r|ect%!4 |
|00004c50| 3d 20 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 21 38 0d |= wimp_b|lock%!8.|
|00004c60| 1b 44 1e 20 72 65 63 74 | 25 21 38 20 20 3d 20 77 |.D. rect|%!8 = w|
|00004c70| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 31 32 0d 1b 4e |imp_bloc|k%!12..N|
|00004c80| 1e 20 72 65 63 74 25 21 | 31 32 20 3d 20 77 69 6d |. rect%!|12 = wim|
|00004c90| 70 5f 62 6c 6f 63 6b 25 | 21 31 36 0d 1b 58 22 20 |p_block%|!16..X" |
|00004ca0| 69 63 6f 6e 5f 6e 75 6d | 62 65 72 25 20 3d 20 77 |icon_num|ber% = w|
|00004cb0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 21 38 38 0d 1b 62 |imp_bloc|k%!88..b|
|00004cc0| 04 0d 1b 6c 2f 20 c8 99 | 20 22 50 44 72 69 76 65 |...l/ ..| "PDrive|
|00004cd0| 72 5f 50 61 67 65 53 69 | 7a 65 22 20 b8 20 2c 77 |r_PageSi|ze" . ,w|
|00004ce0| 25 2c 68 25 2c 6c 25 2c | 62 25 2c 72 25 2c 74 25 |%,h%,l%,|b%,r%,t%|
|00004cf0| 0d 1b 76 1b 20 21 70 6c | 6f 74 61 74 25 20 3d 20 |..v. !pl|otat% = |
|00004d00| 6c 25 20 2b 20 31 34 34 | 30 30 30 0d 1b 80 1c 20 |l% + 144|000.... |
|00004d10| 70 6c 6f 74 61 74 25 21 | 34 20 3d 20 62 25 20 2b |plotat%!|4 = b% +|
|00004d20| 20 31 34 34 30 30 30 0d | 1b 8a 04 0d 1b 94 40 20 | 144000.|......@ |
|00004d30| c8 99 20 22 50 44 72 69 | 76 65 72 5f 47 69 76 65 |.. "PDri|ver_Give|
|00004d40| 52 65 63 74 61 6e 67 6c | 65 22 2c 30 2c 72 65 63 |Rectangl|e",0,rec|
|00004d50| 74 25 2c 74 72 61 6e 73 | 25 2c 70 6c 6f 74 61 74 |t%,trans|%,plotat|
|00004d60| 25 2c 26 46 46 46 46 46 | 46 30 30 0d 1b 9e 34 20 |%,&FFFFF|F00...4 |
|00004d70| c8 99 20 22 50 44 72 69 | 76 65 72 5f 44 72 61 77 |.. "PDri|ver_Draw|
|00004d80| 50 61 67 65 22 2c 31 2c | 64 61 74 61 5f 62 6c 6f |Page",1,|data_blo|
|00004d90| 63 6b 25 2c 30 2c 30 20 | b8 20 6d 6f 72 65 25 0d |ck%,0,0 |. more%.|
|00004da0| 1b a8 04 0d 1b b2 0d 20 | c8 95 20 6d 6f 72 65 25 |....... |.. more%|
|00004db0| 0d 1b bc 21 20 20 20 e3 | 20 69 63 6f 6e 25 20 3d |...! .| icon% =|
|00004dc0| 20 30 20 b8 20 69 63 6f | 6e 5f 6e 75 6d 62 65 72 | 0 . ico|n_number|
|00004dd0| 25 0d 1b c6 31 20 20 20 | 20 20 e7 20 ac 20 a4 69 |%...1 | . . .i|
|00004de0| 63 6f 6e 5f 66 6c 61 67 | 5f 63 68 65 63 6b 28 77 |con_flag|_check(w|
|00004df0| 69 6e 64 6f 77 25 2c 69 | 63 6f 6e 25 2c 32 33 29 |indow%,i|con%,23)|
|00004e00| 20 8c 0d 1b d0 28 20 20 | 20 20 20 20 20 f2 67 65 | ....( | .ge|
|00004e10| 74 5f 69 63 6f 6e 5f 64 | 61 74 61 28 77 69 6e 64 |t_icon_d|ata(wind|
|00004e20| 6f 77 25 2c 69 63 6f 6e | 25 29 0d 1b da 30 20 20 |ow%,icon|%)...0 |
|00004e30| 20 20 20 20 20 e7 20 a4 | 69 63 6f 6e 5f 66 6c 61 | . .|icon_fla|
|00004e40| 67 5f 63 68 65 63 6b 28 | 77 69 6e 64 6f 77 25 2c |g_check(|window%,|
|00004e50| 69 63 6f 6e 25 2c 30 29 | 20 8c 0d 1b e4 20 20 20 |icon%,0)| .... |
|00004e60| 20 20 20 20 20 20 20 f2 | 74 65 78 74 5f 70 6c 6f | .|text_plo|
|00004e70| 74 28 77 69 6e 64 6f 77 | 25 29 0d 1b ee 0c 20 20 |t(window|%).... |
|00004e80| 20 20 20 20 20 cc 0d 1b | f8 1c 20 20 20 20 20 20 | ...|.. |
|00004e90| 20 20 20 f2 72 65 63 74 | 61 6e 67 6c 65 5f 70 6c | .rect|angle_pl|
|00004ea0| 6f 74 0d 1c 02 0c 20 20 | 20 20 20 20 20 cd 0d 1c |ot.... | ...|
|00004eb0| 0c 0a 20 20 20 20 20 cd | 0d 1c 16 08 20 20 20 ed |.. .|.... .|
|00004ec0| 0d 1c 20 33 20 c8 99 20 | 22 50 44 72 69 76 65 72 |.. 3 .. |"PDriver|
|00004ed0| 5f 47 65 74 52 65 63 74 | 61 6e 67 6c 65 22 2c 2c |_GetRect|angle",,|
|00004ee0| 64 61 74 61 5f 62 6c 6f | 63 6b 25 20 b8 20 6d 6f |data_blo|ck% . mo|
|00004ef0| 72 65 25 0d 1c 2a 06 20 | ce 0d 1c 34 04 0d 1c 3e |re%..*. |...4...>|
|00004f00| 1c 20 c8 99 20 22 50 44 | 72 69 76 65 72 5f 45 6e |. .. "PD|river_En|
|00004f10| 64 4a 6f 62 22 2c 70 66 | 25 0d 1c 48 17 20 c8 99 |dJob",pf|%..H. ..|
|00004f20| 20 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 66 66 22 | "Hourgl|ass_Off"|
|00004f30| 0d 1c 52 08 20 f7 20 85 | 0d 1c 5c 0b 20 d9 20 23 |..R. . .|..\. . #|
|00004f40| 70 66 25 0d 1c 66 06 20 | e1 0d 1c 70 04 0d 1c 7a |pf%..f. |...p...z|
|00004f50| 04 0d 1c 84 1a 20 dd 20 | f2 74 65 78 74 5f 70 6c |..... . |.text_pl|
|00004f60| 6f 74 28 77 69 6e 64 6f | 77 25 29 0d 1c 8e 57 20 |ot(windo|w%)...W |
|00004f70| e7 20 77 69 6e 64 6f 77 | 25 20 3d 20 63 61 72 64 |. window|% = card|
|00004f80| 5f 61 72 65 61 25 21 31 | 30 32 34 30 20 20 80 20 |_area%!1|0240 . |
|00004f90| 20 a4 69 63 6f 6e 5f 66 | 6c 61 67 5f 63 68 65 63 | .icon_f|lag_chec|
|00004fa0| 6b 28 63 61 72 64 5f 61 | 72 65 61 25 21 31 30 32 |k(card_a|rea%!102|
|00004fb0| 34 30 2c 69 63 6f 6e 25 | 2c 36 29 20 3d 20 b9 20 |40,icon%|,6) = . |
|00004fc0| 20 8c 0d 1c 98 1d 20 20 | 20 21 77 69 6d 70 5f 62 | ..... | !wimp_b|
|00004fd0| 6c 6f 63 6b 25 20 3d 20 | 77 69 6e 64 6f 77 25 0d |lock% = |window%.|
|00004fe0| 1c a2 1c 20 20 20 77 69 | 6d 70 5f 62 6c 6f 63 6b |... wi|mp_block|
|00004ff0| 25 21 34 20 3d 20 69 63 | 6f 6e 25 0d 1c ac 2a 20 |%!4 = ic|on%...* |
|00005000| 20 20 c8 99 20 22 57 69 | 6d 70 5f 47 65 74 49 63 | .. "Wi|mp_GetIc|
|00005010| 6f 6e 53 74 61 74 65 22 | 2c 2c 77 69 6d 70 5f 62 |onState"|,,wimp_b|
|00005020| 6c 6f 63 6b 25 0d 1c b6 | 1b 20 20 20 66 31 25 20 |lock%...|. f1% |
|00005030| 3d 20 77 69 6d 70 5f 62 | 6c 6f 63 6b 25 3f 32 37 |= wimp_b|lock%?27|
|00005040| 0d 1c c0 1c 20 20 20 c8 | 99 20 22 46 6f 6e 74 5f |.... .|. "Font_|
|00005050| 53 65 74 46 6f 6e 74 22 | 2c 66 31 25 0d 1c ca 2d |SetFont"|,f1%...-|
|00005060| 20 20 20 c8 99 20 22 46 | 6f 6e 74 5f 50 61 69 6e | .. "F|ont_Pain|
|00005070| 74 22 2c 2c 73 74 72 69 | 6e 67 24 2c 31 36 2c 69 |t",,stri|ng$,16,i|
|00005080| 78 25 2c 69 79 25 2d 32 | 30 0d 1c d4 06 20 cc 0d |x%,iy%-2|0.... ..|
|00005090| 1c de 21 20 20 20 c8 99 | 20 22 43 6f 6c 6f 75 72 |..! ..| "Colour|
|000050a0| 54 72 61 6e 73 5f 53 65 | 74 47 43 4f 4c 22 2c 30 |Trans_Se|tGCOL",0|
|000050b0| 0d 1c e8 16 20 20 20 ef | 20 35 20 3a 20 ec 20 69 |.... .| 5 : . i|
|000050c0| 78 25 2c 69 79 25 0d 1c | f2 10 20 20 20 f1 20 73 |x%,iy%..|.. . s|
|000050d0| 74 72 69 6e 67 24 0d 1c | fc 06 20 cd 0d 1d 06 06 |tring$..|.. .....|
|000050e0| 20 e1 0d 1d 10 04 0d 1d | 1a 04 0d 1d 24 16 20 dd | .......|....$. .|
|000050f0| 20 f2 72 65 63 74 61 6e | 67 6c 65 5f 70 6c 6f 74 | .rectan|gle_plot|
|00005100| 0d 1d 2e 1f 20 c8 99 20 | 22 43 6f 6c 6f 75 72 54 |.... .. |"ColourT|
|00005110| 72 61 6e 73 5f 53 65 74 | 47 43 4f 4c 22 2c 30 0d |rans_Set|GCOL",0.|
|00005120| 1d 38 2d 20 e7 20 69 63 | 6f 6e 25 20 3d 20 78 5f |.8- . ic|on% = x_|
|00005130| 61 78 69 73 25 20 20 84 | 20 20 69 63 6f 6e 25 20 |axis% .| icon% |
|00005140| 3d 20 79 5f 61 78 69 73 | 25 20 20 8c 0d 1d 42 27 |= y_axis|% ...B'|
|00005150| 20 20 20 c8 93 20 c8 90 | 20 69 78 25 2c 69 79 25 | .. ..| ix%,iy%|
|00005160| 2c 69 78 5f 73 69 7a 65 | 25 2c 2d 69 79 5f 73 69 |,ix_size|%,-iy_si|
|00005170| 7a 65 25 0d 1d 4c 06 20 | cc 0d 1d 56 24 20 20 20 |ze%..L. |...V$ |
|00005180| c8 93 20 69 78 25 2c 69 | 79 25 2c 69 78 5f 73 69 |.. ix%,i|y%,ix_si|
|00005190| 7a 65 25 2c 2d 69 79 5f | 73 69 7a 65 25 0d 1d 60 |ze%,-iy_|size%..`|
|000051a0| 06 20 cd 0d 1d 6a 06 20 | e1 0d 1d 74 04 0d 1d 7e |. ...j. |...t...~|
|000051b0| 04 0d 1d 88 24 20 dd 20 | f2 67 65 74 5f 69 63 6f |....$ . |.get_ico|
|000051c0| 6e 5f 64 61 74 61 28 77 | 69 6e 64 6f 77 25 2c 69 |n_data(w|indow%,i|
|000051d0| 63 6f 6e 25 29 0d 1d 92 | 33 20 21 77 69 6d 70 5f |con%)...|3 !wimp_|
|000051e0| 62 6c 6f 63 6b 25 20 3d | 20 77 69 6e 64 6f 77 25 |block% =| window%|
|000051f0| 20 3a 20 77 69 6d 70 5f | 62 6c 6f 63 6b 25 21 34 | : wimp_|block%!4|
|00005200| 20 3d 20 69 63 6f 6e 25 | 0d 1d 9c 28 20 c8 99 20 | = icon%|...( .. |
|00005210| 22 57 69 6d 70 5f 47 65 | 74 49 63 6f 6e 53 74 61 |"Wimp_Ge|tIconSta|
|00005220| 74 65 22 2c 2c 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |te",,wim|p_block%|
|00005230| 0d 1d a6 2a 20 62 61 63 | 6b 67 72 6f 75 6e 64 5f |...* bac|kground_|
|00005240| 63 6f 6c 25 20 3d 20 77 | 69 6d 70 5f 62 6c 6f 63 |col% = w|imp_bloc|
|00005250| 6b 25 3f 32 37 20 3e 3e | 20 34 0d 1d b0 2a 20 66 |k%?27 >>| 4...* f|
|00005260| 6f 72 65 67 72 6f 75 6e | 64 5f 63 6f 6c 25 20 3d |oregroun|d_col% =|
|00005270| 20 77 69 6d 70 5f 62 6c | 6f 63 6b 25 21 32 34 20 | wimp_bl|ock%!24 |
|00005280| 3c 3c 20 34 0d 1d ba 2c | 20 66 6f 72 65 67 72 6f |<< 4...,| foregro|
|00005290| 75 6e 64 5f 63 6f 6c 25 | 20 3d 20 66 6f 72 65 67 |und_col%| = foreg|
|000052a0| 72 6f 75 6e 64 5f 63 6f | 6c 25 20 3e 3e 20 32 38 |round_co|l% >> 28|
|000052b0| 0d 1d c4 0e 20 66 6c 61 | 67 25 20 3d 20 a3 0d 1d |.... fla|g% = ...|
|000052c0| ce 26 20 e3 20 6c 6f 6f | 70 25 20 3d 20 30 20 b8 |.& . loo|p% = 0 .|
|000052d0| 20 63 61 72 64 5f 61 72 | 65 61 25 21 39 33 35 32 | card_ar|ea%!9352|
|000052e0| 20 2d 20 31 0d 1d d8 32 | 20 20 20 e7 20 69 63 6f | - 1...2| . ico|
|000052f0| 6e 25 20 3d 20 3f 28 63 | 61 72 64 5f 61 72 65 61 |n% = ?(c|ard_area|
|00005300| 25 2b 6c 6f 6f 70 25 2b | 36 38 29 20 20 66 6c 61 |%+loop%+|68) fla|
|00005310| 67 25 20 3d 20 b9 0d 1d | e2 06 20 ed 0d 1d ec 23 |g% = ...|.. ....#|
|00005320| 20 e7 20 77 69 6e 64 6f | 77 25 20 3d 20 63 61 72 | . windo|w% = car|
|00005330| 64 5f 61 72 65 61 25 21 | 31 30 32 34 30 20 8c 0d |d_area%!|10240 ..|
|00005340| 1d f6 10 20 20 20 e7 20 | 66 6c 61 67 25 20 8c 0d |... . |flag% ..|
|00005350| 1e 00 2e 20 20 20 20 20 | 73 74 72 69 6e 67 24 20 |... |string$ |
|00005360| 3d 20 a4 67 65 74 5f 73 | 74 72 69 6e 67 28 77 69 |= .get_s|tring(wi|
|00005370| 6d 70 5f 62 6c 6f 63 6b | 25 21 32 38 29 0d 1e 0a |mp_block|%!28)...|
|00005380| 08 20 20 20 cc 0d 1e 14 | 2e 20 20 20 20 20 73 74 |. ....|. st|
|00005390| 72 69 6e 67 24 20 3d 20 | a4 67 65 74 5f 73 74 72 |ring$ = |.get_str|
|000053a0| 69 6e 67 28 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 21 |ing(wimp|_block%!|
|000053b0| 32 38 29 0d 1e 1e 08 20 | 20 20 cd 0d 1e 28 06 20 |28).... | ...(. |
|000053c0| cc 0d 1e 32 2c 20 20 20 | 73 74 72 69 6e 67 24 20 |...2, |string$ |
|000053d0| 3d 20 a4 67 65 74 5f 73 | 74 72 69 6e 67 28 77 69 |= .get_s|tring(wi|
|000053e0| 6d 70 5f 62 6c 6f 63 6b | 25 2b 32 38 29 0d 1e 3c |mp_block|%+28)..<|
|000053f0| 06 20 cd 0d 1e 46 31 20 | 69 78 25 20 3d 20 77 69 |. ...F1 |ix% = wi|
|00005400| 6d 70 5f 62 6c 6f 63 6b | 25 21 38 20 20 3a 20 20 |mp_block|%!8 : |
|00005410| 69 79 25 20 3d 20 77 69 | 6d 70 5f 62 6c 6f 63 6b |iy% = wi|mp_block|
|00005420| 25 21 32 30 0d 1e 50 2e | 20 69 78 5f 73 69 7a 65 |%!20..P.| ix_size|
|00005430| 25 20 3d 20 77 69 6d 70 | 5f 62 6c 6f 63 6b 25 21 |% = wimp|_block%!|
|00005440| 31 36 20 2d 20 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |16 - wim|p_block%|
|00005450| 21 38 0d 1e 5a 38 20 69 | 79 5f 73 69 7a 65 25 20 |!8..Z8 i|y_size% |
|00005460| 3d 20 94 28 94 28 77 69 | 6d 70 5f 62 6c 6f 63 6b |= .(.(wi|mp_block|
|00005470| 25 21 32 30 29 20 2d 20 | 94 28 77 69 6d 70 5f 62 |%!20) - |.(wimp_b|
|00005480| 6c 6f 63 6b 25 21 31 32 | 29 29 0d 1e 64 2a 20 c8 |lock%!12|))..d* .|
|00005490| 99 20 22 57 69 6d 70 5f | 47 65 74 57 69 6e 64 6f |. "Wimp_|GetWindo|
|000054a0| 77 53 74 61 74 65 22 2c | 2c 77 69 6d 70 5f 62 6c |wState",|,wimp_bl|
|000054b0| 6f 63 6b 25 0d 1e 6e 28 | 20 69 78 25 2b 3d 77 69 |ock%..n(| ix%+=wi|
|000054c0| 6d 70 5f 62 6c 6f 63 6b | 25 21 34 20 2d 20 77 69 |mp_block|%!4 - wi|
|000054d0| 6d 70 5f 62 6c 6f 63 6b | 25 21 32 30 0d 1e 78 29 |mp_block|%!20..x)|
|000054e0| 20 69 79 25 2b 3d 77 69 | 6d 70 5f 62 6c 6f 63 6b | iy%+=wi|mp_block|
|000054f0| 25 21 31 36 20 2d 20 77 | 69 6d 70 5f 62 6c 6f 63 |%!16 - w|imp_bloc|
|00005500| 6b 25 21 32 34 0d 1e 82 | 06 20 e1 0d 1e 8c 04 0d |k%!24...|. ......|
|00005510| 1e 96 04 0d 1e a0 04 0d | 1e aa 32 20 f4 20 2a 20 |........|..2 . * |
|00005520| 2a 20 2a 20 20 4c 4f 41 | 44 20 41 4e 44 20 41 53 |* * LOA|D AND AS|
|00005530| 53 4f 43 49 41 54 45 44 | 20 52 4f 55 54 49 4e 45 |SOCIATED| ROUTINE|
|00005540| 53 20 20 20 2a 20 2a 20 | 2a 0d 1e b4 04 0d 1e be |S * * |*.......|
|00005550| 04 0d 1e c8 16 20 dd 20 | f2 6c 6f 61 64 5f 74 65 |..... . |.load_te|
|00005560| 6d 70 6c 61 74 65 73 0d | 1e d2 18 20 de 20 61 70 |mplates.|... . ap|
|00005570| 70 5f 73 70 72 69 74 65 | 73 25 20 35 31 32 30 0d |p_sprite|s% 5120.|
|00005580| 1e dc 1b 20 21 61 70 70 | 5f 73 70 72 69 74 65 73 |... !app|_sprites|
|00005590| 25 20 20 20 3d 20 35 31 | 32 30 0d 1e e6 18 20 61 |% = 51|20.... a|
|000055a0| 70 70 5f 73 70 72 69 74 | 65 73 25 21 34 20 20 3d |pp_sprit|es%!4 =|
|000055b0| 20 30 0d 1e f0 19 20 61 | 70 70 5f 73 70 72 69 74 | 0.... a|pp_sprit|
|000055c0| 65 73 25 21 38 20 20 3d | 20 31 36 0d 1e fa 19 20 |es%!8 =| 16.... |
|000055d0| 61 70 70 5f 73 70 72 69 | 74 65 73 25 21 31 32 20 |app_spri|tes%!12 |
|000055e0| 3d 20 31 36 0d 1f 04 3f | 20 c8 99 20 22 4f 53 5f |= 16...?| .. "OS_|
|000055f0| 53 70 72 69 74 65 4f 70 | 22 2c 32 36 36 2c 61 70 |SpriteOp|",266,ap|
|00005600| 70 5f 73 70 72 69 74 65 | 73 25 2c 22 3c 45 61 73 |p_sprite|s%,"<Eas|
|00005610| 69 42 61 73 65 24 44 69 | 72 3e 2e 53 70 72 69 74 |iBase$Di|r>.Sprit|
|00005620| 65 73 22 0d 1f 0e 2f 20 | f2 6f 70 65 6e 5f 74 65 |es".../ |.open_te|
|00005630| 6d 70 6c 61 74 65 28 22 | 3c 45 61 73 69 42 61 73 |mplate("|<EasiBas|
|00005640| 65 24 44 69 72 3e 2e 54 | 65 6d 70 6c 61 74 65 73 |e$Dir>.T|emplates|
|00005650| 22 29 0d 1f 18 2e 20 70 | 72 6f 67 49 6e 66 6f 25 |").... p|rogInfo%|
|00005660| 20 20 20 20 3d 20 a4 6c | 6f 61 64 5f 74 65 6d 70 | = .l|oad_temp|
|00005670| 6c 61 74 65 28 22 70 72 | 6f 67 49 6e 66 6f 22 29 |late("pr|ogInfo")|
|00005680| 0d 1f 22 2d 20 63 6f 6e | 74 72 6f 6c 25 20 20 20 |.."- con|trol% |
|00005690| 20 20 3d 20 a4 6c 6f 61 | 64 5f 74 65 6d 70 6c 61 | = .loa|d_templa|
|000056a0| 74 65 28 22 63 6f 6e 74 | 72 6f 6c 22 29 0d 1f 2c |te("cont|rol")..,|
|000056b0| 2c 20 73 65 61 72 63 68 | 25 20 20 20 20 20 20 3d |, search|% =|
|000056c0| 20 a4 6c 6f 61 64 5f 74 | 65 6d 70 6c 61 74 65 28 | .load_t|emplate(|
|000056d0| 22 73 65 61 72 63 68 22 | 29 0d 1f 36 2a 20 73 6f |"search"|)..6* so|
|000056e0| 72 74 25 20 20 20 20 20 | 20 20 20 3d 20 a4 6c 6f |rt% | = .lo|
|000056f0| 61 64 5f 74 65 6d 70 6c | 61 74 65 28 22 73 6f 72 |ad_templ|ate("sor|
|00005700| 74 22 29 0d 1f 40 2f 20 | 73 61 76 65 5f 65 61 73 |t")..@/ |save_eas|
|00005710| 69 25 20 20 20 3d 20 a4 | 6c 6f 61 64 5f 74 65 6d |i% = .|load_tem|
|00005720| 70 6c 61 74 65 28 22 73 | 61 76 65 5f 65 61 73 69 |plate("s|ave_easi|
|00005730| 22 29 0d 1f 4a 2e 20 73 | 61 76 65 5f 63 73 76 25 |")..J. s|ave_csv%|
|00005740| 20 20 20 20 3d 20 a4 6c | 6f 61 64 5f 74 65 6d 70 | = .l|oad_temp|
|00005750| 6c 61 74 65 28 22 73 61 | 76 65 5f 63 73 76 22 29 |late("sa|ve_csv")|
|00005760| 0d 1f 54 31 20 67 72 61 | 70 68 5f 73 65 74 75 70 |..T1 gra|ph_setup|
|00005770| 25 20 3d 20 a4 6c 6f 61 | 64 5f 74 65 6d 70 6c 61 |% = .loa|d_templa|
|00005780| 74 65 28 22 67 72 61 70 | 68 5f 73 65 74 75 70 22 |te("grap|h_setup"|
|00005790| 29 0d 1f 5e 2b 20 67 72 | 61 70 68 25 20 20 20 20 |)..^+ gr|aph% |
|000057a0| 20 20 20 3d 20 a4 6c 6f | 61 64 5f 74 65 6d 70 6c | = .lo|ad_templ|
|000057b0| 61 74 65 28 22 67 72 61 | 70 68 22 29 0d 1f 68 29 |ate("gra|ph")..h)|
|000057c0| 20 73 65 61 72 63 68 25 | 20 3d 20 a4 72 65 64 69 | search%| = .redi|
|000057d0| 72 65 63 74 5f 73 70 72 | 69 74 65 73 28 73 65 61 |rect_spr|ites(sea|
|000057e0| 72 63 68 25 29 0d 1f 72 | 27 20 73 6f 72 74 25 20 |rch%)..r|' sort% |
|000057f0| 20 20 3d 20 a4 72 65 64 | 69 72 65 63 74 5f 73 70 | = .red|irect_sp|
|00005800| 72 69 74 65 73 28 73 6f | 72 74 25 29 0d 1f 7c 34 |rites(so|rt%)..|4|
|00005810| 20 67 72 61 70 68 5f 73 | 65 74 75 70 25 20 20 3d | graph_s|etup% =|
|00005820| 20 a4 72 65 64 69 72 65 | 63 74 5f 73 70 72 69 74 | .redire|ct_sprit|
|00005830| 65 73 28 67 72 61 70 68 | 5f 73 65 74 75 70 25 29 |es(graph|_setup%)|
|00005840| 0d 1f 86 14 20 f2 63 6c | 6f 73 65 5f 74 65 6d 70 |.... .cl|ose_temp|
|00005850| 6c 61 74 65 0d 1f 90 06 | 20 e1 0d 1f 9a 04 0d 1f |late....| .......|
|00005860| a4 04 0d 1f ae 21 20 dd | 20 a4 72 65 64 69 72 65 |.....! .| .redire|
|00005870| 63 74 5f 73 70 72 69 74 | 65 73 28 68 61 6e 64 6c |ct_sprit|es(handl|
|00005880| 65 25 29 0d 1f b8 1b 20 | 21 77 69 6d 70 5f 62 6c |e%).... |!wimp_bl|
|00005890| 6f 63 6b 25 20 3d 20 68 | 61 6e 64 6c 65 25 0d 1f |ock% = h|andle%..|
|000058a0| c2 29 20 c8 99 20 22 57 | 69 6d 70 5f 47 65 74 57 |.) .. "W|imp_GetW|
|000058b0| 69 6e 64 6f 77 49 6e 66 | 6f 22 2c 2c 77 69 6d 70 |indowInf|o",,wimp|
|000058c0| 5f 62 6c 6f 63 6b 25 0d | 1f cc 22 20 77 69 6d 70 |_block%.|.." wimp|
|000058d0| 5f 62 6c 6f 63 6b 25 21 | 36 38 20 3d 20 61 70 70 |_block%!|68 = app|
|000058e0| 5f 73 70 72 69 74 65 73 | 25 0d 1f d6 28 20 c8 99 |_sprites|%...( ..|
|000058f0| 20 22 57 69 6d 70 5f 44 | 65 6c 65 74 65 57 69 6e | "Wimp_D|eleteWin|
|00005900| 64 6f 77 22 2c 2c 77 69 | 6d 70 5f 62 6c 6f 63 6b |dow",,wi|mp_block|
|00005910| 25 0d 1f e0 34 20 c8 99 | 20 22 57 69 6d 70 5f 43 |%...4 ..| "Wimp_C|
|00005920| 72 65 61 74 65 57 69 6e | 64 6f 77 22 2c 2c 77 69 |reateWin|dow",,wi|
|00005930| 6d 70 5f 62 6c 6f 63 6b | 25 2b 34 20 b8 20 68 61 |mp_block|%+4 . ha|
|00005940| 6e 64 6c 65 25 0d 1f ea | 0e 20 3d 20 68 61 6e 64 |ndle%...|. = hand|
|00005950| 6c 65 25 0d 1f f4 04 0d | 1f fe 04 0d 20 08 11 20 |le%.....|.... .. |
|00005960| dd 20 f2 64 61 74 61 5f | 6c 6f 61 64 0d 20 12 3d |. .data_|load. .=|
|00005970| 20 f2 67 65 74 5f 64 61 | 74 61 5f 6c 6f 61 64 5f | .get_da|ta_load_|
|00005980| 69 6e 66 6f 28 6d 79 5f | 72 65 66 25 2c 73 69 7a |info(my_|ref%,siz|
|00005990| 65 25 2c 66 69 6c 65 5f | 74 79 70 65 25 2c 66 69 |e%,file_|type%,fi|
|000059a0| 6c 65 5f 6e 61 6d 65 24 | 29 0d 20 1c 1a 20 e7 20 |le_name$|). .. . |
|000059b0| 66 69 6c 65 5f 74 79 70 | 65 25 20 3d 20 26 46 46 |file_typ|e% = &FF|
|000059c0| 44 20 8c 0d 20 26 12 20 | 20 20 f2 63 68 65 63 6b |D .. &. | .check|
|000059d0| 5f 66 69 6c 65 0d 20 30 | 06 20 cc 0d 20 3a 2a 20 |_file. 0|. .. :* |
|000059e0| 20 20 c8 99 20 22 4f 53 | 5f 46 69 6c 65 22 2c 35 | .. "OS|_File",5|
|000059f0| 2c 66 69 6c 65 5f 6e 61 | 6d 65 24 20 b8 20 72 65 |,file_na|me$ . re|
|00005a00| 73 75 6c 74 25 0d 20 44 | 26 20 20 20 e7 20 72 65 |sult%. D|& . re|
|00005a10| 73 75 6c 74 25 20 3d 20 | 32 20 20 f2 63 68 65 63 |sult% = |2 .chec|
|00005a20| 6b 5f 64 69 72 65 63 74 | 6f 72 79 0d 20 4e 06 20 |k_direct|ory. N. |
|00005a30| cd 0d 20 58 06 20 e1 0d | 20 62 04 0d 20 6c 04 0d |.. X. ..| b.. l..|
|00005a40| 20 76 1a 20 dd 20 f2 6c | 6f 61 64 5f 6f 74 68 65 | v. . .l|oad_othe|
|00005a50| 72 28 76 61 6c 75 65 25 | 29 0d 20 80 51 20 e7 20 |r(value%|). .Q . |
|00005a60| 76 61 6c 75 65 25 20 3d | 20 30 20 20 66 69 6c 65 |value% =| 0 file|
|00005a70| 5f 6e 61 6d 65 24 20 3d | 20 c0 66 69 6c 65 5f 6e |_name$ =| .file_n|
|00005a80| 61 6d 65 24 2c a9 28 66 | 69 6c 65 5f 6e 61 6d 65 |ame$,.(f|ile_name|
|00005a90| 24 29 2d 34 29 2b 22 43 | 61 72 64 22 20 3a 20 20 |$)-4)+"C|ard" : |
|00005aa0| f2 6c 6f 61 64 5f 63 61 | 72 64 0d 20 8a 51 20 e7 |.load_ca|rd. .Q .|
|00005ab0| 20 76 61 6c 75 65 25 20 | 3d 20 31 20 20 66 69 6c | value% |= 1 fil|
|00005ac0| 65 5f 6e 61 6d 65 24 20 | 3d 20 c0 66 69 6c 65 5f |e_name$ |= .file_|
|00005ad0| 6e 61 6d 65 24 2c a9 28 | 66 69 6c 65 5f 6e 61 6d |name$,.(|file_nam|
|00005ae0| 65 24 29 2d 34 29 2b 22 | 45 61 73 69 22 20 3a 20 |e$)-4)+"|Easi" : |
|00005af0| 20 f2 6c 6f 61 64 5f 64 | 61 74 61 0d 20 94 7b 20 | .load_d|ata. .{ |
|00005b00| e7 20 a4 66 69 6e 64 5f | 66 69 6c 65 28 c0 66 69 |. .find_|file(.fi|
|00005b10| 6c 65 5f 6e 61 6d 65 24 | 2c a9 28 66 69 6c 65 5f |le_name$|,.(file_|
|00005b20| 6e 61 6d 65 24 29 2d 34 | 29 2b 22 53 70 72 69 74 |name$)-4|)+"Sprit|
|00005b30| 65 73 22 29 20 20 c8 99 | 20 22 4f 53 5f 53 70 72 |es") ..| "OS_Spr|
|00005b40| 69 74 65 4f 70 22 2c 32 | 36 36 2c 73 70 72 69 74 |iteOp",2|66,sprit|
|00005b50| 65 5f 61 72 65 61 25 2c | c0 66 69 6c 65 24 2c a9 |e_area%,|.file$,.|
|00005b60| 28 66 69 6c 65 24 29 2d | 34 29 2b 22 53 70 72 69 |(file$)-|4)+"Spri|
|00005b70| 74 65 73 22 2c 30 0d 20 | 9e 0f 20 f2 61 75 74 6f |tes",0. |.. .auto|
|00005b80| 5f 73 6f 72 74 0d 20 a8 | 06 20 e1 0d 20 b2 04 0d |_sort. .|. .. ...|
|00005b90| 20 bc 04 0d 20 c6 11 20 | dd 20 f2 6c 6f 61 64 5f | ... .. |. .load_|
|00005ba0| 64 61 74 61 0d 20 d0 2d | 20 c8 99 20 22 4f 53 5f |data. .-| .. "OS_|
|00005bb0| 46 69 6c 65 22 2c 26 46 | 46 2c 66 69 6c 65 5f 6e |File",&F|F,file_n|
|00005bc0| 61 6d 65 24 2c 64 61 74 | 61 5f 61 72 65 61 25 2c |ame$,dat|a_area%,|
|00005bd0| 30 0d 20 da 15 20 e3 20 | 6c 6f 6f 70 25 20 3d 20 |0. .. . |loop% = |
|00005be0| 31 20 b8 20 35 30 0d 20 | e4 26 20 20 20 3f 28 64 |1 . 50. |.& ?(d|
|00005bf0| 61 74 61 5f 61 72 65 61 | 25 2b 31 32 37 2b 6c 6f |ata_area|%+127+lo|
|00005c00| 6f 70 25 29 20 3d 20 6c | 6f 6f 70 25 0d 20 ee 06 |op%) = l|oop%. ..|
|00005c10| 20 ed 0d 20 f8 1c 20 65 | 61 73 69 5f 73 61 76 65 | .. .. e|asi_save|
|00005c20| 24 20 3d 20 66 69 6c 65 | 5f 6e 61 6d 65 24 0d 21 |$ = file|_name$.!|
|00005c30| 02 13 20 73 61 76 65 5f | 74 79 70 65 25 20 3d 20 |.. save_|type% = |
|00005c40| 31 0d 21 0c 15 20 64 61 | 74 61 5f 61 72 65 61 25 |1.!.. da|ta_area%|
|00005c50| 21 38 20 3d 20 31 0d 21 | 16 14 20 61 24 20 3d 20 |!8 = 1.!|.. a$ = |
|00005c60| 66 69 6c 65 5f 6e 61 6d | 65 24 0d 21 20 10 20 c8 |file_nam|e$.! . .|
|00005c70| 95 20 a7 61 24 2c 22 2e | 22 29 0d 21 2a 17 20 20 |. .a$,".|").!*. |
|00005c80| 20 6f 6c 64 5f 73 74 72 | 69 6e 67 24 20 3d 20 61 | old_str|ing$ = a|
|00005c90| 24 0d 21 34 19 20 20 20 | 61 24 3d c1 61 24 2c a7 |$.!4. |a$=.a$,.|
|00005ca0| 61 24 2c 22 2e 22 29 2b | 31 29 0d 21 3e 06 20 ce |a$,".")+|1).!>. .|
|00005cb0| 0d 21 48 34 20 6f 6c 64 | 5f 73 74 72 69 6e 67 24 |.!H4 old|_string$|
|00005cc0| 20 3d 20 c0 6f 6c 64 5f | 73 74 72 69 6e 67 24 2c | = .old_|string$,|
|00005cd0| a7 6f 6c 64 5f 73 74 72 | 69 6e 67 24 2c 22 2e 22 |.old_str|ing$,"."|
|00005ce0| 29 2d 31 29 0d 21 52 27 | 20 24 28 63 61 72 64 5f |)-1).!R'| $(card_|
|00005cf0| 61 72 65 61 25 20 2b 20 | 36 32 37 36 29 20 3d 20 |area% + |6276) = |
|00005d00| 6f 6c 64 5f 73 74 72 69 | 6e 67 24 0d 21 5c 39 20 |old_stri|ng$.!\9 |
|00005d10| f2 69 6e 64 69 72 65 63 | 74 65 64 5f 69 63 6f 6e |.indirec|ted_icon|
|00005d20| 5f 73 74 72 69 6e 67 5f | 73 65 74 28 73 61 76 65 |_string_|set(save|
|00005d30| 5f 65 61 73 69 25 2c 31 | 2c 65 61 73 69 5f 73 61 |_easi%,1|,easi_sa|
|00005d40| 76 65 24 29 0d 21 66 38 | 20 f2 64 69 72 65 63 74 |ve$).!f8| .direct|
|00005d50| 5f 69 63 6f 6e 5f 73 74 | 72 69 6e 67 5f 73 65 74 |_icon_st|ring_set|
|00005d60| 28 63 6f 6e 74 72 6f 6c | 25 2c 38 2c c3 28 64 61 |(control|%,8,.(da|
|00005d70| 74 61 5f 61 72 65 61 25 | 21 34 29 29 0d 21 70 06 |ta_area%|!4)).!p.|
|00005d80| 20 e1 0d 21 7a 04 0d 21 | 84 04 0d 21 8e 11 20 dd | ..!z..!|...!.. .|
|00005d90| 20 f2 6c 6f 61 64 5f 63 | 61 72 64 0d 21 98 14 20 | .load_c|ard.!.. |
|00005da0| f2 69 6e 69 74 5f 76 61 | 72 69 61 62 6c 65 73 0d |.init_va|riables.|
|00005db0| 21 a2 13 20 65 61 73 69 | 5f 6c 6f 61 64 25 20 3d |!.. easi|_load% =|
|00005dc0| 20 b9 0d 21 ac 2d 20 c8 | 99 20 22 4f 53 5f 46 69 | ..!.- .|. "OS_Fi|
|00005dd0| 6e 64 22 2c 31 2c 66 69 | 6c 65 5f 6e 61 6d 65 24 |nd",1,fi|le_name$|
|00005de0| 20 b8 20 66 69 6c 65 5f | 68 61 6e 64 6c 65 25 0d | . file_|handle%.|
|00005df0| 21 b6 2f 20 c8 99 20 22 | 4f 53 5f 47 42 50 42 22 |!./ .. "|OS_GBPB"|
|00005e00| 2c 33 2c 66 69 6c 65 5f | 68 61 6e 64 6c 65 25 2c |,3,file_|handle%,|
|00005e10| 63 61 72 64 5f 61 72 65 | 61 25 2c 34 2c 30 0d 21 |card_are|a%,4,0.!|
|00005e20| c0 20 20 c8 99 20 22 4f | 53 5f 46 69 6e 64 22 2c |. .. "O|S_Find",|
|00005e30| 30 2c 66 69 6c 65 5f 68 | 61 6e 64 6c 65 25 0d 21 |0,file_h|andle%.!|
|00005e40| ca 2d 20 c8 99 20 22 4f | 53 5f 46 69 6c 65 22 2c |.- .. "O|S_File",|
|00005e50| 26 46 46 2c 66 69 6c 65 | 5f 6e 61 6d 65 24 2c 63 |&FF,file|_name$,c|
|00005e60| 61 72 64 5f 61 72 65 61 | 25 2c 30 0d 21 d4 38 20 |ard_area|%,0.!.8 |
|00005e70| e7 20 63 61 72 64 5f 61 | 72 65 61 25 21 39 33 34 |. card_a|rea%!934|
|00005e80| 38 20 3c 3e 20 30 20 20 | f2 72 65 64 69 72 65 63 |8 <> 0 |.redirec|
|00005e90| 74 5f 69 63 6f 6e 73 28 | 34 2c 31 34 38 2c 39 33 |t_icons(|4,148,93|
|00005ea0| 34 38 29 0d 21 de 3a 20 | e7 20 63 61 72 64 5f 61 |48).!.: |. card_a|
|00005eb0| 72 65 61 25 21 39 33 35 | 32 20 3c 3e 20 30 20 20 |rea%!935|2 <> 0 |
|00005ec0| f2 72 65 64 69 72 65 63 | 74 5f 69 63 6f 6e 73 28 |.redirec|t_icons(|
|00005ed0| 36 38 2c 33 32 32 30 2c | 39 33 35 32 29 0d 21 e8 |68,3220,|9352).!.|
|00005ee0| 1b 20 63 61 72 64 5f 61 | 72 65 61 25 21 31 30 32 |. card_a|rea%!102|
|00005ef0| 36 38 20 3d 20 2d 31 30 | 0d 21 f2 24 20 63 61 72 |68 = -10|.!.$ car|
|00005f00| 64 5f 61 72 65 61 25 21 | 31 30 33 30 38 20 3d 20 |d_area%!|10308 = |
|00005f10| 73 70 72 69 74 65 5f 61 | 72 65 61 25 0d 21 fc 29 |sprite_a|rea%.!.)|
|00005f20| 20 63 61 72 64 5f 61 72 | 65 61 25 21 31 30 33 31 | card_ar|ea%!1031|
|00005f30| 36 20 3d 20 63 61 72 64 | 5f 61 72 65 61 25 20 2b |6 = card|_area% +|
|00005f40| 20 36 32 37 36 0d 22 06 | 41 20 c8 99 20 22 57 69 | 6276.".|A .. "Wi|
|00005f50| 6d 70 5f 43 72 65 61 74 | 65 57 69 6e 64 6f 77 22 |mp_Creat|eWindow"|
|00005f60| 2c 2c 63 61 72 64 5f 61 | 72 65 61 25 2b 31 30 32 |,,card_a|rea%+102|
|00005f70| 34 34 20 b8 20 20 63 61 | 72 64 5f 61 72 65 61 25 |44 . ca|rd_area%|
|00005f80| 21 31 30 32 34 30 0d 22 | 10 1a 20 63 61 72 64 5f |!10240."|.. card_|
|00005f90| 61 72 65 61 25 21 31 30 | 32 36 38 20 3d 20 2d 31 |area%!10|268 = -1|
|00005fa0| 0d 22 1a 2b 20 c8 99 20 | 22 57 69 6d 70 5f 4f 70 |.".+ .. |"Wimp_Op|
|00005fb0| 65 6e 57 69 6e 64 6f 77 | 22 2c 2c 63 61 72 64 5f |enWindow|",,card_|
|00005fc0| 61 72 65 61 25 2b 31 30 | 32 34 30 0d 22 24 1c 20 |area%+10|240."$. |
|00005fd0| 21 77 69 6d 70 5f 62 6c | 6f 63 6b 25 20 3d 20 63 |!wimp_bl|ock% = c|
|00005fe0| 6f 6e 74 72 6f 6c 25 0d | 22 2e 29 20 c8 99 20 22 |ontrol%.|".) .. "|
|00005ff0| 57 69 6d 70 5f 47 65 74 | 57 69 6e 64 6f 77 49 6e |Wimp_Get|WindowIn|
|00006000| 66 6f 22 2c 2c 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |fo",,wim|p_block%|
|00006010| 0d 22 38 28 20 c8 99 20 | 22 57 69 6d 70 5f 44 65 |."8( .. |"Wimp_De|
|00006020| 6c 65 74 65 57 69 6e 64 | 6f 77 22 2c 2c 77 69 6d |leteWind|ow",,wim|
|00006030| 70 5f 62 6c 6f 63 6b 25 | 0d 22 42 22 20 77 69 6d |p_block%|."B" wim|
|00006040| 70 5f 62 6c 6f 63 6b 25 | 21 36 38 20 3d 20 61 70 |p_block%|!68 = ap|
|00006050| 70 5f 73 70 72 69 74 65 | 73 25 0d 22 4c 35 20 c8 |p_sprite|s%."L5 .|
|00006060| 99 20 22 57 69 6d 70 5f | 43 72 65 61 74 65 57 69 |. "Wimp_|CreateWi|
|00006070| 6e 64 6f 77 22 2c 2c 77 | 69 6d 70 5f 62 6c 6f 63 |ndow",,w|imp_bloc|
|00006080| 6b 25 2b 34 20 b8 20 63 | 6f 6e 74 72 6f 6c 25 0d |k%+4 . c|ontrol%.|
|00006090| 22 56 1d 20 21 77 69 6d | 70 5f 62 6c 6f 63 6b 25 |"V. !wim|p_block%|
|000060a0| 20 3d 20 20 63 6f 6e 74 | 72 6f 6c 25 0d 22 60 18 | = cont|rol%."`.|
|000060b0| 20 77 69 6d 70 5f 62 6c | 6f 63 6b 25 21 32 38 20 | wimp_bl|ock%!28 |
|000060c0| 3d 20 2d 31 0d 22 6a 26 | 20 c8 99 20 22 57 69 6d |= -1."j&| .. "Wim|
|000060d0| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 77 |p_OpenWi|ndow",,w|
|000060e0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 0d 22 74 24 20 f2 |imp_bloc|k%."t$ .|
|000060f0| 69 63 6f 6e 5f 66 6c 61 | 67 5f 63 6c 65 61 72 28 |icon_fla|g_clear(|
|00006100| 63 6f 6e 74 72 6f 6c 25 | 2c 36 2c 32 31 29 0d 22 |control%|,6,21)."|
|00006110| 7e 24 20 f2 69 63 6f 6e | 5f 66 6c 61 67 5f 63 6c |~$ .icon|_flag_cl|
|00006120| 65 61 72 28 63 6f 6e 74 | 72 6f 6c 25 2c 37 2c 32 |ear(cont|rol%,7,2|
|00006130| 31 29 0d 22 88 11 20 f2 | 63 68 65 63 6b 5f 66 6f |1).".. .|check_fo|
|00006140| 6e 74 73 0d 22 92 06 20 | e1 0d 22 9c 04 0d 22 a6 |nts.".. |.."...".|
|00006150| 04 0d 22 b0 20 20 dd 20 | f2 6c 6f 61 64 5f 73 70 |..". . |.load_sp|
|00006160| 72 69 74 65 73 28 66 69 | 6c 65 5f 6e 61 6d 65 24 |rites(fi|le_name$|
|00006170| 29 0d 22 ba 2c 20 66 69 | 6c 65 5f 6c 65 6e 67 74 |)."., fi|le_lengt|
|00006180| 68 25 20 3d 20 a4 66 69 | 6c 65 5f 6c 65 6e 67 74 |h% = .fi|le_lengt|
|00006190| 68 28 66 69 6c 65 5f 6e | 61 6d 65 24 29 0d 22 c4 |h(file_n|ame$).".|
|000061a0| 37 20 c8 99 20 22 4f 53 | 5f 53 70 72 69 74 65 4f |7 .. "OS|_SpriteO|
|000061b0| 70 22 2c 32 36 34 2c 73 | 70 72 69 74 65 5f 61 72 |p",264,s|prite_ar|
|000061c0| 65 61 25 20 b8 20 2c 2c | 2c 2c 2c 73 75 62 74 72 |ea% . ,,|,,,subtr|
|000061d0| 61 63 74 25 0d 22 ce 25 | 20 73 70 72 69 74 65 5f |act%.".%| sprite_|
|000061e0| 66 72 65 65 25 20 3d 20 | 36 35 35 33 36 20 2d 20 |free% = |65536 - |
|000061f0| 73 75 62 74 72 61 63 74 | 25 0d 22 d8 24 20 e7 20 |subtract|%.".$ . |
|00006200| 66 69 6c 65 5f 6c 65 6e | 67 74 68 25 20 3e 20 73 |file_len|gth% > s|
|00006210| 70 72 69 74 65 5f 66 72 | 65 65 25 20 8c 0d 22 e2 |prite_fr|ee% ..".|
|00006220| 53 20 20 20 f2 6f 6b 28 | 22 43 61 72 64 45 64 20 |S .ok(|"CardEd |
|00006230| 64 6f 65 73 20 6e 6f 74 | 20 68 61 76 65 20 72 6f |does not| have ro|
|00006240| 6f 6d 20 66 6f 72 20 74 | 68 69 73 20 73 70 72 69 |om for t|his spri|
|00006250| 74 65 20 66 69 6c 65 2e | 22 2c 22 4d 65 73 73 61 |te file.|","Messa|
|00006260| 67 65 20 66 72 6f 6d 20 | 43 61 72 64 45 64 22 29 |ge from |CardEd")|
|00006270| 0d 22 ec 08 20 20 20 e1 | 0d 22 f6 06 20 cd 0d 23 |.".. .|.".. ..#|
|00006280| 00 31 20 c8 99 20 22 4f | 53 5f 53 70 72 69 74 65 |.1 .. "O|S_Sprite|
|00006290| 4f 70 22 2c 32 36 37 2c | 73 70 72 69 74 65 5f 61 |Op",267,|sprite_a|
|000062a0| 72 65 61 25 2c 66 69 6c | 65 5f 6e 61 6d 65 24 0d |rea%,fil|e_name$.|
|000062b0| 23 0a 2a 20 f2 73 65 6e | 64 5f 6d 65 73 73 61 67 |#.* .sen|d_messag|
|000062c0| 65 28 64 61 74 61 5f 6c | 6f 61 64 5f 61 63 6b 25 |e(data_l|oad_ack%|
|000062d0| 2c 6d 79 5f 72 65 66 25 | 29 0d 23 14 06 20 e1 0d |,my_ref%|).#.. ..|
|000062e0| 23 1e 04 0d 23 28 04 0d | 23 32 04 0d 23 3c 35 20 |#...#(..|#2..#<5 |
|000062f0| f4 20 2a 20 2a 20 2a 20 | 20 20 53 45 41 52 43 48 |. * * * | SEARCH|
|00006300| 20 41 4e 44 20 41 53 53 | 4f 43 49 41 54 45 44 20 | AND ASS|OCIATED |
|00006310| 52 4f 55 54 49 4e 45 53 | 20 20 20 2a 20 2a 20 2a |ROUTINES| * * *|
|00006320| 0d 23 46 04 0d 23 50 04 | 0d 23 5a 19 20 dd 20 f2 |.#F..#P.|.#Z. . .|
|00006330| 73 68 6f 77 5f 73 65 61 | 72 63 68 5f 70 61 6e 65 |show_sea|rch_pane|
|00006340| 6c 0d 23 64 1a 20 e7 20 | 73 6f 72 74 5f 6d 6f 64 |l.#d. . |sort_mod|
|00006350| 65 25 20 20 20 3d 20 b9 | 20 20 e1 0d 23 6e 1a 20 |e% = .| ..#n. |
|00006360| e7 20 67 72 61 70 68 5f | 6d 6f 64 65 25 20 20 3d |. graph_|mode% =|
|00006370| 20 b9 20 20 e1 0d 23 78 | 1a 20 e7 20 73 65 6c 65 | . ..#x|. . sele|
|00006380| 63 74 5f 6d 6f 64 65 25 | 20 3d 20 b9 20 20 e1 0d |ct_mode%| = . ..|
|00006390| 23 82 1a 20 e7 20 73 65 | 61 72 63 68 5f 6d 6f 64 |#.. . se|arch_mod|
|000063a0| 65 25 20 3d 20 b9 20 20 | e1 0d 23 8c 1b 20 21 77 |e% = . |..#.. !w|
|000063b0| 69 6d 70 5f 62 6c 6f 63 | 6b 25 20 3d 20 73 65 61 |imp_bloc|k% = sea|
|000063c0| 72 63 68 25 0d 23 96 2a | 20 c8 99 20 22 57 69 6d |rch%.#.*| .. "Wim|
|000063d0| 70 5f 47 65 74 57 69 6e | 64 6f 77 53 74 61 74 65 |p_GetWin|dowState|
|000063e0| 22 2c 2c 77 69 6d 70 5f | 62 6c 6f 63 6b 25 0d 23 |",,wimp_|block%.#|
|000063f0| a0 40 20 77 69 6d 70 5f | 62 6c 6f 63 6b 25 21 38 |.@ wimp_|block%!8|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
