/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / t / textshell / !TextShell / !RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0f de 20 63 68 | 6c 65 6e 25 20 31 30 0d |..... ch|len% 10.|
|00000010| 00 14 31 f4 20 63 68 61 | 6e 67 65 20 74 68 69 73 |..1. cha|nge this|
|00000020| 20 76 61 6c 75 65 20 74 | 6f 20 69 6e 63 72 65 61 | value t|o increa|
|00000030| 73 65 20 73 74 6f 72 61 | 67 65 20 73 70 61 63 65 |se stora|ge space|
|00000040| 0d 00 1e 1e 73 70 61 63 | 65 25 3d 31 30 30 30 20 |....spac|e%=1000 |
|00000050| 20 20 20 20 3a f4 20 28 | 62 79 74 65 73 29 0d 00 |    :. (|bytes)..|
|00000060| 28 2a f4 20 63 68 61 6e | 67 65 20 74 68 69 73 20 |(*. chan|ge this |
|00000070| 74 6f 20 79 6f 75 72 20 | 61 70 70 6c 69 63 61 74 |to your |applicat|
|00000080| 69 6f 6e 20 6e 61 6d 65 | 0d 00 32 10 61 70 70 24 |ion name|..2.app$|
|00000090| 3d 22 53 68 65 6c 6c 22 | 0d 00 3c 25 f4 20 63 68 |="Shell"|..<%. ch|
|000000a0| 61 6e 67 65 20 74 68 69 | 73 20 74 6f 20 79 6f 75 |ange thi|s to you|
|000000b0| 72 20 73 70 72 69 74 65 | 20 6e 61 6d 65 0d 00 46 |r sprite| name..F|
|000000c0| 18 73 70 6e 61 6d 65 24 | 3d 22 21 74 65 78 74 73 |.spname$|="!texts|
|000000d0| 68 65 6c 6c 22 0d 00 50 | 2f f4 20 63 68 61 6e 67 |hell"..P|/. chang|
|000000e0| 65 20 74 68 69 73 20 74 | 6f 20 74 68 65 20 6e 61 |e this t|o the na|
|000000f0| 6d 65 20 6f 66 20 79 6f | 75 72 20 70 61 72 61 6d |me of yo|ur param|
|00000100| 65 74 65 72 0d 00 5a 18 | 70 61 72 61 6d 24 3d 22 |eter..Z.|param$="|
|00000110| 4c 69 6e 65 20 4c 65 6e | 67 74 68 22 0d 00 64 37 |Line Len|gth"..d7|
|00000120| f4 20 63 68 61 6e 67 65 | 20 74 68 69 73 20 74 6f |. change| this to|
|00000130| 20 74 68 65 20 64 65 66 | 61 75 6c 74 20 76 61 6c | the def|ault val|
|00000140| 75 65 20 6f 66 20 74 68 | 65 20 70 61 72 61 6d 65 |ue of th|e parame|
|00000150| 74 65 72 0d 00 6e 12 24 | 63 68 6c 65 6e 25 3d 22 |ter..n.$|chlen%="|
|00000160| 4e 6f 6e 65 22 0d 00 78 | 3f f4 20 74 68 65 20 70 |None"..x|?. the p|
|00000170| 61 72 61 6d 65 74 65 72 | 20 77 69 6c 6c 20 62 65 |arameter| will be|
|00000180| 20 70 61 73 73 65 64 20 | 61 73 20 61 20 73 74 72 | passed |as a str|
|00000190| 69 6e 67 20 74 6f 20 79 | 6f 75 72 20 72 6f 75 74 |ing to y|our rout|
|000001a0| 69 6e 65 2e 0d 00 82 04 | 0d 00 8c 1a c8 9b 22 3c |ine.....|......"<|
|000001b0| 4f 62 65 79 24 44 69 72 | 3e 2e 57 69 6d 70 4c 69 |Obey$Dir|>.WimpLi|
|000001c0| 62 22 0d 00 96 09 f2 69 | 6e 69 74 0d 00 a0 0e c8 |b".....i|nit.....|
|000001d0| 95 20 ac 20 71 75 69 74 | 25 0d 00 aa 09 f2 70 6f |. . quit|%.....po|
|000001e0| 6c 6c 0d 00 b4 05 ce 0d | 00 be 16 c8 99 22 57 69 |ll......|....."Wi|
|000001f0| 6d 70 5f 43 6c 6f 73 65 | 44 6f 77 6e 22 0d 00 c8 |mp_Close|Down"...|
|00000200| 05 e0 0d 00 d2 05 3a 0d | 00 dc 0a dd f2 69 6e 69 |......:.|.....ini|
|00000210| 74 0d 00 e6 4a de 20 62 | 6c 6f 63 6b 25 20 26 31 |t...J. b|lock% &1|
|00000220| 30 30 30 2c 6d 65 6e 75 | 25 20 32 30 30 2c 70 61 |000,menu|% 200,pa|
|00000230| 72 61 6d 65 6e 75 25 20 | 31 30 30 2c 73 76 49 4e |ramenu% |100,svIN|
|00000240| 44 25 20 33 30 30 2c 69 | 6e 66 49 4e 44 25 20 33 |D% 300,i|nfIND% 3|
|00000250| 30 30 2c 6e 61 6d 65 25 | 20 31 31 0d 00 f0 18 71 |00,name%| 11....q|
|00000260| 75 69 74 25 3d a3 3a 74 | 70 25 3d 30 3a 64 69 6d |uit%=.:t|p%=0:dim|
|00000270| 25 3d 30 0d 00 fa 1f de | 20 66 6c 69 6e 65 24 28 |%=0.....| fline$(|
|00000280| 73 70 61 63 65 25 29 3a | 6c 61 73 74 70 6f 73 25 |space%):|lastpos%|
|00000290| 3d 31 0d 01 04 0b 6d 61 | 73 6b 25 3d 30 0d 01 0e |=1....ma|sk%=0...|
|000002a0| 35 ee 20 85 20 f2 77 69 | 6d 70 65 72 72 6f 72 28 |5. . .wi|mperror(|
|000002b0| 62 6c 6f 63 6b 25 2c 32 | 35 35 2c f6 24 2b 22 20 |block%,2|55,.$+" |
|000002c0| 61 74 20 6c 69 6e 65 20 | 22 2b c3 9e 2c 61 70 70 |at line |"+..,app|
|000002d0| 24 29 0d 01 18 2a c8 99 | 22 57 69 6d 70 5f 49 6e |$)...*..|"Wimp_In|
|000002e0| 69 74 69 61 6c 69 73 65 | 22 2c 32 30 30 2c 26 34 |itialise|",200,&4|
|000002f0| 42 35 33 34 31 35 34 2c | 61 70 70 24 0d 01 22 31 |B534154,|app$.."1|
|00000300| c8 99 22 57 69 6d 70 5f | 4f 70 65 6e 54 65 6d 70 |.."Wimp_|OpenTemp|
|00000310| 6c 61 74 65 22 2c 2c 22 | 3c 4f 62 65 79 24 44 69 |late",,"|<Obey$Di|
|00000320| 72 3e 2e 54 65 6d 70 6c | 61 74 65 73 22 0d 01 2c |r>.Templ|ates"..,|
|00000330| 13 24 6e 61 6d 65 25 3d | 22 53 61 76 65 61 73 22 |.$name%=|"Saveas"|
|00000340| 0d 01 36 40 c8 99 22 57 | 69 6d 70 5f 4c 6f 61 64 |..6@.."W|imp_Load|
|00000350| 54 65 6d 70 6c 61 74 65 | 22 2c 2c 62 6c 6f 63 6b |Template|",,block|
|00000360| 25 2c 73 76 49 4e 44 25 | 2c 73 76 49 4e 44 25 2b |%,svIND%|,svIND%+|
|00000370| 33 30 30 2c 2d 31 2c 6e | 61 6d 65 25 2c 74 70 25 |300,-1,n|ame%,tp%|
|00000380| 0d 01 40 0f 62 6c 6f 63 | 6b 25 21 36 34 3d 31 0d |..@.bloc|k%!64=1.|
|00000390| 01 4a 2c c8 99 22 57 69 | 6d 70 5f 43 72 65 61 74 |.J,.."Wi|mp_Creat|
|000003a0| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|000003b0| 20 b8 20 73 61 76 65 62 | 6f 78 25 0d 01 54 11 24 | . saveb|ox%..T.$|
|000003c0| 6e 61 6d 65 25 3d 22 49 | 6e 66 6f 22 0d 01 5e 42 |name%="I|nfo"..^B|
|000003d0| c8 99 22 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |.."Wimp_|LoadTemp|
|000003e0| 6c 61 74 65 22 2c 2c 62 | 6c 6f 63 6b 25 2c 69 6e |late",,b|lock%,in|
|000003f0| 66 49 4e 44 25 2c 69 6e | 66 49 4e 44 25 2b 33 30 |fIND%,in|fIND%+30|
|00000400| 30 2c 2d 31 2c 6e 61 6d | 65 25 2c 74 70 25 0d 01 |0,-1,nam|e%,tp%..|
|00000410| 68 0f 62 6c 6f 63 6b 25 | 21 36 34 3d 31 0d 01 72 |h.block%|!64=1..r|
|00000420| 29 c8 99 22 57 69 6d 70 | 5f 43 72 65 61 74 65 57 |).."Wimp|_CreateW|
|00000430| 69 6e 64 6f 77 22 2c 2c | 62 6c 6f 63 6b 25 20 b8 |indow",,|block% .|
|00000440| 20 69 6e 66 6f 25 0d 01 | 7c 1a c8 99 22 57 69 6d | info%..||..."Wim|
|00000450| 70 5f 43 6c 6f 73 65 54 | 65 6d 70 6c 61 74 65 22 |p_CloseT|emplate"|
|00000460| 0d 01 86 2a 69 68 6e 25 | 3d a4 69 63 6f 6e 5f 62 |...*ihn%|=.icon_b|
|00000470| 61 72 5f 69 63 6f 6e 28 | 62 6c 6f 63 6b 25 2c 73 |ar_icon(|block%,s|
|00000480| 70 6e 61 6d 65 24 2c 2d | 31 29 0d 01 90 2e f2 69 |pname$,-|1).....i|
|00000490| 6e 69 74 5f 6d 65 6e 75 | 28 70 61 72 61 6d 65 6e |nit_menu|(paramen|
|000004a0| 75 25 2c 77 69 64 74 68 | 32 25 2c 65 6e 64 32 25 |u%,width|2%,end2%|
|000004b0| 2c 70 61 72 61 6d 24 29 | 0d 01 9a 15 73 6d 66 6c |,param$)|....smfl|
|000004c0| 61 67 25 3d 31 31 37 34 | 34 30 38 30 31 0d 01 a4 |ag%=1174|40801...|
|000004d0| 4b f2 6d 65 6e 75 5f 69 | 74 65 6d 28 70 61 72 61 |K.menu_i|tem(para|
|000004e0| 6d 65 6e 75 25 2c 77 69 | 64 74 68 32 25 2c 65 6e |menu%,wi|dth2%,en|
|000004f0| 64 32 25 2c 22 22 2c 30 | 2c 30 2c 30 2c 31 2c 30 |d2%,"",0|,0,0,1,0|
|00000500| 2c 31 2c 30 2c 73 6d 66 | 6c 61 67 25 2c 63 68 6c |,1,0,smf|lag%,chl|
|00000510| 65 6e 25 2c 30 2c 33 29 | 0d 01 ae 29 f2 69 6e 69 |en%,0,3)|...).ini|
|00000520| 74 5f 6d 65 6e 75 28 6d | 65 6e 75 25 2c 77 69 64 |t_menu(m|enu%,wid|
|00000530| 74 68 25 2c 65 6e 64 25 | 2c 73 70 6e 61 6d 65 24 |th%,end%|,spname$|
|00000540| 29 0d 01 b8 39 f2 73 74 | 5f 6d 65 6e 75 5f 69 74 |)...9.st|_menu_it|
|00000550| 65 6d 28 6d 65 6e 75 25 | 2c 77 69 64 74 68 25 2c |em(menu%|,width%,|
|00000560| 65 6e 64 25 2c 22 49 6e | 66 6f 22 2c 30 2c 30 2c |end%,"In|fo",0,0,|
|00000570| 30 2c 30 2c 69 6e 66 6f | 25 29 0d 01 c2 3c f2 73 |0,0,info|%)...<.s|
|00000580| 74 5f 6d 65 6e 75 5f 69 | 74 65 6d 28 6d 65 6e 75 |t_menu_i|tem(menu|
|00000590| 25 2c 77 69 64 74 68 25 | 2c 65 6e 64 25 2c 22 53 |%,width%|,end%,"S|
|000005a0| 61 76 65 22 2c 30 2c 30 | 2c 30 2c 30 2c 73 61 76 |ave",0,0|,0,0,sav|
|000005b0| 65 62 6f 78 25 29 0d 01 | cc 3d f2 73 74 5f 6d 65 |ebox%)..|.=.st_me|
|000005c0| 6e 75 5f 69 74 65 6d 28 | 6d 65 6e 75 25 2c 77 69 |nu_item(|menu%,wi|
|000005d0| 64 74 68 25 2c 65 6e 64 | 25 2c 70 61 72 61 6d 24 |dth%,end|%,param$|
|000005e0| 2c 30 2c 30 2c 30 2c 30 | 2c 70 61 72 61 6d 65 6e |,0,0,0,0|,paramen|
|000005f0| 75 25 29 0d 01 d6 35 f2 | 73 74 5f 6d 65 6e 75 5f |u%)...5.|st_menu_|
|00000600| 69 74 65 6d 28 6d 65 6e | 75 25 2c 77 69 64 74 68 |item(men|u%,width|
|00000610| 25 2c 65 6e 64 25 2c 22 | 51 75 69 74 22 2c 30 2c |%,end%,"|Quit",0,|
|00000620| 30 2c 30 2c 31 2c 30 29 | 0d 01 e0 05 e1 0d 01 ea |0,0,1,0)|........|
|00000630| 05 3a 0d 01 f4 0a dd f2 | 70 6f 6c 6c 0d 01 fe 28 |.:......|poll...(|
|00000640| c8 99 22 57 69 6d 70 5f | 50 6f 6c 6c 22 2c 6d 61 |.."Wimp_|Poll",ma|
|00000650| 73 6b 25 2c 62 6c 6f 63 | 6b 25 20 b8 20 72 65 61 |sk%,bloc|k% . rea|
|00000660| 73 6f 6e 25 0d 02 08 10 | c8 8e 20 72 65 61 73 6f |son%....|.. reaso|
|00000670| 6e 25 20 ca 0d 02 12 22 | c9 32 3a c8 99 22 57 69 |n% ...."|.2:.."Wi|
|00000680| 6d 70 5f 4f 70 65 6e 57 | 69 6e 64 6f 77 22 2c 2c |mp_OpenW|indow",,|
|00000690| 62 6c 6f 63 6b 25 0d 02 | 1c 23 c9 33 3a c8 99 22 |block%..|.#.3:.."|
|000006a0| 57 69 6d 70 5f 43 6c 6f | 73 65 57 69 6e 64 6f 77 |Wimp_Clo|seWindow|
|000006b0| 22 2c 2c 62 6c 6f 63 6b | 25 0d 02 26 17 c9 36 3a |",,block|%..&..6:|
|000006c0| f2 63 6c 69 63 6b 28 73 | 61 76 65 62 6f 78 25 29 |.click(s|avebox%)|
|000006d0| 0d 02 30 30 c9 37 3a f2 | 65 6e 64 5f 64 72 61 67 |..00.7:.|end_drag|
|000006e0| 73 61 76 65 28 62 6c 6f | 63 6b 25 2c 73 61 76 65 |save(blo|ck%,save|
|000006f0| 62 6f 78 25 2c 31 2c 26 | 46 46 46 2c 33 30 30 29 |box%,1,&|FFF,300)|
|00000700| 0d 02 3a 16 c9 38 3a f2 | 6b 65 79 28 62 6c 6f 63 |..:..8:.|key(bloc|
|00000710| 6b 25 21 32 34 29 0d 02 | 44 12 c9 39 3a f2 6d 65 |k%!24)..|D..9:.me|
|00000720| 6e 75 73 65 6c 65 63 74 | 0d 02 4e 13 c9 31 37 2c |nuselect|..N..17,|
|00000730| 31 38 3a f2 6d 65 73 73 | 61 67 65 0d 02 58 4d c9 |18:.mess|age..XM.|
|00000740| 31 39 3a 65 72 72 25 3d | 77 69 6d 70 72 65 70 6f |19:err%=|wimprepo|
|00000750| 72 74 28 62 6c 6f 63 6b | 25 2c 32 35 35 2c 22 43 |rt(block|%,255,"C|
|00000760| 61 6e 6e 6f 74 20 73 61 | 76 65 20 74 6f 20 74 68 |annot sa|ve to th|
|00000770| 69 73 20 6c 6f 63 61 74 | 69 6f 6e 22 2c 61 70 70 |is locat|ion",app|
|00000780| 24 2c 31 2c 31 2c 30 29 | 0d 02 62 05 cb 0d 02 6c |$,1,1,0)|..b....l|
|00000790| 05 e1 0d 02 76 05 3a 0d | 02 80 15 dd f2 63 6c 69 |....v.:.|.....cli|
|000007a0| 63 6b 28 73 61 76 65 62 | 6f 78 25 29 0d 02 8a 12 |ck(saveb|ox%)....|
|000007b0| c8 8e 20 62 6c 6f 63 6b | 25 21 31 32 20 ca 0d 02 |.. block|%!12 ...|
|000007c0| 94 11 20 c9 20 73 61 76 | 65 62 6f 78 25 20 3a 0d |.. . sav|ebox% :.|
|000007d0| 02 9e 13 20 c8 8e 20 62 | 6c 6f 63 6b 25 21 31 36 |... .. b|lock%!16|
|000007e0| 20 ca 0d 02 a8 3e 20 20 | c9 20 30 3a e7 20 62 6c | ....>  |. 0:. bl|
|000007f0| 6f 63 6b 25 21 38 20 80 | 20 36 34 20 8c 20 f2 73 |ock%!8 .| 64 . .s|
|00000800| 74 61 72 74 5f 64 72 61 | 67 73 61 76 65 28 62 6c |tart_dra|gsave(bl|
|00000810| 6f 63 6b 25 2c 73 61 76 | 65 62 6f 78 25 2c 30 29 |ock%,sav|ebox%,0)|
|00000820| 0d 02 b2 3d 20 20 c9 20 | 32 3a e7 20 62 6c 6f 63 |...=  . |2:. bloc|
|00000830| 6b 25 21 38 20 80 20 35 | 20 8c 20 f2 71 75 69 63 |k%!8 . 5| . .quic|
|00000840| 6b 73 61 76 65 28 62 6c | 6f 63 6b 25 2c 73 61 76 |ksave(bl|ock%,sav|
|00000850| 65 62 6f 78 25 2c 31 2c | 61 70 70 24 29 0d 02 bc |ebox%,1,|app$)...|
|00000860| 06 20 cb 0d 02 c6 17 c9 | 20 2d 32 3a 20 c8 8e 20 |. ......| -2: .. |
|00000870| 62 6c 6f 63 6b 25 21 38 | 20 ca 0d 02 d0 2e c9 20 |block%!8| ...... |
|00000880| 32 20 3a 20 f2 64 69 73 | 70 6c 61 79 5f 62 61 72 |2 : .dis|play_bar|
|00000890| 5f 6d 65 6e 75 28 6d 65 | 6e 75 25 2c 34 2c 30 2c |_menu(me|nu%,4,0,|
|000008a0| 21 62 6c 6f 63 6b 25 29 | 0d 02 da 26 c9 20 34 20 |!block%)|...&. 4 |
|000008b0| 3a 20 f2 6f 70 65 6e 77 | 69 6e 64 6f 77 28 62 6c |: .openw|indow(bl|
|000008c0| 6f 63 6b 25 2c 73 61 76 | 65 62 6f 78 25 29 0d 02 |ock%,sav|ebox%)..|
|000008d0| e4 05 cb 0d 02 ee 05 cb | 0d 02 f8 05 e1 0d 03 02 |........|........|
|000008e0| 05 3a 0d 03 0c 20 dd f2 | 6f 70 65 6e 77 69 6e 64 |.:... ..|openwind|
|000008f0| 6f 77 28 62 6c 6f 63 6b | 25 2c 68 61 6e 64 6c 65 |ow(block|%,handle|
|00000900| 25 29 0d 03 16 13 21 62 | 6c 6f 63 6b 25 3d 68 61 |%)....!b|lock%=ha|
|00000910| 6e 64 6c 65 25 0d 03 20 | 23 c8 99 22 57 69 6d 70 |ndle%.. |#.."Wimp|
|00000920| 5f 47 65 74 57 69 6e 64 | 6f 77 53 74 61 74 65 22 |_GetWind|owState"|
|00000930| 2c 2c 62 6c 6f 63 6b 25 | 0d 03 2a 1f c8 99 22 57 |,,block%|..*..."W|
|00000940| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|00000950| 2c 62 6c 6f 63 6b 25 0d | 03 34 05 e1 0d 03 3e 05 |,block%.|.4....>.|
|00000960| 3a 0d 03 48 0f dd f2 6b | 65 79 28 6b 65 79 25 29 |:..H...k|ey(key%)|
|00000970| 0d 03 52 42 c9 20 6b 65 | 79 25 3d 31 33 20 80 20 |..RB. ke|y%=13 . |
|00000980| 21 62 6c 6f 63 6b 25 3d | 73 61 76 65 62 6f 78 25 |!block%=|savebox%|
|00000990| 20 8c 20 f2 71 75 69 63 | 6b 73 61 76 65 28 62 6c | . .quic|ksave(bl|
|000009a0| 6f 63 6b 25 2c 73 61 76 | 65 25 2c 31 2c 61 70 70 |ock%,sav|e%,1,app|
|000009b0| 24 29 0d 03 5c 20 7f 20 | 3a 20 c8 99 22 57 69 6d |$)..\ . |: .."Wim|
|000009c0| 70 5f 50 72 6f 63 65 73 | 73 4b 65 79 22 2c 6b 65 |p_Proces|sKey",ke|
|000009d0| 79 25 0d 03 66 05 cb 0d | 03 70 05 e1 0d 03 7a 05 |y%..f...|.p....z.|
|000009e0| 3a 0d 03 84 10 dd f2 6d | 65 6e 75 73 65 6c 65 63 |:......m|enuselec|
|000009f0| 74 0d 03 8e 19 ea 20 73 | 65 6c 31 25 2c 73 65 6c |t..... s|el1%,sel|
|00000a00| 32 25 2c 62 75 74 74 6f | 6e 25 0d 03 98 20 73 65 |2%,butto|n%... se|
|00000a10| 6c 31 25 3d 21 62 6c 6f | 63 6b 25 3a 73 65 6c 32 |l1%=!blo|ck%:sel2|
|00000a20| 25 3d 62 6c 6f 63 6b 25 | 21 34 0d 03 a2 23 c8 99 |%=block%|!4...#..|
|00000a30| 22 57 69 6d 70 5f 47 65 | 74 50 6f 69 6e 74 65 72 |"Wimp_Ge|tPointer|
|00000a40| 49 6e 66 6f 22 2c 2c 62 | 6c 6f 63 6b 25 0d 03 ac |Info",,b|lock%...|
|00000a50| 14 62 75 74 74 6f 6e 25 | 3d 62 6c 6f 63 6b 25 21 |.button%|=block%!|
|00000a60| 38 0d 03 b6 17 e7 20 73 | 65 6c 31 25 3d 33 20 8c |8..... s|el1%=3 .|
|00000a70| 20 71 75 69 74 25 3d b9 | 0d 03 c0 2a e7 20 62 75 | quit%=.|...*. bu|
|00000a80| 74 74 6f 6e 25 3d 31 20 | 8c 20 f2 64 69 73 70 6c |tton%=1 |. .displ|
|00000a90| 61 79 5f 6d 65 6e 75 28 | 6d 65 6e 75 25 2c 30 2c |ay_menu(|menu%,0,|
|00000aa0| 30 29 0d 03 ca 05 e1 0d | 03 d4 05 3a 0d 03 de 0d |0)......|...:....|
|00000ab0| dd f2 6d 65 73 73 61 67 | 65 0d 03 e8 0b ea 20 64 |..messag|e..... d|
|00000ac0| 61 74 61 24 0d 03 f2 12 | c8 8e 20 62 6c 6f 63 6b |ata$....|.. block|
|00000ad0| 25 21 31 36 20 ca 0d 03 | fc 0f c9 20 30 3a 71 75 |%!16 ...|... 0:qu|
|00000ae0| 69 74 25 3d b9 0d 04 06 | 27 c9 20 32 3a 64 61 74 |it%=....|'. 2:dat|
|00000af0| 61 24 3d a4 6d 65 73 73 | 61 67 65 5f 64 61 74 61 |a$=.mess|age_data|
|00000b00| 73 61 76 65 28 62 6c 6f | 63 6b 25 29 0d 04 10 2d |save(blo|ck%)...-|
|00000b10| f2 63 68 61 6e 67 65 5f | 69 63 6f 6e 28 62 6c 6f |.change_|icon(blo|
|00000b20| 63 6b 25 2c 73 61 76 65 | 62 6f 78 25 2c 32 2c 64 |ck%,save|box%,2,d|
|00000b30| 61 74 61 24 2c 30 2c 30 | 29 0d 04 1a 11 c9 20 33 |ata$,0,0|)..... 3|
|00000b40| 3a f2 64 61 74 61 6c 6f | 61 64 0d 04 24 05 cb 0d |:.datalo|ad..$...|
|00000b50| 04 2e 05 e1 0d 04 38 05 | 3a 0d 04 42 0e dd f2 64 |......8.|:..B...d|
|00000b60| 61 74 61 6c 6f 61 64 0d | 04 4c 14 c8 99 22 48 6f |ataload.|.L..."Ho|
|00000b70| 75 72 67 6c 61 73 73 5f | 4f 6e 22 0d 04 56 0f ea |urglass_|On"..V..|
|00000b80| 20 70 61 74 68 24 2c 66 | 6c 25 0d 04 60 16 e7 20 | path$,f|l%..`.. |
|00000b90| 62 6c 6f 63 6b 25 21 34 | 30 3d 26 46 46 46 20 8c |block%!4|0=&FFF .|
|00000ba0| 0d 04 6a 1c 70 61 74 68 | 24 3d a4 73 74 72 69 6e |..j.path|$=.strin|
|00000bb0| 67 28 62 6c 6f 63 6b 25 | 2b 34 34 29 0d 04 74 10 |g(block%|+44)..t.|
|00000bc0| 66 6c 25 3d 8e 28 70 61 | 74 68 24 29 0d 04 7e 0a |fl%=.(pa|th$)..~.|
|00000bd0| 64 69 6d 25 3d 30 0d 04 | 88 23 e3 20 61 25 3d 30 |dim%=0..|.#. a%=0|
|00000be0| 20 b8 20 73 70 61 63 65 | 25 3a 66 6c 69 6e 65 24 | . space|%:fline$|
|00000bf0| 28 61 25 29 3d 22 22 3a | ed 0d 04 92 04 0d 04 9c |(a%)="":|........|
|00000c00| 34 f4 20 54 68 65 20 66 | 6f 6c 6c 6f 77 69 6e 67 |4. The f|ollowing|
|00000c10| 20 6c 6f 6f 70 20 64 6f | 65 73 20 74 68 65 20 61 | loop do|es the a|
|00000c20| 63 74 75 61 6c 20 70 72 | 6f 63 65 73 73 69 6e 67 |ctual pr|ocessing|
|00000c30| 2e 0d 04 a6 45 f4 20 59 | 6f 75 20 6d 61 79 20 61 |....E. Y|ou may a|
|00000c40| 64 6a 75 73 74 20 74 68 | 69 73 2c 20 69 66 20 79 |djust th|is, if y|
|00000c50| 6f 75 20 77 69 73 68 20 | 74 6f 20 70 72 6f 63 65 |ou wish |to proce|
|00000c60| 73 73 20 74 68 65 20 66 | 69 6c 65 20 61 73 20 61 |ss the f|ile as a|
|00000c70| 20 77 68 6f 6c 65 0d 04 | b0 27 f4 20 72 61 74 68 | whole..|.'. rath|
|00000c80| 65 72 20 74 68 61 6e 20 | 65 61 63 68 20 6c 69 6e |er than |each lin|
|00000c90| 65 20 73 65 70 65 72 61 | 74 65 6c 79 2e 0d 04 ba |e sepera|tely....|
|00000ca0| 04 0d 04 c4 18 20 20 20 | 20 20 20 20 20 20 20 20 |.....   |        |
|00000cb0| 20 20 20 20 20 20 20 20 | f5 0d 04 ce 24 20 20 20 |        |....$   |
|00000cc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000cd0| 20 20 6c 69 6e 65 24 3d | be 23 66 6c 25 0d 04 d8 |  line$=|.#fl%...|
|00000ce0| 4b 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |K       |        |
|00000cf0| 20 20 20 20 20 20 66 6c | 69 6e 65 24 28 64 69 6d |      fl|ine$(dim|
|00000d00| 25 29 3d a4 70 72 6f 63 | 65 73 73 5f 6c 69 6e 65 |%)=.proc|ess_line|
|00000d10| 28 24 63 68 6c 65 6e 25 | 2c a9 28 6c 69 6e 65 24 |($chlen%|,.(line$|
|00000d20| 29 2c 6c 69 6e 65 24 29 | 0d 04 e2 24 20 20 20 20 |),line$)|...$    |
|00000d30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000d40| 20 64 69 6d 25 3d 64 69 | 6d 25 2b 31 0d 04 ec 20 | dim%=di|m%+1... |
|00000d50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000d60| 20 20 20 fd 20 c5 23 66 | 6c 25 3d b9 0d 04 f6 16 |   . .#f|l%=.....|
|00000d70| d9 23 66 6c 25 3a 6e 6f | 6c 69 6e 73 25 3d 64 69 |.#fl%:no|lins%=di|
|00000d80| 6d 25 0d 05 00 05 cd 0d | 05 0a 15 c8 99 22 48 6f |m%......|....."Ho|
|00000d90| 75 72 67 6c 61 73 73 5f | 4f 66 66 22 0d 05 14 05 |urglass_|Off"....|
|00000da0| e1 0d 05 1e 05 3a 0d 05 | 28 12 dd a4 73 74 72 69 |.....:..|(...stri|
|00000db0| 6e 67 28 70 74 72 25 29 | 0d 05 32 08 ea 20 61 24 |ng(ptr%)|..2.. a$|
|00000dc0| 0d 05 3c 0f c8 95 20 3f | 70 74 72 25 3c 3e 30 0d |..<... ?|ptr%<>0.|
|00000dd0| 05 46 18 61 24 2b 3d bd | 28 3f 70 74 72 25 29 3a |.F.a$+=.|(?ptr%):|
|00000de0| 70 74 72 25 2b 3d 31 0d | 05 50 05 ce 0d 05 5a 07 |ptr%+=1.|.P....Z.|
|00000df0| 3d 61 24 0d 05 64 05 3a | 0d 05 6e 2a dd a4 70 72 |=a$..d.:|..n*..pr|
|00000e00| 6f 63 65 73 73 5f 6c 69 | 6e 65 28 70 61 72 61 6d |ocess_li|ne(param|
|00000e10| 65 74 65 72 24 2c 6c 6c | 65 6e 25 2c 74 65 78 74 |eter$,ll|en%,text|
|00000e20| 24 29 0d 05 78 37 f4 20 | 54 68 69 73 20 66 75 6e |$)..x7. |This fun|
|00000e30| 63 74 69 6f 6e 20 72 65 | 74 75 72 6e 73 20 61 20 |ction re|turns a |
|00000e40| 72 65 70 72 6f 63 65 73 | 73 65 64 20 6c 69 6e 65 |reproces|sed line|
|00000e50| 2e 20 59 6f 75 20 6d 61 | 79 0d 05 82 47 f4 20 61 |. You ma|y...G. a|
|00000e60| 64 64 20 79 6f 75 72 20 | 63 6f 64 65 20 68 65 72 |dd your |code her|
|00000e70| 65 20 2d 20 68 6f 77 65 | 76 65 72 2c 20 70 6c 65 |e - howe|ver, ple|
|00000e80| 61 73 65 20 65 6e 73 75 | 72 65 20 61 6c 6c 20 6e |ase ensu|re all n|
|00000e90| 65 77 20 76 61 72 69 61 | 62 6c 65 73 20 61 72 65 |ew varia|bles are|
|00000ea0| 0d 05 8c 10 f4 20 6c 6f | 63 61 6c 69 73 65 64 2e |..... lo|calised.|
|00000eb0| 0d 05 96 0a 3d 74 65 78 | 74 24 0d 05 a0 05 3a 0d |....=tex|t$....:.|
|00000ec0| 05 aa 11 dd f2 73 61 76 | 65 28 66 69 6c 65 24 29 |.....sav|e(file$)|
|00000ed0| 0d 05 ab 47 f4 20 54 68 | 69 73 20 70 72 6f 63 65 |...G. Th|is proce|
|00000ee0| 64 75 72 65 20 73 61 76 | 65 73 20 74 68 65 20 66 |dure sav|es the f|
|00000ef0| 69 6c 65 2e 20 45 61 63 | 68 20 6c 69 6e 65 20 69 |ile. Eac|h line i|
|00000f00| 73 20 42 50 55 54 65 64 | 20 66 72 6f 6d 20 74 68 |s BPUTed| from th|
|00000f10| 65 20 61 72 72 61 79 0d | 05 ac 47 f4 20 66 6c 69 |e array.|..G. fli|
|00000f20| 6e 65 24 28 29 2c 20 77 | 68 65 72 65 20 6e 6f 6c |ne$(), w|here nol|
|00000f30| 69 6e 73 25 20 63 6f 6e | 74 61 69 6e 73 20 74 68 |ins% con|tains th|
|00000f40| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 6c 69 6e 65 |e number| of line|
|00000f50| 73 20 70 72 65 73 65 6e | 74 2e 20 59 6f 75 0d 05 |s presen|t. You..|
|00000f60| ad 4b f4 20 6d 61 79 2c | 20 69 66 20 79 6f 75 20 |.K. may,| if you |
|00000f70| 77 69 73 68 2c 20 6c 65 | 61 76 65 20 46 4e 70 72 |wish, le|ave FNpr|
|00000f80| 6f 63 65 73 73 5f 6c 69 | 6e 65 20 61 6c 6f 6e 65 |ocess_li|ne alone|
|00000f90| 20 61 6e 64 20 69 6e 73 | 74 65 61 64 20 70 72 63 | and ins|tead prc|
|00000fa0| 65 73 73 20 68 65 72 65 | 2e 0d 05 ae 4c f4 20 74 |ess here|....L. t|
|00000fb0| 68 69 73 20 69 73 20 75 | 73 75 61 6c 6c 79 20 74 |his is u|sually t|
|00000fc0| 68 65 20 62 65 73 74 20 | 6d 65 74 68 6f 64 20 69 |he best |method i|
|00000fd0| 66 20 74 68 65 20 69 6e | 64 69 76 69 64 75 61 6c |f the in|dividual|
|00000fe0| 20 6c 69 6e 65 73 20 61 | 72 65 20 74 6f 20 62 65 | lines a|re to be|
|00000ff0| 20 6c 65 66 74 0d 05 af | 4b f4 20 61 6c 6f 6e 65 | left...|K. alone|
|00001000| 20 62 75 74 20 79 6f 75 | 20 77 69 73 68 20 74 6f | but you| wish to|
|00001010| 20 63 68 61 6e 67 65 20 | 74 68 65 69 72 20 6f 72 | change |their or|
|00001020| 64 65 72 20 6f 72 20 64 | 65 6c 65 74 65 20 73 6f |der or d|elete so|
|00001030| 6d 65 2c 20 64 65 70 65 | 6e 64 69 6e 67 20 6f 6e |me, depe|nding on|
|00001040| 0d 05 b0 22 f4 20 74 68 | 65 69 72 20 63 6f 6e 74 |...". th|eir cont|
|00001050| 65 6e 74 73 2c 20 66 6f | 72 20 65 78 61 6d 70 6c |ents, fo|r exampl|
|00001060| 65 2e 0d 05 b4 0b ea 20 | 66 69 6c 65 25 0d 05 be |e...... |file%...|
|00001070| 12 66 69 6c 65 25 3d ae | 28 66 69 6c 65 24 29 0d |.file%=.|(file$).|
|00001080| 05 c8 16 e3 20 64 69 6d | 25 3d 30 20 b8 20 6e 6f |.... dim|%=0 . no|
|00001090| 6c 69 6e 73 25 0d 05 d2 | 1a 20 20 d5 23 66 69 6c |lins%...|.  .#fil|
|000010a0| 65 25 2c 66 6c 69 6e 65 | 24 28 64 69 6d 25 29 0d |e%,fline|$(dim%).|
|000010b0| 05 dc 05 ed 0d 05 e6 0b | d9 23 66 69 6c 65 25 0d |........|.#file%.|
|000010c0| 05 f0 1f ff 28 22 53 65 | 74 54 79 70 65 20 22 2b |....("Se|tType "+|
|000010d0| 66 69 6c 65 24 2b 22 20 | 26 46 46 46 22 29 0d 05 |file$+" |&FFF")..|
|000010e0| fa 05 e1 0d ff          |                         |.....   |        |
+--------+-------------------------+-------------------------+--------+--------+