home *** CD-ROM | disk | FTP | other *** search
Unknown | 1993-02-27 | 10.4 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
|
---|
100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 01 14 2a 7c 73 74 | 61 72 74 20 54 72 61 6e |....*|st|art Tran|
|00000010| 73 66 65 72 0d 00 02 21 | 2a 7c 21 57 69 6d 70 20 |sfer...!|*|!Wimp |
|00000020| 44 61 74 61 20 54 72 61 | 6e 73 66 65 72 20 4c 69 |Data Tra|nsfer Li|
|00000030| 62 72 61 72 79 0d 00 03 | 07 2a 7c 21 0d 00 04 37 |brary...|.*|!...7|
|00000040| 2a 7c 21 56 65 72 73 69 | 6f 6e 20 31 2e 31 32 20 |*|!Versi|on 1.12 |
|00000050| 2d 20 28 43 29 20 54 6f | 6d 20 48 75 67 68 65 73 |- (C) To|m Hughes|
|00000060| 20 32 36 74 68 20 46 65 | 62 72 75 61 72 79 20 31 | 26th Fe|bruary 1|
|00000070| 39 39 33 0d 00 05 07 2a | 7c 21 0d 00 06 4b 2a 7c |993....*||!...K*||
|00000080| 21 54 68 69 73 20 6c 69 | 62 72 61 72 79 20 70 72 |!This li|brary pr|
|00000090| 6f 76 69 64 65 73 20 61 | 20 6e 75 6d 62 65 72 20 |ovides a| number |
|000000a0| 6f 66 20 72 6f 75 74 69 | 6e 65 73 20 74 6f 20 68 |of routi|nes to h|
|000000b0| 65 6c 70 20 68 61 6e 64 | 6c 65 20 73 61 76 69 6e |elp hand|le savin|
|000000c0| 67 20 61 6e 64 0d 00 07 | 2c 2a 7c 21 6c 6f 61 64 |g and...|,*|!load|
|000000d0| 69 6e 67 20 6f 66 20 64 | 61 74 61 20 74 6f 2f 66 |ing of d|ata to/f|
|000000e0| 72 6f 6d 20 61 70 70 6c | 69 63 61 74 69 6f 6e 73 |rom appl|ications|
|000000f0| 2e 0d 00 08 07 2a 7c 21 | 0d 00 09 49 2a 7c 21 49 |.....*|!|...I*|!I|
|00000100| 66 20 79 6f 75 72 20 70 | 72 6f 67 72 61 6d 20 77 |f your p|rogram w|
|00000110| 69 73 68 65 73 20 74 6f | 20 61 6c 6c 6f 77 20 6c |ishes to| allow l|
|00000120| 6f 61 64 69 6e 67 20 6f | 66 20 66 69 6c 65 73 2c |oading o|f files,|
|00000130| 20 69 74 20 73 68 6f 75 | 6c 64 20 64 65 66 69 6e | it shou|ld defin|
|00000140| 65 0d 00 0a 34 2a 7c 21 | 74 77 6f 20 63 61 6c 6c |e...4*|!|two call|
|00000150| 62 61 63 6b 20 72 6f 75 | 74 69 6e 65 73 2e 20 54 |back rou|tines. T|
|00000160| 68 65 20 66 69 72 73 74 | 20 6f 66 20 74 68 65 73 |he first| of thes|
|00000170| 65 20 69 73 3a 0d 00 0b | 07 2a 7c 21 0d 00 0c 37 |e is:...|.*|!...7|
|00000180| 2a 7c 21 20 20 20 20 46 | 4e 74 72 61 6e 73 66 65 |*|! F|Ntransfe|
|00000190| 72 5f 77 69 6c 6c 6c 6f | 61 64 28 20 66 69 6c 65 |r_willlo|ad( file|
|000001a0| 5f 74 79 70 65 20 2c 20 | 64 61 74 61 5f 6f 70 65 |_type , |data_ope|
|000001b0| 6e 20 29 0d 00 0d 07 2a | 7c 21 0d 00 0e 4c 2a 7c |n )....*||!...L*||
|000001c0| 21 54 68 69 73 20 72 6f | 75 74 69 6e 65 20 73 68 |!This ro|utine sh|
|000001d0| 6f 75 6c 64 20 72 65 74 | 75 72 6e 20 74 72 75 65 |ould ret|urn true|
|000001e0| 20 69 66 20 79 6f 75 72 | 20 70 72 6f 67 72 61 6d | if your| program|
|000001f0| 20 69 73 20 70 72 65 70 | 61 72 65 64 20 74 6f 20 | is prep|ared to |
|00000200| 6c 6f 61 64 20 61 0d 00 | 0f 4b 2a 7c 21 66 69 6c |load a..|.K*|!fil|
|00000210| 65 20 6f 66 20 74 68 65 | 20 73 70 65 63 69 66 69 |e of the| specifi|
|00000220| 65 64 20 74 79 70 65 2e | 20 49 66 20 27 64 61 74 |ed type.| If 'dat|
|00000230| 61 5f 6f 70 65 6e 27 20 | 69 73 20 54 52 55 45 20 |a_open' |is TRUE |
|00000240| 74 68 65 6e 20 74 68 65 | 20 66 69 6c 65 20 77 61 |then the| file wa|
|00000250| 73 0d 00 10 38 2a 7c 21 | 62 72 6f 61 64 63 61 73 |s...8*|!|broadcas|
|00000260| 74 20 75 70 6f 6e 20 61 | 20 64 6f 75 62 6c 65 20 |t upon a| double |
|00000270| 63 6c 69 63 6b 20 28 44 | 61 74 61 4f 70 65 6e 20 |click (D|ataOpen |
|00000280| 6d 65 73 73 61 67 65 29 | 2e 0d 00 11 42 2a 7c 21 |message)|....B*|!|
|00000290| 54 68 65 20 73 65 63 6f | 6e 64 20 72 6f 75 74 69 |The seco|nd routi|
|000002a0| 6e 65 20 77 68 69 63 68 | 20 6d 75 73 74 20 62 65 |ne which| must be|
|000002b0| 20 70 72 6f 76 69 64 65 | 64 20 69 73 20 74 68 65 | provide|d is the|
|000002c0| 20 66 6f 6c 6c 6f 77 69 | 6e 67 3a 0d 00 12 07 2a | followi|ng:....*|
|000002d0| 7c 21 0d 00 13 43 2a 7c | 21 20 20 20 20 50 52 4f ||!...C*||! PRO|
|000002e0| 43 74 72 61 6e 73 66 65 | 72 5f 6c 6f 61 64 66 69 |Ctransfe|r_loadfi|
|000002f0| 6c 65 28 20 66 69 6c 65 | 5f 6e 61 6d 65 20 2c 20 |le( file|_name , |
|00000300| 66 69 6c 65 5f 74 79 70 | 65 20 2c 20 69 73 5f 73 |file_typ|e , is_s|
|00000310| 61 66 65 20 29 0d 00 14 | 07 2a 7c 21 0d 00 15 4c |afe )...|.*|!...L|
|00000320| 2a 7c 21 54 68 69 73 20 | 72 6f 75 74 69 6e 65 20 |*|!This |routine |
|00000330| 69 73 20 63 61 6c 6c 65 | 64 20 74 6f 20 61 73 6b |is calle|d to ask|
|00000340| 20 74 68 65 20 70 72 6f | 67 72 61 6d 20 74 6f 20 | the pro|gram to |
|00000350| 6c 6f 61 64 20 74 68 65 | 20 73 70 65 63 69 66 69 |load the| specifi|
|00000360| 65 64 20 66 69 6c 65 2c | 0d 00 16 4b 2a 7c 21 77 |ed file,|...K*|!w|
|00000370| 68 6f 73 65 20 74 79 70 | 65 20 69 73 20 61 6c 73 |hose typ|e is als|
|00000380| 6f 20 70 72 6f 76 69 64 | 65 64 2e 20 54 68 65 20 |o provid|ed. The |
|00000390| 62 6f 6f 6c 65 61 6e 20 | 70 61 72 61 6d 65 74 65 |boolean |paramete|
|000003a0| 72 20 69 73 5f 73 61 66 | 65 20 69 6e 64 69 63 61 |r is_saf|e indica|
|000003b0| 74 65 73 0d 00 17 36 2a | 7c 21 77 68 65 74 68 65 |tes...6*||!whethe|
|000003c0| 72 20 74 68 65 20 66 69 | 6c 65 20 68 61 73 20 63 |r the fi|le has c|
|000003d0| 6f 6d 65 20 66 72 6f 6d | 20 61 20 27 73 61 66 65 |ome from| a 'safe|
|000003e0| 27 20 73 6f 75 72 63 65 | 2e 0d 00 18 07 2a 7c 21 |' source|.....*|!|
|000003f0| 0d 00 19 4b 2a 7c 21 49 | 66 20 79 6f 75 72 20 70 |...K*|!I|f your p|
|00000400| 72 6f 67 72 61 6d 20 63 | 61 6e 20 70 72 69 6e 74 |rogram c|an print|
|00000410| 20 66 69 6c 65 73 20 6f | 66 20 61 20 67 69 76 65 | files o|f a give|
|00000420| 6e 20 74 79 70 65 2c 20 | 69 74 20 73 68 6f 75 6c |n type, |it shoul|
|00000430| 64 20 70 72 6f 76 69 64 | 65 20 61 0d 00 1a 48 2a |d provid|e a...H*|
|00000440| 7c 21 72 6f 75 74 69 6e | 65 20 77 68 69 63 68 20 ||!routin|e which |
|00000450| 72 65 74 75 72 6e 73 20 | 54 52 55 45 20 6f 72 20 |returns |TRUE or |
|00000460| 46 41 4c 53 45 20 74 6f | 20 69 6e 64 69 63 61 74 |FALSE to| indicat|
|00000470| 65 20 77 68 65 74 68 65 | 72 20 6f 72 20 6e 6f 74 |e whethe|r or not|
|00000480| 20 69 74 0d 00 1b 23 2a | 7c 21 63 61 6e 20 70 72 | it...#*||!can pr|
|00000490| 69 6e 74 20 61 20 67 69 | 76 65 6e 20 66 69 6c 65 |int a gi|ven file|
|000004a0| 20 74 79 70 65 3a 0d 00 | 1c 07 2a 7c 21 0d 00 1d | type:..|..*|!...|
|000004b0| 2e 2a 7c 21 20 20 20 20 | 50 52 4f 43 74 72 61 6e |.*|! |PROCtran|
|000004c0| 73 66 65 72 5f 77 69 6c | 6c 70 72 69 6e 74 28 20 |sfer_wil|lprint( |
|000004d0| 66 69 6c 65 5f 74 79 70 | 65 20 29 0d 00 1e 07 2a |file_typ|e )....*|
|000004e0| 7c 21 0d 00 1f 48 2a 7c | 21 49 74 20 73 68 6f 75 ||!...H*||!It shou|
|000004f0| 6c 64 20 61 6c 73 6f 20 | 70 72 6f 76 69 64 65 20 |ld also |provide |
|00000500| 50 52 4f 43 74 72 61 6e | 73 66 65 72 5f 70 72 69 |PROCtran|sfer_pri|
|00000510| 6e 74 66 69 6c 65 2c 20 | 77 68 69 63 68 20 69 73 |ntfile, |which is|
|00000520| 20 64 65 73 63 72 69 62 | 65 64 0d 00 20 2b 2a 7c | describ|ed.. +*||
|00000530| 21 62 65 6c 6f 77 20 75 | 6e 64 65 72 20 50 52 4f |!below u|nder PRO|
|00000540| 43 74 72 61 6e 73 66 65 | 72 5f 73 74 61 72 74 70 |Ctransfe|r_startp|
|00000550| 72 69 6e 74 2e 0d 00 21 | 13 2a 7c 73 74 6f 70 20 |rint...!|.*|stop |
|00000560| 54 72 61 6e 73 66 65 72 | 0d 00 22 04 0d 00 23 1d |Transfer|.."...#.|
|00000570| 2a 7c 73 74 61 72 74 20 | 50 52 4f 43 74 72 61 6e |*|start |PROCtran|
|00000580| 73 66 65 72 5f 69 6e 69 | 74 0d 00 24 18 2a 7c 21 |sfer_ini|t..$.*|!|
|00000590| 50 52 4f 43 74 72 61 6e | 73 66 65 72 5f 69 6e 69 |PROCtran|sfer_ini|
|000005a0| 74 0d 00 25 07 2a 7c 21 | 0d 00 26 45 2a 7c 21 54 |t..%.*|!|..&E*|!T|
|000005b0| 68 69 73 20 72 6f 75 74 | 69 6e 65 20 73 68 6f 75 |his rout|ine shou|
|000005c0| 6c 64 20 62 65 20 63 61 | 6c 6c 65 64 20 74 6f 20 |ld be ca|lled to |
|000005d0| 69 6e 69 74 69 61 6c 69 | 73 65 20 74 68 65 20 6c |initiali|se the l|
|000005e0| 69 62 72 61 72 79 20 62 | 65 66 6f 72 65 0d 00 27 |ibrary b|efore..'|
|000005f0| 46 2a 7c 21 75 73 69 6e | 67 20 61 6e 79 20 6f 74 |F*|!usin|g any ot|
|00000600| 68 65 72 20 72 6f 75 74 | 69 6e 65 73 2e 20 49 74 |her rout|ines. It|
|00000610| 20 61 6c 73 6f 20 63 72 | 65 61 74 65 73 20 74 77 | also cr|eates tw|
|00000620| 6f 20 6e 65 77 20 64 65 | 66 61 75 6c 74 20 65 76 |o new de|fault ev|
|00000630| 65 6e 74 0d 00 28 46 2a | 7c 21 68 61 6e 64 6c 65 |ent..(F*||!handle|
|00000640| 72 73 20 66 6f 72 20 6d | 65 73 73 61 67 65 73 20 |rs for m|essages |
|00000650| 63 6f 6e 63 65 72 6e 65 | 64 20 77 69 74 68 20 73 |concerne|d with s|
|00000660| 61 76 69 6e 67 20 64 61 | 74 61 20 28 6d 65 73 73 |aving da|ta (mess|
|00000670| 61 67 65 73 20 31 2d 37 | 29 0d 00 29 22 2a 7c 21 |ages 1-7|)..)"*|!|
|00000680| 61 6e 64 20 66 6f 72 20 | 55 73 65 72 44 72 61 67 |and for |UserDrag|
|00000690| 42 6f 78 20 65 76 65 6e | 74 73 2e 0d 00 2a 0a 2a |Box even|ts...*.*|
|000006a0| 7c 63 6f 70 79 0d 00 2b | 0c 2a 7c 75 70 64 61 74 ||copy..+|.*|updat|
|000006b0| 65 0d 00 2c 14 dd 20 f2 | 74 72 61 6e 73 66 65 72 |e..,.. .|transfer|
|000006c0| 5f 69 6e 69 74 0d 00 2d | 15 5f 74 72 61 6e 73 66 |_init..-|._transf|
|000006d0| 65 72 5f 74 79 70 65 25 | 3d 30 0d 00 2e 16 5f 74 |er_type%|=0...._t|
|000006e0| 72 61 6e 73 66 65 72 5f | 66 69 6c 65 24 3d 22 22 |ransfer_|file$=""|
|000006f0| 0d 00 2f 15 5f 74 72 61 | 6e 73 66 65 72 5f 73 69 |../._tra|nsfer_si|
|00000700| 7a 65 25 3d 30 0d 00 30 | 14 5f 74 72 61 6e 73 66 |ze%=0..0|._transf|
|00000710| 65 72 5f 72 65 66 25 3d | 30 0d 00 31 19 5f 74 72 |er_ref%=|0..1._tr|
|00000720| 61 6e 73 66 65 72 5f 64 | 72 61 67 67 69 6e 67 25 |ansfer_d|ragging%|
|00000730| 3d a3 0d 00 32 15 5f 77 | 69 6d 70 5f 62 75 66 66 |=...2._w|imp_buff|
|00000740| 65 72 25 21 30 3d 31 0d | 00 33 15 5f 77 69 6d 70 |er%!0=1.|.3._wimp|
|00000750| 5f 62 75 66 66 65 72 25 | 21 34 3d 32 0d 00 34 15 |_buffer%|!4=2..4.|
|00000760| 5f 77 69 6d 70 5f 62 75 | 66 66 65 72 25 21 38 3d |_wimp_bu|ffer%!8=|
|00000770| 33 0d 00 35 16 5f 77 69 | 6d 70 5f 62 75 66 66 65 |3..5._wi|mp_buffe|
|00000780| 72 25 21 31 32 3d 35 0d | 00 36 16 5f 77 69 6d 70 |r%!12=5.|.6._wimp|
|00000790| 5f 62 75 66 66 65 72 25 | 21 31 36 3d 36 0d 00 37 |_buffer%|!16=6..7|
|000007a0| 16 5f 77 69 6d 70 5f 62 | 75 66 66 65 72 25 21 32 |._wimp_b|uffer%!2|
|000007b0| 30 3d 37 0d 00 38 1b 5f | 77 69 6d 70 5f 62 75 66 |0=7..8._|wimp_buf|
|000007c0| 66 65 72 25 21 32 34 3d | 26 38 30 31 34 32 0d 00 |fer%!24=|&80142..|
|000007d0| 39 1b 5f 77 69 6d 70 5f | 62 75 66 66 65 72 25 21 |9._wimp_|buffer%!|
|000007e0| 32 38 3d 26 38 30 31 34 | 34 0d 00 3a 1b 5f 77 69 |28=&8014|4..:._wi|
|000007f0| 6d 70 5f 62 75 66 66 65 | 72 25 21 33 32 3d 26 38 |mp_buffe|r%!32=&8|
|00000800| 30 31 34 35 0d 00 3b 16 | 5f 77 69 6d 70 5f 62 75 |0145..;.|_wimp_bu|
|00000810| 66 66 65 72 25 21 33 36 | 3d 30 0d 00 3c 24 f2 77 |ffer%!36|=0..<$.w|
|00000820| 69 6d 70 5f 61 64 64 6d | 65 73 73 61 67 65 73 28 |imp_addm|essages(|
|00000830| 5f 77 69 6d 70 5f 62 75 | 66 66 65 72 25 29 0d 00 |_wimp_bu|ffer%)..|
|00000840| 3d 05 e1 0d 00 3e 04 0d | 00 3f 20 dd 20 a4 5f 74 |=....>..|.? . ._t|
|00000850| 72 61 6e 73 66 65 72 5f | 77 61 6e 74 6d 65 73 73 |ransfer_|wantmess|
|00000860| 28 6d 65 73 73 25 29 0d | 00 40 0e c8 8e 20 6d 65 |(mess%).|.@... me|
|00000870| 73 73 25 20 ca 0d 00 41 | 23 20 20 c9 20 31 2c 32 |ss% ...A|# . 1,2|
|00000880| 2c 33 2c 35 2c 36 2c 26 | 38 30 31 34 34 2c 26 38 |,3,5,6,&|80144,&8|
|00000890| 30 31 34 35 3a 20 3d b9 | 0d 00 42 0b 20 20 7f 3a |0145: =.|..B. .:|
|000008a0| 20 3d a3 0d 00 43 05 cb | 0d 00 44 06 3d a3 0d 00 | =...C..|..D.=...|
|000008b0| 45 04 0d 00 46 24 dd 20 | f2 65 76 65 6e 74 5f 74 |E...F$. |.event_t|
|000008c0| 72 61 6e 73 66 65 72 6d | 65 73 73 61 67 65 28 62 |ransferm|essage(b|
|000008d0| 6c 6f 63 6b 25 29 0d 00 | 47 17 3f 28 62 6c 6f 63 |lock%)..|G.?(bloc|
|000008e0| 6b 25 2b 21 62 6c 6f 63 | 6b 25 29 3d 30 0d 00 48 |k%+!bloc|k%)=0..H|
|000008f0| 12 c8 8e 20 62 6c 6f 63 | 6b 25 21 31 36 20 ca 0d |... bloc|k%!16 ..|
|00000900| 00 49 1f 2a 7c 69 66 64 | 65 66 20 46 4e 74 72 61 |.I.*|ifd|ef FNtra|
|00000910| 6e 73 66 65 72 5f 77 69 | 6c 6c 6c 6f 61 64 0d 00 |nsfer_wi|llload..|
|00000920| 4a 0a 20 20 c9 20 31 3a | 0d 00 4b 2b 20 20 20 20 |J. . 1:|..K+ |
|00000930| e7 20 a4 74 72 61 6e 73 | 66 65 72 5f 77 69 6c 6c |. .trans|fer_will|
|00000940| 6c 6f 61 64 28 62 6c 6f | 63 6b 25 21 34 30 2c a3 |load(blo|ck%!40,.|
|00000950| 29 20 8c 0d 00 4c 31 20 | 20 20 20 20 20 f2 6f 73 |) ...L1 | .os|
|00000960| 5f 70 75 74 73 74 72 69 | 6e 67 28 62 6c 6f 63 6b |_putstri|ng(block|
|00000970| 25 2b 34 34 2c 22 3c 57 | 69 6d 70 24 53 63 72 61 |%+44,"<W|imp$Scra|
|00000980| 70 3e 22 29 0d 00 4d 16 | 20 20 20 20 20 20 62 6c |p>")..M.| bl|
|00000990| 6f 63 6b 25 21 33 36 3d | 2d 31 0d 00 4e 1c 20 20 |ock%!36=|-1..N. |
|000009a0| 20 20 20 20 62 6c 6f 63 | 6b 25 21 31 32 3d 62 6c | bloc|k%!12=bl|
|000009b0| 6f 63 6b 25 21 38 0d 00 | 4f 15 20 20 20 20 20 20 |ock%!8..|O. |
|000009c0| 62 6c 6f 63 6b 25 21 31 | 36 3d 32 0d 00 50 14 20 |block%!1|6=2..P. |
|000009d0| 20 20 20 20 20 21 62 6c | 6f 63 6b 25 3d 36 30 0d | !bl|ock%=60.|
|000009e0| 00 51 32 20 20 20 20 20 | 20 c8 99 20 22 57 69 6d |.Q2 | .. "Wim|
|000009f0| 70 5f 53 65 6e 64 4d 65 | 73 73 61 67 65 22 2c 31 |p_SendMe|ssage",1|
|00000a00| 37 2c 62 6c 6f 63 6b 25 | 2c 62 6c 6f 63 6b 25 21 |7,block%|,block%!|
|00000a10| 34 0d 00 52 09 20 20 20 | 20 cd 0d 00 53 0b 2a 7c |4..R. | ...S.*||
|00000a20| 65 6e 64 69 66 0d 00 54 | 22 2a 7c 69 66 64 65 66 |endif..T|"*|ifdef|
|00000a30| 20 50 52 4f 43 74 72 61 | 6e 73 66 65 72 5f 73 74 | PROCtra|nsfer_st|
|00000a40| 61 72 74 64 72 61 67 0d | 00 55 0a 20 20 c9 20 32 |artdrag.|.U. . 2|
|00000a50| 3a 0d 00 56 24 20 20 20 | 20 e7 20 62 6c 6f 63 6b |:..V$ | . block|
|00000a60| 25 21 31 32 3d 5f 74 72 | 61 6e 73 66 65 72 5f 72 |%!12=_tr|ansfer_r|
|00000a70| 65 66 25 20 8c 0d 00 57 | 23 20 20 20 20 20 20 62 |ef% ...W|# b|
|00000a80| 6c 6f 63 6b 25 21 33 36 | 3d 5f 74 72 61 6e 73 66 |lock%!36|=_transf|
|00000a90| 65 72 5f 73 69 7a 65 25 | 0d 00 58 1c 20 20 20 20 |er_size%|..X. |
|00000aa0| 20 20 62 6c 6f 63 6b 25 | 21 31 32 3d 62 6c 6f 63 | block%|!12=bloc|
|00000ab0| 6b 25 21 38 0d 00 59 15 | 20 20 20 20 20 20 62 6c |k%!8..Y.| bl|
|00000ac0| 6f 63 6b 25 21 31 36 3d | 33 0d 00 5a 3d 20 20 20 |ock%!16=|3..Z= |
|00000ad0| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 53 65 6e 64 | .. "W|imp_Send|
|00000ae0| 4d 65 73 73 61 67 65 22 | 2c 31 38 2c 62 6c 6f 63 |Message"|,18,bloc|
|00000af0| 6b 25 2c 62 6c 6f 63 6b | 25 21 32 30 2c 62 6c 6f |k%,block|%!20,blo|
|00000b00| 63 6b 25 21 32 34 0d 00 | 5b 56 20 20 20 20 20 20 |ck%!24..|[V |
|00000b10| f2 74 72 61 6e 73 66 65 | 72 5f 73 61 76 65 66 69 |.transfe|r_savefi|
|00000b20| 6c 65 28 a4 6f 73 5f 67 | 65 74 73 74 72 69 6e 67 |le(.os_g|etstring|
|00000b30| 28 62 6c 6f 63 6b 25 2b | 34 34 29 2c 5f 74 72 61 |(block%+|44),_tra|
|00000b40| 6e 73 66 65 72 5f 74 79 | 70 65 25 2c 28 62 6c 6f |nsfer_ty|pe%,(blo|
|00000b50| 63 6b 25 21 33 36 3c 3e | 2d 31 29 29 0d 00 5c 21 |ck%!36<>|-1))..\!|
|00000b60| 20 20 20 20 20 20 5f 74 | 72 61 6e 73 66 65 72 5f | _t|ransfer_|
|00000b70| 72 65 66 25 3d 62 6c 6f | 63 6b 25 21 38 0d 00 5d |ref%=blo|ck%!8..]|
|00000b80| 16 20 20 20 20 20 20 f2 | 6d 65 6e 75 5f 72 65 6d |. .|menu_rem|
|00000b90| 6f 76 65 0d 00 5e 09 20 | 20 20 20 cd 0d 00 5f 0b |ove..^. | ..._.|
|00000ba0| 2a 7c 65 6e 64 69 66 0d | 00 60 21 2a 7c 69 66 64 |*|endif.|.`!*|ifd|
|00000bb0| 65 66 20 50 52 4f 43 74 | 72 61 6e 73 66 65 72 5f |ef PROCt|ransfer_|
|00000bc0| 6c 6f 61 64 66 69 6c 65 | 0d 00 61 0a 20 20 c9 20 |loadfile|..a. . |
|00000bd0| 33 3a 0d 00 62 45 20 20 | 20 20 e7 20 62 6c 6f 63 |3:..bE | . bloc|
|00000be0| 6b 25 21 34 3c 3e 5f 77 | 69 6d 70 5f 68 61 6e 64 |k%!4<>_w|imp_hand|
|00000bf0| 6c 65 25 20 80 20 a4 74 | 72 61 6e 73 66 65 72 5f |le% . .t|ransfer_|
|00000c00| 77 69 6c 6c 6c 6f 61 64 | 28 62 6c 6f 63 6b 25 21 |willload|(block%!|
|00000c10| 34 30 2c a3 29 20 8c 0d | 00 63 1c 20 20 20 20 20 |40,.) ..|.c. |
|00000c20| 20 62 6c 6f 63 6b 25 21 | 31 32 3d 62 6c 6f 63 6b | block%!|12=block|
|00000c30| 25 21 38 0d 00 64 15 20 | 20 20 20 20 20 62 6c 6f |%!8..d. | blo|
|00000c40| 63 6b 25 21 31 36 3d 34 | 0d 00 65 32 20 20 20 20 |ck%!16=4|..e2 |
|00000c50| 20 20 c8 99 20 22 57 69 | 6d 70 5f 53 65 6e 64 4d | .. "Wi|mp_SendM|
|00000c60| 65 73 73 61 67 65 22 2c | 31 37 2c 62 6c 6f 63 6b |essage",|17,block|
|00000c70| 25 2c 62 6c 6f 63 6b 25 | 21 34 0d 00 66 69 20 20 |%,block%|!4..fi |
|00000c80| 20 20 20 20 f2 74 72 61 | 6e 73 66 65 72 5f 6c 6f | .tra|nsfer_lo|
|00000c90| 61 64 66 69 6c 65 28 a4 | 6f 73 5f 67 65 74 73 74 |adfile(.|os_getst|
|00000ca0| 72 69 6e 67 28 62 6c 6f | 63 6b 25 2b 34 34 29 2c |ring(blo|ck%+44),|
|00000cb0| 62 6c 6f 63 6b 25 21 34 | 30 2c a4 6f 73 5f 67 65 |block%!4|0,.os_ge|
|00000cc0| 74 73 74 72 69 6e 67 28 | 62 6c 6f 63 6b 25 2b 34 |tstring(|block%+4|
|00000cd0| 34 29 3c 3e 22 3c 57 69 | 6d 70 24 53 63 72 61 70 |4)<>"<Wi|mp$Scrap|
|00000ce0| 3e 22 29 0d 00 67 09 20 | 20 20 20 cd 0d 00 68 0b |>")..g. | ...h.|
|00000cf0| 2a 7c 65 6e 64 69 66 0d | 00 69 21 2a 7c 69 66 64 |*|endif.|.i!*|ifd|
|00000d00| 65 66 20 50 52 4f 43 74 | 72 61 6e 73 66 65 72 5f |ef PROCt|ransfer_|
|00000d10| 6c 6f 61 64 66 69 6c 65 | 0d 00 6a 0a 20 20 c9 20 |loadfile|..j. . |
|00000d20| 35 3a 0d 00 6b 2b 20 20 | 20 20 e7 20 a4 74 72 61 |5:..k+ | . .tra|
|00000d30| 6e 73 66 65 72 5f 77 69 | 6c 6c 6c 6f 61 64 28 62 |nsfer_wi|llload(b|
|00000d40| 6c 6f 63 6b 25 21 34 30 | 2c b9 29 20 8c 0d 00 6c |lock%!40|,.) ...l|
|00000d50| 1c 20 20 20 20 20 20 62 | 6c 6f 63 6b 25 21 31 32 |. b|lock%!12|
|00000d60| 3d 62 6c 6f 63 6b 25 21 | 38 0d 00 6d 15 20 20 20 |=block%!|8..m. |
|00000d70| 20 20 20 62 6c 6f 63 6b | 25 21 31 36 3d 34 0d 00 | block|%!16=4..|
|00000d80| 6e 32 20 20 20 20 20 20 | c8 99 20 22 57 69 6d 70 |n2 |.. "Wimp|
|00000d90| 5f 53 65 6e 64 4d 65 73 | 73 61 67 65 22 2c 31 37 |_SendMes|sage",17|
|00000da0| 2c 62 6c 6f 63 6b 25 2c | 62 6c 6f 63 6b 25 21 34 |,block%,|block%!4|
|00000db0| 0d 00 6f 42 20 20 20 20 | 20 20 f2 74 72 61 6e 73 |..oB | .trans|
|00000dc0| 66 65 72 5f 6c 6f 61 64 | 66 69 6c 65 28 a4 6f 73 |fer_load|file(.os|
|00000dd0| 5f 67 65 74 73 74 72 69 | 6e 67 28 62 6c 6f 63 6b |_getstri|ng(block|
|00000de0| 25 2b 34 34 29 2c 62 6c | 6f 63 6b 25 21 34 30 2c |%+44),bl|ock%!40,|
|00000df0| b9 29 0d 00 70 0d 20 20 | 20 20 cd 20 20 20 20 0d |.)..p. | . .|
|00000e00| 00 71 0b 2a 7c 65 6e 64 | 69 66 0d 00 72 20 2a 7c |.q.*|end|if..r *||
|00000e10| 69 66 64 65 66 20 46 4e | 74 72 61 6e 73 66 65 72 |ifdef FN|transfer|
|00000e20| 5f 73 65 6e 64 62 6c 6f | 63 6b 0d 00 73 0a 20 20 |_sendblo|ck..s. |
|00000e30| c9 20 36 3a 0d 00 74 22 | 20 20 20 20 62 75 66 66 |. 6:..t"| buff|
|00000e40| 65 72 25 3d a4 6d 61 6c | 6c 6f 63 28 62 6c 6f 63 |er%=.mal|loc(bloc|
|00000e50| 6b 25 21 32 34 29 0d 00 | 75 48 20 20 20 20 73 69 |k%!24)..|uH si|
|00000e60| 7a 65 25 3d a4 74 72 61 | 6e 73 66 65 72 5f 73 65 |ze%=.tra|nsfer_se|
|00000e70| 6e 64 62 6c 6f 63 6b 28 | 62 75 66 66 65 72 25 2c |ndblock(|buffer%,|
|00000e80| 62 6c 6f 63 6b 25 21 32 | 34 2c 5f 74 72 61 6e 73 |block%!2|4,_trans|
|00000e90| 66 65 72 5f 74 79 70 65 | 25 29 20 20 20 20 0d 00 |fer_type|%) ..|
|00000ea0| 76 4e 20 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 54 |vN ..| "Wimp_T|
|00000eb0| 72 61 6e 73 66 65 72 42 | 6c 6f 63 6b 22 2c 5f 77 |ransferB|lock",_w|
|00000ec0| 69 6d 70 5f 68 61 6e 64 | 6c 65 25 2c 62 75 66 66 |imp_hand|le%,buff|
|00000ed0| 65 72 25 2c 62 6c 6f 63 | 6b 25 21 34 2c 62 6c 6f |er%,bloc|k%!4,blo|
|00000ee0| 63 6b 25 21 32 30 2c 73 | 69 7a 65 25 0d 00 77 16 |ck%!20,s|ize%..w.|
|00000ef0| 20 20 20 20 f2 66 72 65 | 65 28 62 75 66 66 65 72 | .fre|e(buffer|
|00000f00| 25 29 0d 00 78 2f 20 20 | 20 20 e7 20 73 69 7a 65 |%)..x/ | . size|
|00000f10| 25 3c 62 6c 6f 63 6b 25 | 21 32 34 20 8c 20 6d 65 |%<block%|!24 . me|
|00000f20| 73 73 25 3d 31 37 20 8b | 20 6d 65 73 73 25 3d 31 |ss%=17 .| mess%=1|
|00000f30| 38 0d 00 79 1a 20 20 20 | 20 62 6c 6f 63 6b 25 21 |8..y. | block%!|
|00000f40| 31 32 3d 62 6c 6f 63 6b | 25 21 38 0d 00 7a 13 20 |12=block|%!8..z. |
|00000f50| 20 20 20 62 6c 6f 63 6b | 25 21 31 36 3d 37 0d 00 | block|%!16=7..|
|00000f60| 7b 17 20 20 20 20 62 6c | 6f 63 6b 25 21 32 34 3d |{. bl|ock%!24=|
|00000f70| 73 69 7a 65 25 0d 00 7c | 33 20 20 20 20 c8 99 20 |size%..||3 .. |
|00000f80| 22 57 69 6d 70 5f 53 65 | 6e 64 4d 65 73 73 61 67 |"Wimp_Se|ndMessag|
|00000f90| 65 22 2c 6d 65 73 73 25 | 2c 62 6c 6f 63 6b 25 2c |e",mess%|,block%,|
|00000fa0| 62 6c 6f 63 6b 25 21 34 | 0d 00 7d 0b 2a 7c 65 6e |block%!4|..}.*|en|
|00000fb0| 64 69 66 0d 00 7e 23 2a | 7c 69 66 64 65 66 20 50 |dif..~#*||ifdef P|
|00000fc0| 52 4f 43 74 72 61 6e 73 | 66 65 72 5f 73 74 61 72 |ROCtrans|fer_star|
|00000fd0| 74 70 72 69 6e 74 0d 00 | 7f 0f 20 20 c9 20 26 38 |tprint..|.. . &8|
|00000fe0| 30 31 34 34 3a 0d 00 80 | 20 20 20 20 20 e7 20 62 |0144:...| . b|
|00000ff0| 25 21 31 32 3d 5f 74 72 | 61 6e 73 66 65 72 5f 72 |%!12=_tr|ansfer_r|
|00001000| 65 66 25 20 8c 0d 00 81 | 3c 20 20 20 20 20 20 64 |ef% ....|< d|
|00001010| 75 6d 6d 79 25 3d a4 77 | 69 6d 70 5f 6d 65 73 73 |ummy%=.w|imp_mess|
|00001020| 61 67 65 62 6f 78 28 a3 | 2c 22 22 2c a4 6f 73 5f |agebox(.|,"",.os_|
|00001030| 67 65 74 73 74 72 69 6e | 67 28 62 25 2b 32 34 29 |getstrin|g(b%+24)|
|00001040| 29 0d 00 82 09 20 20 20 | 20 cd 0d 00 83 0b 2a 7c |).... | .....*||
|00001050| 65 6e 64 69 66 0d 00 84 | 0f 20 20 c9 20 26 38 30 |endif...|. . &80|
|00001060| 31 34 35 3a 0d 00 85 16 | 20 20 20 20 c8 8e 20 62 |145:....| .. b|
|00001070| 6c 6f 63 6b 25 21 31 32 | 20 ca 0d 00 86 20 2a 7c |lock%!12| .... *||
|00001080| 69 66 64 65 66 20 46 4e | 74 72 61 6e 73 66 65 72 |ifdef FN|transfer|
|00001090| 5f 77 69 6c 6c 70 72 69 | 6e 74 0d 00 87 0e 20 20 |_willpri|nt.... |
|000010a0| 20 20 20 20 c9 20 30 3a | 0d 00 88 2e 20 20 20 20 | . 0:|.... |
|000010b0| 20 20 20 20 e7 20 a4 74 | 72 61 6e 73 66 65 72 5f | . .t|ransfer_|
|000010c0| 77 69 6c 6c 70 72 69 6e | 74 28 62 6c 6f 63 6b 25 |willprin|t(block%|
|000010d0| 21 34 30 29 20 8c 0d 00 | 89 18 20 20 20 20 20 20 |!40) ...|.. |
|000010e0| 20 20 20 20 21 62 6c 6f | 63 6b 25 3d 32 30 0d 00 | !blo|ck%=20..|
|000010f0| 8a 20 20 20 20 20 20 20 | 20 20 20 20 62 6c 6f 63 |. | bloc|
|00001100| 6b 25 21 31 32 3d 62 6c | 6f 63 6b 25 21 38 0d 00 |k%!12=bl|ock%!8..|
|00001110| 8b 1e 20 20 20 20 20 20 | 20 20 20 20 62 6c 6f 63 |.. | bloc|
|00001120| 6b 25 21 31 36 3d 26 38 | 30 31 34 36 0d 00 8c 36 |k%!16=&8|0146...6|
|00001130| 20 20 20 20 20 20 20 20 | 20 20 c8 99 20 22 57 69 | | .. "Wi|
|00001140| 6d 70 5f 53 65 6e 64 4d | 65 73 73 61 67 65 22 2c |mp_SendM|essage",|
|00001150| 31 37 2c 62 6c 6f 63 6b | 25 2c 62 6c 6f 63 6b 25 |17,block|%,block%|
|00001160| 21 34 0d 00 8d 4f 20 20 | 20 20 20 20 20 20 20 20 |!4...O | |
|00001170| f2 74 72 61 6e 73 66 65 | 72 5f 70 72 69 6e 74 66 |.transfe|r_printf|
|00001180| 69 6c 65 28 a4 6f 73 5f | 67 65 74 73 74 72 69 6e |ile(.os_|getstrin|
|00001190| 67 28 62 6c 6f 63 6b 25 | 2b 34 34 29 2c 62 6c 6f |g(block%|+44),blo|
|000011a0| 63 6b 25 21 34 30 29 20 | 20 20 20 20 20 20 20 20 |ck%!40) | |
|000011b0| 20 0d 00 8e 0d 20 20 20 | 20 20 20 20 20 cd 0d 00 | .... | ...|
|000011c0| 8f 0b 2a 7c 65 6e 64 69 | 66 0d 00 90 22 2a 7c 69 |..*|endi|f..."*|i|
|000011d0| 66 64 65 66 20 50 52 4f | 43 74 72 61 6e 73 66 65 |fdef PRO|Ctransfe|
|000011e0| 72 5f 70 72 69 6e 74 66 | 69 6c 65 0d 00 91 1b 20 |r_printf|ile.... |
|000011f0| 20 20 20 20 20 c9 20 5f | 74 72 61 6e 73 66 65 72 | . _|transfer|
|00001200| 5f 72 65 66 25 3a 0d 00 | 92 16 20 20 20 20 20 20 |_ref%:..|.. |
|00001210| 20 20 21 62 6c 6f 63 6b | 25 3d 32 30 0d 00 93 1e | !block|%=20....|
|00001220| 20 20 20 20 20 20 20 20 | 62 6c 6f 63 6b 25 21 31 | |block%!1|
|00001230| 32 3d 62 6c 6f 63 6b 25 | 21 38 0d 00 94 1c 20 20 |2=block%|!8.... |
|00001240| 20 20 20 20 20 20 62 6c | 6f 63 6b 25 21 31 36 3d | bl|ock%!16=|
|00001250| 26 38 30 31 34 36 0d 00 | 95 34 20 20 20 20 20 20 |&80146..|.4 |
|00001260| 20 20 c8 99 20 22 57 69 | 6d 70 5f 53 65 6e 64 4d | .. "Wi|mp_SendM|
|00001270| 65 73 73 61 67 65 22 2c | 31 37 2c 62 6c 6f 63 6b |essage",|17,block|
|00001280| 25 2c 62 6c 6f 63 6b 25 | 21 34 0d 00 96 33 20 20 |%,block%|!4...3 |
|00001290| 20 20 20 20 20 20 f2 74 | 72 61 6e 73 66 65 72 5f | .t|ransfer_|
|000012a0| 70 72 69 6e 74 66 69 6c | 65 28 22 22 2c 5f 74 72 |printfil|e("",_tr|
|000012b0| 61 6e 73 66 65 72 5f 74 | 79 70 65 25 29 0d 00 97 |ansfer_t|ype%)...|
|000012c0| 0b 2a 7c 65 6e 64 69 66 | 0d 00 98 13 20 20 20 20 |.*|endif|.... |
|000012d0| cb 20 20 20 20 20 20 20 | 20 20 20 0d 00 99 05 cb |. | .....|
|000012e0| 0d 00 9a 05 e1 0d 00 9b | 04 0d 00 9c 1f dd 20 a4 |........|...... .|
|000012f0| 5f 74 72 61 6e 73 66 65 | 72 5f 77 61 6e 74 61 63 |_transfe|r_wantac|
|00001300| 6b 28 6d 65 73 73 25 29 | 0d 00 9d 0e c8 8e 20 6d |k(mess%)|...... m|
|00001310| 65 73 73 25 20 ca 0d 00 | 9e 16 20 20 c9 20 33 2c |ess% ...|.. . 3,|
|00001320| 37 2c 26 38 30 31 34 32 | 3a 20 3d b9 0d 00 9f 0b |7,&80142|: =.....|
|00001330| 20 20 7f 3a 20 3d a3 0d | 00 a0 05 cb 0d 00 a1 06 | .: =..|........|
|00001340| 3d a3 0d 00 a2 04 0d 00 | a3 28 dd 20 f2 65 76 65 |=.......|.(. .eve|
|00001350| 6e 74 5f 74 72 61 6e 73 | 66 65 72 61 63 6b 6e 6f |nt_trans|ferackno|
|00001360| 77 6c 65 64 67 65 28 62 | 6c 6f 63 6b 25 29 0d 00 |wledge(b|lock%)..|
|00001370| a4 0c ea 20 64 75 6d 6d | 79 25 0d 00 a5 12 c8 8e |... dumm|y%......|
|00001380| 20 62 6c 6f 63 6b 25 21 | 31 36 20 ca 0d 00 a6 21 | block%!|16 ....!|
|00001390| 2a 7c 69 66 64 65 66 20 | 50 52 4f 43 74 72 61 6e |*|ifdef |PROCtran|
|000013a0| 73 66 65 72 5f 73 61 76 | 65 66 69 6c 65 0d 00 a7 |sfer_sav|efile...|
|000013b0| 0a 20 20 c9 20 33 3a 0d | 00 a8 24 20 20 20 20 e7 |. . 3:.|..$ .|
|000013c0| 20 62 6c 6f 63 6b 25 21 | 31 32 3d 5f 74 72 61 6e | block%!|12=_tran|
|000013d0| 73 66 65 72 5f 72 65 66 | 25 20 8c 0d 00 a9 31 20 |sfer_ref|% ....1 |
|000013e0| 20 20 20 20 20 e7 20 a4 | 6f 73 5f 67 65 74 73 74 | . .|os_getst|
|000013f0| 72 69 6e 67 28 62 25 2b | 34 34 29 3d 22 3c 57 69 |ring(b%+|44)="<Wi|
|00001400| 6d 70 24 53 63 72 61 70 | 3e 22 20 8c 0d 00 aa 2d |mp$Scrap|>" ....-|
|00001410| 20 20 20 20 20 20 20 20 | c8 99 20 22 4f 53 5f 43 | |.. "OS_C|
|00001420| 4c 49 22 2c 22 52 65 6d | 6f 76 65 20 3c 57 69 6d |LI","Rem|ove <Wim|
|00001430| 70 24 53 63 72 61 70 3e | 22 0d 00 ab 0b 20 20 20 |p$Scrap>|".... |
|00001440| 20 20 20 cd 0d 00 ac 4d | 20 20 20 20 20 20 64 75 | ....M| du|
|00001450| 6d 6d 79 25 3d a4 77 69 | 6d 70 5f 6d 65 73 73 61 |mmy%=.wi|mp_messa|
|00001460| 67 65 62 6f 78 28 a3 2c | 22 22 2c 22 44 61 74 61 |gebox(.,|"","Data|
|00001470| 20 74 72 61 6e 73 66 65 | 72 20 66 61 69 6c 65 64 | transfe|r failed|
|00001480| 3a 20 52 65 63 65 69 76 | 65 72 20 64 69 65 64 22 |: Receiv|er died"|
|00001490| 29 0d 00 ad 09 20 20 20 | 20 cd 0d 00 ae 0b 2a 7c |).... | .....*||
|000014a0| 65 6e 64 69 66 0d 00 af | 22 2a 7c 69 66 64 65 66 |endif...|"*|ifdef|
|000014b0| 20 50 52 4f 43 74 72 61 | 6e 73 66 65 72 5f 73 65 | PROCtra|nsfer_se|
|000014c0| 6e 64 62 6c 6f 63 6b 0d | 00 b0 0a 20 20 c9 20 37 |ndblock.|... . 7|
|000014d0| 3a 0d 00 b1 4b 20 20 20 | 20 64 75 6d 6d 79 25 3d |:...K | dummy%=|
|000014e0| a4 77 69 6d 70 5f 6d 65 | 73 73 61 67 65 62 6f 78 |.wimp_me|ssagebox|
|000014f0| 28 a3 2c 22 22 2c 22 44 | 61 74 61 20 74 72 61 6e |(.,"","D|ata tran|
|00001500| 73 66 65 72 20 66 61 69 | 6c 65 64 3a 20 52 65 63 |sfer fai|led: Rec|
|00001510| 65 69 76 65 72 20 64 69 | 65 64 22 29 0d 00 b2 0b |eiver di|ed")....|
|00001520| 2a 7c 65 6e 64 69 66 0d | 00 b3 23 2a 7c 69 66 64 |*|endif.|..#*|ifd|
|00001530| 65 66 20 50 52 4f 43 74 | 72 61 6e 73 66 65 72 5f |ef PROCt|ransfer_|
|00001540| 73 74 61 72 74 70 72 69 | 6e 74 0d 00 b4 0f 20 20 |startpri|nt.... |
|00001550| c9 20 26 38 30 31 34 32 | 3a 0d 00 b5 24 20 20 20 |. &80142|:...$ |
|00001560| 20 e7 20 5f 74 72 61 6e | 73 66 65 72 5f 72 65 66 | . _tran|sfer_ref|
|00001570| 25 3d 62 6c 6f 63 6b 25 | 21 31 32 20 8c 0d 00 b6 |%=block%|!12 ....|
|00001580| 44 20 20 20 20 20 20 64 | 75 6d 6d 79 25 3d a4 77 |D d|ummy%=.w|
|00001590| 69 6d 70 5f 6d 65 73 73 | 61 67 65 62 6f 78 28 a3 |imp_mess|agebox(.|
|000015a0| 2c 22 22 2c 22 50 72 69 | 6e 74 65 72 20 6d 61 6e |,"","Pri|nter man|
|000015b0| 61 67 65 72 20 6e 6f 74 | 20 6c 6f 61 64 65 64 22 |ager not| loaded"|
|000015c0| 29 0d 00 b7 09 20 20 20 | 20 cd 0d 00 b8 0b 2a 7c |).... | .....*||
|000015d0| 65 6e 64 69 66 0d 00 b9 | 05 cb 0d 00 ba 05 e1 0d |endif...|........|
|000015e0| 00 bb 04 0d 00 bc 1d dd | 20 f2 65 76 65 6e 74 5f |........| .event_|
|000015f0| 73 61 76 65 64 72 61 67 | 28 62 6c 6f 63 6b 25 29 |savedrag|(block%)|
|00001600| 0d 00 bd 0b ea 20 66 6c | 61 67 25 0d 00 be 1b e7 |..... fl|ag%.....|
|00001610| 20 5f 77 69 6d 70 5f 76 | 65 72 73 69 6f 6e 25 3e | _wimp_v|ersion%>|
|00001620| 3d 33 30 30 20 8c 0d 00 | bf 23 20 20 c8 99 20 22 |=300 ...|.# .. "|
|00001630| 4f 53 5f 42 79 74 65 22 | 2c 31 36 31 2c 32 38 20 |OS_Byte"|,161,28 |
|00001640| b8 20 2c 2c 66 6c 61 67 | 25 0d 00 c0 1d 20 20 66 |. ,,flag|%.... f|
|00001650| 6c 61 67 25 3d 28 28 66 | 6c 61 67 25 20 80 20 32 |lag%=((f|lag% . 2|
|00001660| 29 20 3d 20 32 29 0d 00 | c1 05 cc 0d 00 c2 0d 20 |) = 2)..|....... |
|00001670| 20 66 6c 61 67 25 3d a3 | 0d 00 c3 05 cd 0d 00 c4 | flag%=.|........|
|00001680| 0d e7 20 66 6c 61 67 25 | 20 8c 0d 00 c5 1b 20 20 |.. flag%| ..... |
|00001690| c8 99 20 22 44 72 61 67 | 41 53 70 72 69 74 65 5f |.. "Drag|ASprite_|
|000016a0| 53 74 6f 70 22 0d 00 c6 | 05 cc 0d 00 c7 1b 20 20 |Stop"...|...... |
|000016b0| c8 99 20 22 57 69 6d 70 | 5f 44 72 61 67 42 6f 78 |.. "Wimp|_DragBox|
|000016c0| 22 2c 2c 2d 31 0d 00 c8 | 05 cd 0d 00 c9 19 5f 74 |",,-1...|......_t|
|000016d0| 72 61 6e 73 66 65 72 5f | 64 72 61 67 67 69 6e 67 |ransfer_|dragging|
|000016e0| 25 3d a3 0d 00 ca 1c c8 | 95 20 a7 5f 74 72 61 6e |%=......|. ._tran|
|000016f0| 73 66 65 72 5f 66 69 6c | 65 24 2c 22 2e 22 29 0d |sfer_fil|e$,".").|
|00001700| 00 cb 3f 20 20 5f 74 72 | 61 6e 73 66 65 72 5f 66 |..? _tr|ansfer_f|
|00001710| 69 6c 65 24 3d c1 5f 74 | 72 61 6e 73 66 65 72 5f |ile$=._t|ransfer_|
|00001720| 66 69 6c 65 24 2c a7 5f | 74 72 61 6e 73 66 65 72 |file$,._|transfer|
|00001730| 5f 66 69 6c 65 24 2c 22 | 2e 22 29 2b 31 29 0d 00 |_file$,"|.")+1)..|
|00001740| cc 05 ce 0d 00 cd 2b c8 | 99 20 22 57 69 6d 70 5f |......+.|. "Wimp_|
|00001750| 47 65 74 50 6f 69 6e 74 | 65 72 49 6e 66 6f 22 2c |GetPoint|erInfo",|
|00001760| 2c 5f 77 69 6d 70 5f 62 | 75 66 66 65 72 25 0d 00 |,_wimp_b|uffer%..|
|00001770| ce 47 5f 77 69 6d 70 5f | 62 75 66 66 65 72 25 21 |.G_wimp_|buffer%!|
|00001780| 32 30 3d 5f 77 69 6d 70 | 5f 62 75 66 66 65 72 25 |20=_wimp|_buffer%|
|00001790| 21 31 32 3a 5f 77 69 6d | 70 5f 62 75 66 66 65 72 |!12:_wim|p_buffer|
|000017a0| 25 21 32 34 3d 5f 77 69 | 6d 70 5f 62 75 66 66 65 |%!24=_wi|mp_buffe|
|000017b0| 72 25 21 31 36 0d 00 cf | 44 5f 77 69 6d 70 5f 62 |r%!16...|D_wimp_b|
|000017c0| 75 66 66 65 72 25 21 32 | 38 3d 21 5f 77 69 6d 70 |uffer%!2|8=!_wimp|
|000017d0| 5f 62 75 66 66 65 72 25 | 3a 5f 77 69 6d 70 5f 62 |_buffer%|:_wimp_b|
|000017e0| 75 66 66 65 72 25 21 33 | 32 3d 5f 77 69 6d 70 5f |uffer%!3|2=_wimp_|
|000017f0| 62 75 66 66 65 72 25 21 | 34 0d 00 d0 24 5f 77 69 |buffer%!|4...$_wi|
|00001800| 6d 70 5f 62 75 66 66 65 | 72 25 21 33 36 3d 5f 74 |mp_buffe|r%!36=_t|
|00001810| 72 61 6e 73 66 65 72 5f | 73 69 7a 65 25 0d 00 d1 |ransfer_|size%...|
|00001820| 24 5f 77 69 6d 70 5f 62 | 75 66 66 65 72 25 21 34 |$_wimp_b|uffer%!4|
|00001830| 30 3d 5f 74 72 61 6e 73 | 66 65 72 5f 74 79 70 65 |0=_trans|fer_type|
|00001840| 25 0d 00 d2 33 f2 6f 73 | 5f 70 75 74 73 74 72 69 |%...3.os|_putstri|
|00001850| 6e 67 28 5f 77 69 6d 70 | 5f 62 75 66 66 65 72 25 |ng(_wimp|_buffer%|
|00001860| 2b 34 34 2c 5f 74 72 61 | 6e 73 66 65 72 5f 66 69 |+44,_tra|nsfer_fi|
|00001870| 6c 65 24 29 0d 00 d3 29 | 5f 77 69 6d 70 5f 62 75 |le$)...)|_wimp_bu|
|00001880| 66 66 65 72 25 21 31 32 | 3d 30 3a 5f 77 69 6d 70 |ffer%!12|=0:_wimp|
|00001890| 5f 62 75 66 66 65 72 25 | 21 31 36 3d 31 0d 00 d4 |_buffer%|!16=1...|
|000018a0| 34 21 5f 77 69 6d 70 5f | 62 75 66 66 65 72 25 3d |4!_wimp_|buffer%=|
|000018b0| 34 34 2b 34 2a 28 28 a9 | 28 5f 74 72 61 6e 73 66 |44+4*((.|(_transf|
|000018c0| 65 72 5f 66 69 6c 65 24 | 29 2b 34 29 20 81 20 34 |er_file$|)+4) . 4|
|000018d0| 29 0d 00 d5 4c c8 99 20 | 22 57 69 6d 70 5f 53 65 |)...L.. |"Wimp_Se|
|000018e0| 6e 64 4d 65 73 73 61 67 | 65 22 2c 31 38 2c 5f 77 |ndMessag|e",18,_w|
|000018f0| 69 6d 70 5f 62 75 66 66 | 65 72 25 2c 5f 77 69 6d |imp_buff|er%,_wim|
|00001900| 70 5f 62 75 66 66 65 72 | 25 21 32 30 2c 5f 77 69 |p_buffer|%!20,_wi|
|00001910| 6d 70 5f 62 75 66 66 65 | 72 25 21 32 34 0d 00 d6 |mp_buffe|r%!24...|
|00001920| 22 5f 74 72 61 6e 73 66 | 65 72 5f 72 65 66 25 3d |"_transf|er_ref%=|
|00001930| 5f 77 69 6d 70 5f 62 75 | 66 66 65 72 25 21 38 0d |_wimp_bu|ffer%!8.|
|00001940| 00 d7 05 e1 0d 00 d8 0a | 2a 7c 63 6f 70 79 0d 00 |........|*|copy..|
|00001950| d9 0e 2a 7c 64 6f 77 6e | 64 61 74 65 0d 00 da 1c |..*|down|date....|
|00001960| 2a 7c 73 74 6f 70 20 50 | 52 4f 43 74 72 61 6e 73 |*|stop P|ROCtrans|
|00001970| 66 65 72 5f 69 6e 69 74 | 0d 00 db 04 0d 00 dc 22 |fer_init|......."|
|00001980| 2a 7c 73 74 61 72 74 20 | 50 52 4f 43 74 72 61 6e |*|start |PROCtran|
|00001990| 73 66 65 72 5f 73 74 61 | 72 74 64 72 61 67 0d 00 |sfer_sta|rtdrag..|
|000019a0| dd 53 2a 7c 21 50 52 4f | 43 74 72 61 6e 73 66 65 |.S*|!PRO|Ctransfe|
|000019b0| 72 5f 73 74 61 72 74 64 | 72 61 67 28 20 66 69 6c |r_startd|rag( fil|
|000019c0| 65 5f 6e 61 6d 65 20 2c | 20 66 69 6c 65 5f 74 79 |e_name ,| file_ty|
|000019d0| 70 65 20 2c 20 66 69 09 | 6c 65 5f 73 69 7a 65 20 |pe , fi.|le_size |
|000019e0| 2c 20 77 69 6e 64 6f 77 | 20 2c 20 69 63 6f 6e 20 |, window| , icon |
|000019f0| 29 0d 00 de 07 2a 7c 21 | 0d 00 df 52 2a 7c 21 54 |)....*|!|...R*|!T|
|00001a00| 68 69 73 20 70 72 6f 63 | 65 64 75 72 65 20 69 73 |his proc|edure is|
|00001a10| 20 75 73 65 64 20 74 6f | 20 73 74 61 72 74 20 61 | used to| start a|
|00001a20| 20 64 72 61 67 20 66 72 | 6f 6d 20 61 20 73 61 76 | drag fr|om a sav|
|00001a30| 65 20 62 6f 78 2e 20 49 | 74 20 73 68 6f 75 6c 64 |e box. I|t should|
|00001a40| 20 62 65 20 63 61 6c 6c | 65 64 0d 00 e0 4e 2a 7c | be call|ed...N*||
|00001a50| 21 77 68 65 6e 20 61 20 | 64 72 61 67 20 65 76 65 |!when a |drag eve|
|00001a60| 6e 74 20 69 73 20 64 65 | 74 65 63 74 65 64 20 66 |nt is de|tected f|
|00001a70| 6f 72 20 74 68 65 20 66 | 69 6c 65 20 69 63 6f 6e |or the f|ile icon|
|00001a80| 20 69 6e 20 61 20 73 61 | 76 65 20 62 6f 78 2c 20 | in a sa|ve box, |
|00001a90| 77 69 74 68 20 74 68 65 | 0d 00 e1 50 2a 7c 21 70 |with the|...P*|!p|
|00001aa0| 72 6f 70 6f 73 65 64 20 | 66 69 6c 65 6e 61 6d 65 |roposed |filename|
|00001ab0| 20 28 66 72 6f 6d 20 74 | 68 65 20 73 61 76 65 20 | (from t|he save |
|00001ac0| 62 6f 78 29 2c 20 66 69 | 6c 65 74 79 70 65 20 61 |box), fi|letype a|
|00001ad0| 6e 64 20 61 70 70 72 6f | 78 69 6d 61 74 65 20 66 |nd appro|ximate f|
|00001ae0| 69 6c 65 20 73 69 7a 65 | 0d 00 e2 52 2a 7c 21 67 |ile size|...R*|!g|
|00001af0| 69 76 65 6e 2c 20 61 6c | 6f 6e 67 20 77 69 74 68 |iven, al|ong with|
|00001b00| 20 74 68 65 20 77 69 6e | 64 6f 77 20 61 6e 64 20 | the win|dow and |
|00001b10| 69 63 6f 6e 20 6e 75 6d | 62 65 72 73 20 77 68 65 |icon num|bers whe|
|00001b20| 72 65 20 74 68 65 20 64 | 72 61 67 20 65 76 65 6e |re the d|rag even|
|00001b30| 74 20 73 74 61 72 74 65 | 64 2e 0d 00 e3 07 2a 7c |t starte|d.....*||
|00001b40| 21 0d 00 e4 50 2a 7c 21 | 59 6f 75 72 20 70 72 6f |!...P*|!|Your pro|
|00001b50| 67 72 61 6d 20 73 68 6f | 75 6c 64 20 61 6c 73 6f |gram sho|uld also|
|00001b60| 20 63 6f 6e 74 61 69 6e | 20 74 77 6f 20 72 6f 75 | contain| two rou|
|00001b70| 74 69 6e 65 73 2c 20 77 | 68 69 63 68 20 77 69 6c |tines, w|hich wil|
|00001b80| 6c 20 62 65 20 63 61 6c | 6c 65 64 20 74 6f 20 64 |l be cal|led to d|
|00001b90| 6f 0d 00 e5 30 2a 7c 21 | 74 68 65 20 61 63 74 75 |o...0*|!|the actu|
|00001ba0| 61 6c 20 73 61 76 69 6e | 67 2e 20 54 68 65 20 66 |al savin|g. The f|
|00001bb0| 69 72 73 74 20 6f 66 20 | 74 68 65 73 65 20 69 73 |irst of |these is|
|00001bc0| 3a 0d 00 e6 07 2a 7c 21 | 0d 00 e7 43 2a 7c 21 20 |:....*|!|...C*|! |
|00001bd0| 20 20 20 50 52 4f 43 74 | 72 61 6e 73 66 65 72 5f | PROCt|ransfer_|
|00001be0| 73 61 76 65 66 69 6c 65 | 28 20 66 69 6c 65 5f 6e |savefile|( file_n|
|00001bf0| 61 6d 65 20 2c 20 66 69 | 6c 65 5f 74 79 70 65 20 |ame , fi|le_type |
|00001c00| 2c 20 69 73 5f 73 61 66 | 65 20 29 0d 00 e8 07 2a |, is_saf|e )....*|
|00001c10| 7c 21 0d 00 e9 4f 2a 7c | 21 54 68 69 73 20 70 72 ||!...O*||!This pr|
|00001c20| 6f 63 65 64 75 72 65 20 | 73 68 6f 75 6c 64 20 73 |ocedure |should s|
|00001c30| 61 76 65 20 74 68 65 20 | 64 61 74 61 20 74 6f 20 |ave the |data to |
|00001c40| 74 68 65 20 73 70 65 63 | 69 66 69 65 64 20 66 69 |the spec|ified fi|
|00001c50| 6c 65 2c 20 67 69 76 69 | 6e 67 20 69 74 20 74 68 |le, givi|ng it th|
|00001c60| 65 0d 00 ea 51 2a 7c 21 | 61 70 70 72 6f 70 72 69 |e...Q*|!|appropri|
|00001c70| 61 74 65 20 74 79 70 65 | 20 28 74 68 65 20 74 79 |ate type| (the ty|
|00001c80| 70 65 20 69 73 20 61 6c | 73 6f 20 75 73 65 66 75 |pe is al|so usefu|
|00001c90| 6c 20 69 66 20 79 6f 75 | 72 20 70 72 6f 67 72 61 |l if you|r progra|
|00001ca0| 6d 20 63 61 6e 20 73 61 | 76 65 20 73 65 76 65 72 |m can sa|ve sever|
|00001cb0| 61 6c 0d 00 eb 4f 2a 7c | 21 64 69 66 66 65 72 65 |al...O*||!differe|
|00001cc0| 6e 74 20 74 79 70 65 73 | 20 6f 66 20 66 69 6c 65 |nt types| of file|
|00001cd0| 29 2e 20 54 68 65 20 62 | 6f 6f 6c 65 61 6e 20 69 |). The b|oolean i|
|00001ce0| 73 5f 73 61 66 65 20 69 | 6e 64 69 63 61 74 65 73 |s_safe i|ndicates|
|00001cf0| 20 77 68 65 74 68 65 72 | 20 74 68 65 20 66 69 6c | whether| the fil|
|00001d00| 65 0d 00 ec 37 2a 7c 21 | 69 73 20 27 73 61 66 65 |e...7*|!|is 'safe|
|00001d10| 27 20 6f 72 20 6e 6f 74 | 2e 20 54 68 65 20 6f 74 |' or not|. The ot|
|00001d20| 68 65 72 20 63 61 6c 6c | 62 61 63 6b 20 72 6f 75 |her call|back rou|
|00001d30| 74 69 6e 65 20 69 73 3a | 0d 00 ed 07 2a 7c 21 0d |tine is:|....*|!.|
|00001d40| 00 ee 3d 2a 7c 21 20 20 | 20 20 46 4e 74 72 61 6e |..=*|! | FNtran|
|00001d50| 73 66 65 72 5f 73 65 6e | 64 62 6c 6f 63 6b 28 20 |sfer_sen|dblock( |
|00001d60| 70 6f 69 6e 74 65 72 20 | 2c 20 73 69 7a 65 20 2c |pointer |, size ,|
|00001d70| 20 66 69 6c 65 5f 74 79 | 70 65 20 29 0d 00 ef 07 | file_ty|pe )....|
|00001d80| 2a 7c 21 0d 00 f0 53 2a | 7c 21 54 68 69 73 20 66 |*|!...S*||!This f|
|00001d90| 75 6e 63 74 69 6f 6e 20 | 69 73 20 63 61 6c 6c 65 |unction |is calle|
|00001da0| 64 20 74 6f 20 73 65 6e | 64 20 61 20 62 6c 6f 63 |d to sen|d a bloc|
|00001db0| 6b 20 64 61 74 61 20 76 | 69 61 20 61 20 52 41 4d |k data v|ia a RAM|
|00001dc0| 20 74 72 61 6e 73 66 65 | 72 2e 20 54 68 65 20 70 | transfe|r. The p|
|00001dd0| 72 6f 67 72 61 6d 0d 00 | f1 4f 2a 7c 21 73 68 6f |rogram..|.O*|!sho|
|00001de0| 75 6c 64 20 66 69 6c 6c | 20 74 68 65 20 62 75 66 |uld fill| the buf|
|00001df0| 66 65 72 20 77 69 74 68 | 20 74 68 65 20 6e 65 78 |fer with| the nex|
|00001e00| 74 20 62 6c 6f 63 6b 20 | 6f 66 20 64 61 74 61 20 |t block |of data |
|00001e10| 74 6f 20 62 65 20 73 65 | 6e 74 20 28 75 73 69 6e |to be se|nt (usin|
|00001e20| 67 20 74 68 65 0d 00 f2 | 53 2a 7c 21 66 69 6c 65 |g the...|S*|!file|
|00001e30| 74 79 70 65 20 74 6f 20 | 64 65 74 65 72 6d 69 6e |type to |determin|
|00001e40| 65 20 77 68 61 74 20 64 | 61 74 61 20 74 6f 20 73 |e what d|ata to s|
|00001e50| 65 6e 64 20 69 66 20 6e | 65 63 65 73 73 61 72 79 |end if n|ecessary|
|00001e60| 29 2c 20 61 6e 64 20 72 | 65 74 75 72 6e 20 74 68 |), and r|eturn th|
|00001e70| 65 20 61 6d 6f 75 6e 74 | 0d 00 f3 4d 2a 7c 21 6f |e amount|...M*|!o|
|00001e80| 66 20 64 61 74 61 20 70 | 75 74 20 69 6e 20 74 68 |f data p|ut in th|
|00001e90| 65 20 62 75 66 66 65 72 | 2e 20 54 68 69 73 20 69 |e buffer|. This i|
|00001ea0| 73 20 72 65 70 65 61 74 | 65 64 20 75 6e 74 69 6c |s repeat|ed until|
|00001eb0| 20 61 20 6e 6f 6e 2d 66 | 75 6c 6c 20 62 75 66 66 | a non-f|ull buff|
|00001ec0| 65 72 20 69 73 0d 00 f4 | 4e 2a 7c 21 72 65 74 75 |er is...|N*|!retu|
|00001ed0| 72 6e 65 64 2e 20 49 66 | 20 61 20 70 72 6f 67 72 |rned. If| a progr|
|00001ee0| 61 6d 20 64 6f 65 73 20 | 6e 6f 74 20 77 69 73 68 |am does |not wish|
|00001ef0| 20 74 6f 20 73 75 70 70 | 6f 72 74 20 52 41 4d 20 | to supp|ort RAM |
|00001f00| 74 72 61 6e 73 66 65 72 | 2c 20 69 74 20 73 68 6f |transfer|, it sho|
|00001f10| 75 6c 64 0d 00 f5 1f 2a | 7c 21 6e 6f 74 20 64 65 |uld....*||!not de|
|00001f20| 66 69 6e 65 20 74 68 69 | 73 20 72 6f 75 74 69 6e |fine thi|s routin|
|00001f30| 65 2e 0d 00 f6 37 dd 20 | f2 74 72 61 6e 73 66 65 |e....7. |.transfe|
|00001f40| 72 5f 73 74 61 72 74 64 | 72 61 67 28 66 69 6c 65 |r_startd|rag(file|
|00001f50| 24 2c 74 79 70 65 25 2c | 73 69 7a 65 25 2c 77 69 |$,type%,|size%,wi|
|00001f60| 6e 25 2c 69 63 6f 6e 25 | 29 0d 00 f7 39 ea 20 66 |n%,icon%|)...9. f|
|00001f70| 6c 61 67 25 2c 78 6d 69 | 6e 25 2c 78 6d 61 78 25 |lag%,xmi|n%,xmax%|
|00001f80| 2c 79 6d 69 6e 25 2c 79 | 6d 61 78 25 2c 78 73 69 |,ymin%,y|max%,xsi|
|00001f90| 7a 65 25 2c 79 73 69 7a | 65 25 2c 73 70 72 69 74 |ze%,ysiz|e%,sprit|
|00001fa0| 65 24 0d 00 f8 24 21 5f | 77 69 6d 70 5f 62 75 66 |e$...$!_|wimp_buf|
|00001fb0| 66 65 72 25 3d a4 77 69 | 6e 5f 68 61 6e 64 6c 65 |fer%=.wi|n_handle|
|00001fc0| 28 77 69 6e 25 29 0d 00 | f9 2a c8 99 20 22 57 69 |(win%)..|.*.. "Wi|
|00001fd0| 6d 70 5f 47 65 74 57 69 | 6e 64 6f 77 49 6e 66 6f |mp_GetWi|ndowInfo|
|00001fe0| 22 2c 2c 5f 77 69 6d 70 | 5f 62 75 66 66 65 72 25 |",,_wimp|_buffer%|
|00001ff0| 0d 00 fa 38 78 6d 69 6e | 25 3d 5f 77 69 6d 70 5f |...8xmin|%=_wimp_|
|00002000| 62 75 66 66 65 72 25 21 | 34 2b 21 28 5f 77 69 6d |buffer%!|4+!(_wim|
|00002010| 70 5f 62 75 66 66 65 72 | 25 2b 39 32 2b 33 32 2a |p_buffer|%+92+32*|
|00002020| 69 63 6f 6e 25 2b 30 29 | 0d 00 fb 38 78 6d 61 78 |icon%+0)|...8xmax|
|00002030| 25 3d 5f 77 69 6d 70 5f | 62 75 66 66 65 72 25 21 |%=_wimp_|buffer%!|
|00002040| 34 2b 21 28 5f 77 69 6d | 70 5f 62 75 66 66 65 72 |4+!(_wim|p_buffer|
|00002050| 25 2b 39 32 2b 33 32 2a | 69 63 6f 6e 25 2b 38 29 |%+92+32*|icon%+8)|
|00002060| 0d 00 fc 5b 79 6d 69 6e | 25 3d 5f 77 69 6d 70 5f |...[ymin|%=_wimp_|
|00002070| 62 75 66 66 65 72 25 21 | 38 2b 21 28 5f 77 69 6d |buffer%!|8+!(_wim|
|00002080| 70 5f 62 75 66 66 65 72 | 25 2b 39 32 2b 33 32 2a |p_buffer|%+92+32*|
|00002090| 69 63 6f 6e 25 2b 34 29 | 2b 28 5f 77 69 6d 70 5f |icon%+4)|+(_wimp_|
|000020a0| 62 75 66 66 65 72 25 21 | 31 36 2d 5f 77 69 6d 70 |buffer%!|16-_wimp|
|000020b0| 5f 62 75 66 66 65 72 25 | 21 38 29 0d 00 fd 5c 79 |_buffer%|!8)...\y|
|000020c0| 6d 61 78 25 3d 5f 77 69 | 6d 70 5f 62 75 66 66 65 |max%=_wi|mp_buffe|
|000020d0| 72 25 21 38 2b 21 28 5f | 77 69 6d 70 5f 62 75 66 |r%!8+!(_|wimp_buf|
|000020e0| 66 65 72 25 2b 39 32 2b | 33 32 2a 69 63 6f 6e 25 |fer%+92+|32*icon%|
|000020f0| 2b 31 32 29 2b 28 5f 77 | 69 6d 70 5f 62 75 66 66 |+12)+(_w|imp_buff|
|00002100| 65 72 25 21 31 36 2d 5f | 77 69 6d 70 5f 62 75 66 |er%!16-_|wimp_buf|
|00002110| 66 65 72 25 21 38 29 0d | 00 fe 21 f2 6f 73 5f 73 |fer%!8).|..!.os_s|
|00002120| 63 72 65 65 6e 73 69 7a | 65 28 78 73 69 7a 65 25 |creensiz|e(xsize%|
|00002130| 2c 79 73 69 7a 65 25 29 | 0d 00 ff 1b e7 20 5f 77 |,ysize%)|..... _w|
|00002140| 69 6d 70 5f 76 65 72 73 | 69 6f 6e 25 3e 3d 33 30 |imp_vers|ion%>=30|
|00002150| 30 20 8c 0d 01 00 23 20 | 20 c8 99 20 22 4f 53 5f |0 ....# | .. "OS_|
|00002160| 42 79 74 65 22 2c 31 36 | 31 2c 32 38 20 b8 20 2c |Byte",16|1,28 . ,|
|00002170| 2c 66 6c 61 67 25 0d 01 | 01 1d 20 20 66 6c 61 67 |,flag%..|.. flag|
|00002180| 25 3d 28 28 66 6c 61 67 | 25 20 80 20 32 29 20 3d |%=((flag|% . 2) =|
|00002190| 20 32 29 0d 01 02 05 cc | 0d 01 03 0d 20 20 66 6c | 2).....|.... fl|
|000021a0| 61 67 25 3d a3 0d 01 04 | 05 cd 0d 01 05 0d e7 20 |ag%=....|....... |
|000021b0| 66 6c 61 67 25 20 8c 0d | 01 06 1b 20 20 5f 77 69 |flag% ..|... _wi|
|000021c0| 6d 70 5f 62 75 66 66 65 | 72 25 21 30 3d 78 6d 69 |mp_buffe|r%!0=xmi|
|000021d0| 6e 25 0d 01 07 1b 20 20 | 5f 77 69 6d 70 5f 62 75 |n%.... |_wimp_bu|
|000021e0| 66 66 65 72 25 21 34 3d | 79 6d 69 6e 25 0d 01 08 |ffer%!4=|ymin%...|
|000021f0| 1b 20 20 5f 77 69 6d 70 | 5f 62 75 66 66 65 72 25 |. _wimp|_buffer%|
|00002200| 21 38 3d 78 6d 61 78 25 | 0d 01 09 1c 20 20 5f 77 |!8=xmax%|.... _w|
|00002210| 69 6d 70 5f 62 75 66 66 | 65 72 25 21 31 32 3d 79 |imp_buff|er%!12=y|
|00002220| 6d 61 78 25 0d 01 0a 48 | 20 20 73 70 72 69 74 65 |max%...H| sprite|
|00002230| 24 3d 22 66 69 6c 65 5f | 22 3a e7 20 74 79 70 65 |$="file_|":. type|
|00002240| 25 3c 26 31 30 30 20 73 | 70 72 69 74 65 24 2b 3d |%<&100 s|prite$+=|
|00002250| 22 30 22 3a e7 20 74 79 | 70 65 25 3c 26 31 30 20 |"0":. ty|pe%<&10 |
|00002260| 73 70 72 69 74 65 24 2b | 3d 22 30 22 0d 01 0b 18 |sprite$+|="0"....|
|00002270| 20 20 73 70 72 69 74 65 | 24 2b 3d c3 7e 28 74 79 | sprite|$+=.~(ty|
|00002280| 70 65 25 29 0d 01 0c 40 | 20 20 c8 99 20 22 44 72 |pe%)...@| .. "Dr|
|00002290| 61 67 41 53 70 72 69 74 | 65 5f 53 74 61 72 74 22 |agASprit|e_Start"|
|000022a0| 2c 25 31 31 30 30 30 31 | 30 31 2c 31 2c 73 70 72 |,%110001|01,1,spr|
|000022b0| 69 74 65 24 2c 5f 77 69 | 6d 70 5f 62 75 66 66 65 |ite$,_wi|mp_buffe|
|000022c0| 72 25 2c 30 0d 01 0d 05 | cc 0d 01 0e 16 20 20 21 |r%,0....|..... !|
|000022d0| 5f 77 69 6d 70 5f 62 75 | 66 66 65 72 25 3d 30 0d |_wimp_bu|ffer%=0.|
|000022e0| 01 0f 17 20 20 5f 77 69 | 6d 70 5f 62 75 66 66 65 |... _wi|mp_buffe|
|000022f0| 72 25 21 34 3d 35 0d 01 | 10 32 20 20 5f 77 69 6d |r%!4=5..|.2 _wim|
|00002300| 70 5f 62 75 66 66 65 72 | 25 21 38 3d 78 6d 69 6e |p_buffer|%!8=xmin|
|00002310| 25 3a 5f 77 69 6d 70 5f | 62 75 66 66 65 72 25 21 |%:_wimp_|buffer%!|
|00002320| 31 32 3d 79 6d 69 6e 25 | 0d 01 11 33 20 20 5f 77 |12=ymin%|...3 _w|
|00002330| 69 6d 70 5f 62 75 66 66 | 65 72 25 21 31 36 3d 78 |imp_buff|er%!16=x|
|00002340| 6d 61 78 25 3a 5f 77 69 | 6d 70 5f 62 75 66 66 65 |max%:_wi|mp_buffe|
|00002350| 72 25 21 32 30 3d 79 6d | 61 78 25 0d 01 12 2b 20 |r%!20=ym|ax%...+ |
|00002360| 20 5f 77 69 6d 70 5f 62 | 75 66 66 65 72 25 21 32 | _wimp_b|uffer%!2|
|00002370| 34 3d 30 3a 5f 77 69 6d | 70 5f 62 75 66 66 65 72 |4=0:_wim|p_buffer|
|00002380| 25 21 32 38 3d 30 0d 01 | 13 35 20 20 5f 77 69 6d |%!28=0..|.5 _wim|
|00002390| 70 5f 62 75 66 66 65 72 | 25 21 33 32 3d 78 73 69 |p_buffer|%!32=xsi|
|000023a0| 7a 65 25 3a 5f 77 69 6d | 70 5f 62 75 66 66 65 72 |ze%:_wim|p_buffer|
|000023b0| 25 21 33 36 3d 79 73 69 | 7a 65 25 0d 01 14 26 20 |%!36=ysi|ze%...& |
|000023c0| 20 c8 99 20 22 57 69 6d | 70 5f 44 72 61 67 42 6f | .. "Wim|p_DragBo|
|000023d0| 78 22 2c 2c 5f 77 69 6d | 70 5f 62 75 66 66 65 72 |x",,_wim|p_buffer|
|000023e0| 25 0d 01 15 05 cd 0d 01 | 16 19 5f 74 72 61 6e 73 |%.......|.._trans|
|000023f0| 66 65 72 5f 74 79 70 65 | 25 3d 74 79 70 65 25 0d |fer_type|%=type%.|
|00002400| 01 17 19 5f 74 72 61 6e | 73 66 65 72 5f 66 69 6c |..._tran|sfer_fil|
|00002410| 65 24 3d 66 69 6c 65 24 | 0d 01 18 19 5f 74 72 61 |e$=file$|...._tra|
|00002420| 6e 73 66 65 72 5f 73 69 | 7a 65 25 3d 73 69 7a 65 |nsfer_si|ze%=size|
|00002430| 25 0d 01 19 19 5f 74 72 | 61 6e 73 66 65 72 5f 64 |%...._tr|ansfer_d|
|00002440| 72 61 67 67 69 6e 67 25 | 3d b9 0d 01 1a 05 e1 0d |ragging%|=.......|
|00002450| 01 1b 21 2a 7c 73 74 6f | 70 20 50 52 4f 43 74 72 |..!*|sto|p PROCtr|
|00002460| 61 6e 73 66 65 72 5f 73 | 74 61 72 74 64 72 61 67 |ansfer_s|tartdrag|
|00002470| 0d 01 1c 04 0d 01 1d 23 | 2a 7c 73 74 61 72 74 20 |.......#|*|start |
|00002480| 50 52 4f 43 74 72 61 6e | 73 66 65 72 5f 73 74 61 |PROCtran|sfer_sta|
|00002490| 72 74 70 72 69 6e 74 0d | 01 1e 40 2a 7c 21 50 52 |rtprint.|..@*|!PR|
|000024a0| 4f 43 74 72 61 6e 73 66 | 65 72 5f 73 74 61 72 74 |OCtransf|er_start|
|000024b0| 70 72 69 6e 74 28 20 6a | 6f 62 5f 6e 61 6d 65 20 |print( j|ob_name |
|000024c0| 2c 20 6a 6f 62 5f 74 79 | 70 65 20 2c 20 6a 6f 62 |, job_ty|pe , job|
|000024d0| 5f 73 69 7a 65 20 29 0d | 01 1f 07 2a 7c 21 0d 01 |_size ).|...*|!..|
|000024e0| 20 45 2a 7c 21 53 74 61 | 72 74 73 20 61 20 64 69 | E*|!Sta|rts a di|
|000024f0| 61 6c 6f 67 75 65 20 77 | 69 74 68 20 74 68 65 20 |alogue w|ith the |
|00002500| 70 72 69 6e 74 65 72 20 | 6d 61 6e 61 67 65 72 2c |printer |manager,|
|00002510| 20 21 50 72 69 6e 74 65 | 72 73 2e 20 49 74 20 61 | !Printe|rs. It a|
|00002520| 73 6b 73 0d 01 21 42 2a | 7c 21 74 6f 20 70 72 69 |sks..!B*||!to pri|
|00002530| 6e 74 20 74 68 65 20 73 | 70 65 63 69 66 69 65 64 |nt the s|pecified|
|00002540| 20 6a 6f 62 2c 20 61 6e | 64 20 6e 65 67 6f 74 69 | job, an|d negoti|
|00002550| 61 74 65 73 20 77 69 74 | 68 20 74 68 65 20 70 72 |ates wit|h the pr|
|00002560| 69 6e 74 65 72 0d 01 22 | 45 2a 7c 21 6d 61 6e 61 |inter.."|E*|!mana|
|00002570| 67 65 72 20 74 6f 20 61 | 63 68 69 65 76 65 20 74 |ger to a|chieve t|
|00002580| 68 69 73 2e 20 54 68 65 | 20 6a 6f 62 20 74 79 70 |his. The| job typ|
|00002590| 65 20 69 73 20 61 20 73 | 74 61 6e 64 61 72 64 20 |e is a s|tandard |
|000025a0| 66 69 6c 65 20 74 79 70 | 65 2e 0d 01 23 43 2a 7c |file typ|e...#C*||
|000025b0| 21 49 66 20 69 74 20 61 | 73 6b 65 64 20 74 6f 20 |!If it a|sked to |
|000025c0| 71 75 65 75 65 20 74 68 | 65 20 66 69 6c 65 2c 20 |queue th|e file, |
|000025d0| 69 74 20 77 69 6c 6c 20 | 75 73 65 20 74 68 65 20 |it will |use the |
|000025e0| 75 73 65 72 20 72 6f 75 | 74 69 6e 65 2c 0d 01 24 |user rou|tine,..$|
|000025f0| 3d 2a 7c 21 50 52 4f 43 | 74 72 61 6e 73 66 65 72 |=*|!PROC|transfer|
|00002600| 5f 73 61 76 65 66 69 6c | 65 20 74 6f 20 64 6f 20 |_savefil|e to do |
|00002610| 73 6f 2e 20 54 68 69 73 | 20 69 73 20 64 65 74 61 |so. This| is deta|
|00002620| 69 6c 65 64 20 75 6e 64 | 65 72 0d 01 25 1e 2a 7c |iled und|er..%.*||
|00002630| 21 50 52 4f 43 74 72 61 | 6e 73 66 65 72 5f 73 74 |!PROCtra|nsfer_st|
|00002640| 61 72 74 64 72 61 67 2e | 0d 01 26 07 2a 7c 21 0d |artdrag.|..&.*|!.|
|00002650| 01 27 45 2a 7c 21 49 66 | 20 74 6f 6c 64 20 74 6f |.'E*|!If| told to|
|00002660| 20 70 72 69 6e 74 20 74 | 68 65 20 66 69 6c 65 20 | print t|he file |
|00002670| 69 6d 6d 65 64 69 61 74 | 65 6c 79 2c 20 6f 72 20 |immediat|ely, or |
|00002680| 77 68 65 6e 20 61 20 66 | 69 6c 65 20 72 69 73 65 |when a f|ile rise|
|00002690| 73 20 74 6f 0d 01 28 42 | 2a 7c 21 74 68 65 20 74 |s to..(B|*|!the t|
|000026a0| 6f 70 20 6f 66 20 74 68 | 65 20 71 75 65 75 65 2c |op of th|e queue,|
|000026b0| 20 69 74 20 77 69 6c 6c | 20 63 61 6c 6c 20 61 20 | it will| call a |
|000026c0| 75 73 65 72 20 73 75 70 | 70 6c 69 65 64 20 72 6f |user sup|plied ro|
|000026d0| 75 74 69 6e 65 3a 0d 01 | 29 07 2a 7c 21 0d 01 2a |utine:..|).*|!..*|
|000026e0| 3a 2a 7c 21 20 20 20 20 | 50 52 4f 43 74 72 61 6e |:*|! |PROCtran|
|000026f0| 73 66 65 72 5f 70 72 69 | 6e 74 66 69 6c 65 28 20 |sfer_pri|ntfile( |
|00002700| 66 69 6c 65 5f 6e 61 6d | 65 20 2c 20 66 69 6c 65 |file_nam|e , file|
|00002710| 5f 74 79 70 65 20 29 0d | 01 2b 07 2a 7c 21 0d 01 |_type ).|.+.*|!..|
|00002720| 2c 44 2a 7c 21 49 66 20 | 74 68 69 73 20 63 61 6c |,D*|!If |this cal|
|00002730| 6c 20 64 6f 65 73 20 6e | 6f 74 20 72 65 73 75 6c |l does n|ot resul|
|00002740| 74 20 66 72 6f 6d 20 61 | 20 66 69 6c 65 20 72 69 |t from a| file ri|
|00002750| 73 69 6e 67 20 74 6f 20 | 74 68 65 20 74 6f 70 20 |sing to |the top |
|00002760| 6f 66 0d 01 2d 43 2a 7c | 21 74 68 65 20 71 75 65 |of..-C*||!the que|
|00002770| 75 65 2c 20 74 68 65 6e | 20 74 68 65 20 66 69 6c |ue, then| the fil|
|00002780| 65 20 6e 61 6d 65 20 77 | 69 6c 6c 20 62 65 20 61 |e name w|ill be a|
|00002790| 20 6e 75 6c 6c 20 73 74 | 72 69 6e 67 2c 20 61 6e | null st|ring, an|
|000027a0| 64 20 74 68 65 0d 01 2e | 43 2a 7c 21 72 6f 75 74 |d the...|C*|!rout|
|000027b0| 69 6e 65 20 73 68 6f 75 | 6c 64 20 70 72 69 6e 74 |ine shou|ld print|
|000027c0| 20 74 68 65 20 6a 6f 62 | 20 72 65 66 65 72 72 65 | the job| referre|
|000027d0| 64 20 74 6f 20 62 79 20 | 74 68 65 20 6c 61 73 74 |d to by |the last|
|000027e0| 20 63 61 6c 6c 20 74 6f | 0d 01 2f 1f 2a 7c 21 50 | call to|../.*|!P|
|000027f0| 52 4f 43 74 72 61 6e 73 | 66 65 72 5f 73 74 61 72 |ROCtrans|fer_star|
|00002800| 74 70 72 69 6e 74 2e 0d | 01 30 2c dd 20 f2 74 72 |tprint..|.0,. .tr|
|00002810| 61 6e 73 66 65 72 5f 73 | 74 61 72 74 70 72 69 6e |ansfer_s|tartprin|
|00002820| 74 28 6a 6f 62 24 2c 74 | 79 70 65 25 2c 73 69 7a |t(job$,t|ype%,siz|
|00002830| 65 25 29 0d 01 31 29 5f | 77 69 6d 70 5f 62 75 66 |e%)..1)_|wimp_buf|
|00002840| 66 65 72 25 21 32 30 3d | 30 3a 5f 77 69 6d 70 5f |fer%!20=|0:_wimp_|
|00002850| 62 75 66 66 65 72 25 21 | 32 34 3d 30 0d 01 32 29 |buffer%!|24=0..2)|
|00002860| 5f 77 69 6d 70 5f 62 75 | 66 66 65 72 25 21 32 38 |_wimp_bu|ffer%!28|
|00002870| 3d 30 3a 5f 77 69 6d 70 | 5f 62 75 66 66 65 72 25 |=0:_wimp|_buffer%|
|00002880| 21 33 32 3d 30 0d 01 33 | 1a 5f 77 69 6d 70 5f 62 |!32=0..3|._wimp_b|
|00002890| 75 66 66 65 72 25 21 33 | 36 3d 73 69 7a 65 25 0d |uffer%!3|6=size%.|
|000028a0| 01 34 1a 5f 77 69 6d 70 | 5f 62 75 66 66 65 72 25 |.4._wimp|_buffer%|
|000028b0| 21 34 30 3d 74 79 70 65 | 25 0d 01 35 1c 24 28 5f |!40=type|%..5.$(_|
|000028c0| 77 69 6d 70 5f 62 75 66 | 66 65 72 25 2b 34 34 29 |wimp_buf|fer%+44)|
|000028d0| 3d 6a 6f 62 24 0d 01 36 | 2e 5f 77 69 6d 70 5f 62 |=job$..6|._wimp_b|
|000028e0| 75 66 66 65 72 25 21 31 | 32 3d 30 3a 5f 77 69 6d |uffer%!1|2=0:_wim|
|000028f0| 70 5f 62 75 66 66 65 72 | 25 21 31 36 3d 26 38 30 |p_buffer|%!16=&80|
|00002900| 31 34 32 0d 01 37 29 21 | 5f 77 69 6d 70 5f 62 75 |142..7)!|_wimp_bu|
|00002910| 66 66 65 72 25 3d 34 34 | 2b 34 2a 28 28 a9 28 6a |ffer%=44|+4*((.(j|
|00002920| 6f 62 24 29 2b 34 29 20 | 81 20 34 29 0d 01 38 2c |ob$)+4) |. 4)..8,|
|00002930| c8 99 20 22 57 69 6d 70 | 5f 53 65 6e 64 4d 65 73 |.. "Wimp|_SendMes|
|00002940| 73 61 67 65 22 2c 31 38 | 2c 5f 77 69 6d 70 5f 62 |sage",18|,_wimp_b|
|00002950| 75 66 66 65 72 25 2c 30 | 0d 01 39 22 5f 74 72 61 |uffer%,0|..9"_tra|
|00002960| 6e 73 66 65 72 5f 72 65 | 66 25 3d 5f 77 69 6d 70 |nsfer_re|f%=_wimp|
|00002970| 5f 62 75 66 66 65 72 25 | 21 38 0d 01 3a 19 5f 74 |_buffer%|!8..:._t|
|00002980| 72 61 6e 73 66 65 72 5f | 74 79 70 65 25 3d 74 79 |ransfer_|type%=ty|
|00002990| 70 65 25 0d 01 3b 05 e1 | 0d 01 3c 23 2a 7c 73 74 |pe%..;..|..<#*|st|
|000029a0| 6f 70 20 50 52 4f 43 74 | 72 61 6e 73 66 65 72 5f |op PROCt|ransfer_|
|000029b0| 73 74 61 72 74 70 72 69 | 6e 74 20 0d ff |startpri|nt .. |
+--------+-------------------------+-------------------------+--------+--------+