'� >Textscan.Module (Config+ Module)
&� � 0,"Do not run Config+ modules"
�
(:
22� **** General procedures for this module ****
<:
F0ݤversion_textscan(win)="1.00 (11 Sep 1995)"
P,ݤauthor_textscan(win)="Justin Fletcher"
Z:
dݤinit_textscan
n4� �systemvar("TextScan$Dir")<>"" ��textscan_make
x=1
�� flag bits :
�"� 0  Accepts dataload messages
�:
�ݤwinopen_textscan(win)
�Ȏ win �
� � 1:�textscan_open
��
�=0
�:
�ݤwinclose_textscan(win)
�Ȏ win �
� � 1:�textscan_close
��

=0

:

5ݤmouseclick_textscan(win,icon,but,name$,action$)

"Ȏ win �

,+ � 1:�textscan_click(but,name$,action$)

6�

@=0

J:

T&ݤmenuopt_textscan(win,menu$,opt$)

^Ȏ win �

h& � 1:�textscan_menuopt(menu$,opt$)

r�

|=0

�:

�*ݤhelp_textscan(win,icon,name$,extra$)

�Ȏ win �

�% � 1:�textscan_help(name$,extra$)

��

�=0

�:

�-ݤdataload_textscan(win,name$,file$,type)

�
� ok:ok=�

�Ȏ win �

�, � 1:ok=�textscan_load(name$,file$,type)

��

�=ok
:
:
2� **** Area specific parts of this module ****
&:
0��textscan_make
:=�createwin(1,"TextScan","!TextScan","*TextScan settings")
D  �startblock("Input/Output")
NZ  textscan_dir=�icon_loadicon("Directory","Drag default directory to scan here","Dir")
X  �startrow
b6   dummy=�icon_text("Clear default directory",-.8)
l,   textscan_but=�icon_button("Clear",.8)
v0   dummy=�icon_text("Throwback editor",-.55)
�3   textscan_editor=�icon_wi(20,16,"Editor",.55)
�
  �endrow
� �endblock
� �startblock("Polling")
�  �startrow
�E   textscan_disable=�icon_radio("Disable multitasking","Off",0,1)
�E   textscan_delay=�icon_radio("Delayed multitasking","Delay",0,1)
�C   textscan_extra=�icon_radio("Extra multitasking","Extra",0,1)
�(   dummy=�icon_text("Poll rate",-.5)
�/   textscan_rate=�icon_winum(2,3,"Rate",.5)
�5   �updownbuttons("Rate",-2,textscan_rate,1,20,1)
�
  �endrow
� �endblock
" �startblock("Scan filetypes")
=  textscan_all=�icon_toggle("Scan all filetypes","All",0)
;  textscan_ffd=�icon_toggle("Scan data files","Data",0)
 ;  textscan_feb=�icon_toggle("Scan obey files","Obey",0)
* �endblock
4�endwindow
>�
H:
R��textscan_open
\6�readstatusof("<TextScan$Dir>.Options","TextScan")
f(�icon_text_load(textscan_dir,"Path")
p0�icon_text_load(textscan_editor,"Throwback")
zdummy=�statusgetv("Poll")
�%�icon_grey(textscan_rate,dummy=0)
�1�icon_text(textscan_rate,Ô(dummy-(dummy=0)))
�*�icon_select(textscan_disable,dummy=0)
�(�icon_select(textscan_delay,dummy<0)
�(�icon_select(textscan_extra,dummy>0)
�#dummy=�statusgetflag("ScanAll")
�$�icon_select(textscan_all,dummy)
�.�icon_select_load(textscan_ffd,"ScanData")
�.�icon_select_load(textscan_feb,"ScanObey")
�$�icon_grey(textscan_ffd,dummy=�)
�$�icon_grey(textscan_feb,dummy=�)
��closestatusfile
��
:
��textscan_close
6�makestatusas("<TextScan$Dir>.Options","TextScan")
$(�icon_text_save(textscan_dir,"Path")
.0�icon_text_save(textscan_editor,"Throwback")
8)dummy=�(�icon_gettext(textscan_rate))
B8� �icon_state(textscan_disable,"0","1")="1" �dummy=0
L;� �icon_state(textscan_delay,"0","1")="1" �dummy=-dummy
V�statusoption("Poll",dummy)
`-�icon_select_save(textscan_all,"ScanAll")
j.�icon_select_save(textscan_ffd,"ScanData")
t.�icon_select_save(textscan_feb,"ScanObey")
~�closestatusfile
��
�:
�'��textscan_click(but,name$,action$)
�Ȏ name$ �
�* � "Clear":�icon_text(textscan_dir,"")
�( � "Off":�icon_grey(textscan_rate,1)
�2 � "Delay","Extra":�icon_grey(textscan_rate,0)
� � "All"
�+  �icon_grey(textscan_ffd,action$="On")
�+  �icon_grey(textscan_feb,action$="On")
��
��
:

!��textscan_help(name$,extra$)
Ȏ �extra$,1) �
 � "+","-":� inc/dec icons
  Ȏ name$ �
 d   � "Rate":�extra_help(extra$,"the poll rate|MSee the help for Delayed and Extra multitasking")
!  �
( � "M":� menu icon
2 � "L":� load icon
<  Ȏ name$ �
FA   � "Dir":�extra_help("LD","set the default scan directory")
P  �
Z :� anything else
d  Ȏ name$ �
n5   � "Dir":�give_help("\Tdefault scan directory")
xA   � "Clear":�give_help("\Sclear the default scan directory")
�~   � "Editor":�give_help("Enter the name of the default throwback editor, or leave blank to broadcast throwback messages")
��   � "Off":�give_help("\Xdisable all multitasking whilst a scan is in operation|MThis will probably lead to a long delay when the scan is finished as all the messages are received")
��   � "Delay":�give_help("\Xenable delayed multitasking|MThis means that x messages will be sent, and then multitasking will be enabled for x events|M")
��   � "Extra":�give_help("\Xenable extra multitasking|MThis means that for every message sent multitasking will occur for x events")
��   � "Rate":�give_help("\Tnumber of poll events that will take place|MSee the descriptions of Delayed and Extra multitasking|M")
�v   � "All":�give_help("\Xscan all filetypes|MThis is not a very good idea if the path has lots of non-text files")
��   � "Obey":�give_help("\Xscan Obey files|MThis may be useful if you want to know which applications use file type FEC (for example)")
�x   � "Data":�give_help("\Xscan Data files|MThis is most useful is the scan directory is |<StrongHelp$Dir>.HelpData")
�S   � "Icon":�give_help("\Sopen a window to control the defaults for !TextScan")
�  �
��
��
�:
%ݤtextscan_load(name$,file$,type)
� ok
Ȏ name$ �
" � "Dir"
,  � type=&1000 �
6*   ok=�:�icon_text(textscan_dir,file$)
@  �
J�
T=ok
�

00000000  0d 00 0a 27 f4 20 3e 54  65 78 74 73 63 61 6e 2e  |...'. >Textscan.|
00000010  4d 6f 64 75 6c 65 20 28  43 6f 6e 66 69 67 2b 20  |Module (Config+ |
00000020  4d 6f 64 75 6c 65 29 0d  00 14 26 85 20 a2 20 30  |Module)...&. . 0|
00000030  2c 22 44 6f 20 6e 6f 74  20 72 75 6e 20 43 6f 6e  |,"Do not run Con|
00000040  66 69 67 2b 20 6d 6f 64  75 6c 65 73 22 0d 00 1e  |fig+ modules"...|
00000050  05 e0 0d 00 28 05 3a 0d  00 32 32 f4 20 2a 2a 2a  |....(.:..22. ***|
00000060  2a 20 47 65 6e 65 72 61  6c 20 70 72 6f 63 65 64  |* General proced|
00000070  75 72 65 73 20 66 6f 72  20 74 68 69 73 20 6d 6f  |ures for this mo|
00000080  64 75 6c 65 20 2a 2a 2a  2a 0d 00 3c 05 3a 0d 00  |dule ****..<.:..|
00000090  46 30 dd a4 76 65 72 73  69 6f 6e 5f 74 65 78 74  |F0..version_text|
000000a0  73 63 61 6e 28 77 69 6e  29 3d 22 31 2e 30 30 20  |scan(win)="1.00 |
000000b0  28 31 31 20 53 65 70 20  31 39 39 35 29 22 0d 00  |(11 Sep 1995)"..|
000000c0  50 2c dd a4 61 75 74 68  6f 72 5f 74 65 78 74 73  |P,..author_texts|
000000d0  63 61 6e 28 77 69 6e 29  3d 22 4a 75 73 74 69 6e  |can(win)="Justin|
000000e0  20 46 6c 65 74 63 68 65  72 22 0d 00 5a 05 3a 0d  | Fletcher"..Z.:.|
000000f0  00 64 13 dd a4 69 6e 69  74 5f 74 65 78 74 73 63  |.d...init_textsc|
00000100  61 6e 0d 00 6e 34 e7 20  a4 73 79 73 74 65 6d 76  |an..n4. .systemv|
00000110  61 72 28 22 54 65 78 74  53 63 61 6e 24 44 69 72  |ar("TextScan$Dir|
00000120  22 29 3c 3e 22 22 20 8c  f2 74 65 78 74 73 63 61  |")<>"" ..textsca|
00000130  6e 5f 6d 61 6b 65 0d 00  78 06 3d 31 0d 00 82 11  |n_make..x.=1....|
00000140  f4 20 66 6c 61 67 20 62  69 74 73 20 3a 0d 00 8c  |. flag bits :...|
00000150  22 f4 20 30 20 20 41 63  63 65 70 74 73 20 64 61  |". 0  Accepts da|
00000160  74 61 6c 6f 61 64 20 6d  65 73 73 61 67 65 73 0d  |taload messages.|
00000170  00 96 05 3a 0d 00 a0 1b  dd a4 77 69 6e 6f 70 65  |...:......winope|
00000180  6e 5f 74 65 78 74 73 63  61 6e 28 77 69 6e 29 0d  |n_textscan(win).|
00000190  00 aa 0c c8 8e 20 77 69  6e 20 ca 0d 00 b4 17 20  |..... win ..... |
000001a0  c9 20 31 3a f2 74 65 78  74 73 63 61 6e 5f 6f 70  |. 1:.textscan_op|
000001b0  65 6e 0d 00 be 05 cb 0d  00 c8 06 3d 30 0d 00 d2  |en.........=0...|
000001c0  05 3a 0d 00 dc 1c dd a4  77 69 6e 63 6c 6f 73 65  |.:......winclose|
000001d0  5f 74 65 78 74 73 63 61  6e 28 77 69 6e 29 0d 00  |_textscan(win)..|
000001e0  e6 0c c8 8e 20 77 69 6e  20 ca 0d 00 f0 18 20 c9  |.... win ..... .|
000001f0  20 31 3a f2 74 65 78 74  73 63 61 6e 5f 63 6c 6f  | 1:.textscan_clo|
00000200  73 65 0d 00 fa 05 cb 0d  01 04 06 3d 30 0d 01 0e  |se.........=0...|
00000210  05 3a 0d 01 18 35 dd a4  6d 6f 75 73 65 63 6c 69  |.:...5..mousecli|
00000220  63 6b 5f 74 65 78 74 73  63 61 6e 28 77 69 6e 2c  |ck_textscan(win,|
00000230  69 63 6f 6e 2c 62 75 74  2c 6e 61 6d 65 24 2c 61  |icon,but,name$,a|
00000240  63 74 69 6f 6e 24 29 0d  01 22 0c c8 8e 20 77 69  |ction$).."... wi|
00000250  6e 20 ca 0d 01 2c 2b 20  c9 20 31 3a f2 74 65 78  |n ...,+ . 1:.tex|
00000260  74 73 63 61 6e 5f 63 6c  69 63 6b 28 62 75 74 2c  |tscan_click(but,|
00000270  6e 61 6d 65 24 2c 61 63  74 69 6f 6e 24 29 0d 01  |name$,action$)..|
00000280  36 05 cb 0d 01 40 06 3d  30 0d 01 4a 05 3a 0d 01  |6....@.=0..J.:..|
00000290  54 26 dd a4 6d 65 6e 75  6f 70 74 5f 74 65 78 74  |T&..menuopt_text|
000002a0  73 63 61 6e 28 77 69 6e  2c 6d 65 6e 75 24 2c 6f  |scan(win,menu$,o|
000002b0  70 74 24 29 0d 01 5e 0c  c8 8e 20 77 69 6e 20 ca  |pt$)..^... win .|
000002c0  0d 01 68 26 20 c9 20 31  3a f2 74 65 78 74 73 63  |..h& . 1:.textsc|
000002d0  61 6e 5f 6d 65 6e 75 6f  70 74 28 6d 65 6e 75 24  |an_menuopt(menu$|
000002e0  2c 6f 70 74 24 29 0d 01  72 05 cb 0d 01 7c 06 3d  |,opt$)..r....|.=|
000002f0  30 0d 01 86 05 3a 0d 01  90 2a dd a4 68 65 6c 70  |0....:...*..help|
00000300  5f 74 65 78 74 73 63 61  6e 28 77 69 6e 2c 69 63  |_textscan(win,ic|
00000310  6f 6e 2c 6e 61 6d 65 24  2c 65 78 74 72 61 24 29  |on,name$,extra$)|
00000320  0d 01 9a 0c c8 8e 20 77  69 6e 20 ca 0d 01 a4 25  |...... win ....%|
00000330  20 c9 20 31 3a f2 74 65  78 74 73 63 61 6e 5f 68  | . 1:.textscan_h|
00000340  65 6c 70 28 6e 61 6d 65  24 2c 65 78 74 72 61 24  |elp(name$,extra$|
00000350  29 0d 01 ae 05 cb 0d 01  b8 06 3d 30 0d 01 c2 05  |).........=0....|
00000360  3a 0d 01 cc 2d dd a4 64  61 74 61 6c 6f 61 64 5f  |:...-..dataload_|
00000370  74 65 78 74 73 63 61 6e  28 77 69 6e 2c 6e 61 6d  |textscan(win,nam|
00000380  65 24 2c 66 69 6c 65 24  2c 74 79 70 65 29 0d 01  |e$,file$,type)..|
00000390  d6 0d ea 20 6f 6b 3a 6f  6b 3d a3 0d 01 e0 0c c8  |... ok:ok=......|
000003a0  8e 20 77 69 6e 20 ca 0d  01 ea 2c 20 c9 20 31 3a  |. win ...., . 1:|
000003b0  6f 6b 3d a4 74 65 78 74  73 63 61 6e 5f 6c 6f 61  |ok=.textscan_loa|
000003c0  64 28 6e 61 6d 65 24 2c  66 69 6c 65 24 2c 74 79  |d(name$,file$,ty|
000003d0  70 65 29 0d 01 f4 05 cb  0d 01 fe 07 3d 6f 6b 0d  |pe).........=ok.|
000003e0  02 08 05 3a 0d 02 12 05  3a 0d 02 1c 32 f4 20 2a  |...:....:...2. *|
000003f0  2a 2a 2a 20 41 72 65 61  20 73 70 65 63 69 66 69  |*** Area specifi|
00000400  63 20 70 61 72 74 73 20  6f 66 20 74 68 69 73 20  |c parts of this |
00000410  6d 6f 64 75 6c 65 20 2a  2a 2a 2a 0d 02 26 05 3a  |module ****..&.:|
00000420  0d 02 30 13 dd f2 74 65  78 74 73 63 61 6e 5f 6d  |..0...textscan_m|
00000430  61 6b 65 0d 02 3a 3d f2  63 72 65 61 74 65 77 69  |ake..:=.createwi|
00000440  6e 28 31 2c 22 54 65 78  74 53 63 61 6e 22 2c 22  |n(1,"TextScan","|
00000450  21 54 65 78 74 53 63 61  6e 22 2c 22 2a 54 65 78  |!TextScan","*Tex|
00000460  74 53 63 61 6e 20 73 65  74 74 69 6e 67 73 22 29  |tScan settings")|
00000470  0d 02 44 20 20 f2 73 74  61 72 74 62 6c 6f 63 6b  |..D  .startblock|
00000480  28 22 49 6e 70 75 74 2f  4f 75 74 70 75 74 22 29  |("Input/Output")|
00000490  0d 02 4e 5a 20 20 74 65  78 74 73 63 61 6e 5f 64  |..NZ  textscan_d|
000004a0  69 72 3d a4 69 63 6f 6e  5f 6c 6f 61 64 69 63 6f  |ir=.icon_loadico|
000004b0  6e 28 22 44 69 72 65 63  74 6f 72 79 22 2c 22 44  |n("Directory","D|
000004c0  72 61 67 20 64 65 66 61  75 6c 74 20 64 69 72 65  |rag default dire|
000004d0  63 74 6f 72 79 20 74 6f  20 73 63 61 6e 20 68 65  |ctory to scan he|
000004e0  72 65 22 2c 22 44 69 72  22 29 0d 02 58 0f 20 20  |re","Dir")..X.  |
000004f0  f2 73 74 61 72 74 72 6f  77 0d 02 62 36 20 20 20  |.startrow..b6   |
00000500  64 75 6d 6d 79 3d a4 69  63 6f 6e 5f 74 65 78 74  |dummy=.icon_text|
00000510  28 22 43 6c 65 61 72 20  64 65 66 61 75 6c 74 20  |("Clear default |
00000520  64 69 72 65 63 74 6f 72  79 22 2c 2d 2e 38 29 0d  |directory",-.8).|
00000530  02 6c 2c 20 20 20 74 65  78 74 73 63 61 6e 5f 62  |.l,   textscan_b|
00000540  75 74 3d a4 69 63 6f 6e  5f 62 75 74 74 6f 6e 28  |ut=.icon_button(|
00000550  22 43 6c 65 61 72 22 2c  2e 38 29 0d 02 76 30 20  |"Clear",.8)..v0 |
00000560  20 20 64 75 6d 6d 79 3d  a4 69 63 6f 6e 5f 74 65  |  dummy=.icon_te|
00000570  78 74 28 22 54 68 72 6f  77 62 61 63 6b 20 65 64  |xt("Throwback ed|
00000580  69 74 6f 72 22 2c 2d 2e  35 35 29 0d 02 80 33 20  |itor",-.55)...3 |
00000590  20 20 74 65 78 74 73 63  61 6e 5f 65 64 69 74 6f  |  textscan_edito|
000005a0  72 3d a4 69 63 6f 6e 5f  77 69 28 32 30 2c 31 36  |r=.icon_wi(20,16|
000005b0  2c 22 45 64 69 74 6f 72  22 2c 2e 35 35 29 0d 02  |,"Editor",.55)..|
000005c0  8a 0d 20 20 f2 65 6e 64  72 6f 77 0d 02 94 0e 20  |..  .endrow.... |
000005d0  f2 65 6e 64 62 6c 6f 63  6b 0d 02 9e 1b 20 f2 73  |.endblock.... .s|
000005e0  74 61 72 74 62 6c 6f 63  6b 28 22 50 6f 6c 6c 69  |tartblock("Polli|
000005f0  6e 67 22 29 0d 02 a8 0f  20 20 f2 73 74 61 72 74  |ng")....  .start|
00000600  72 6f 77 0d 02 b2 45 20  20 20 74 65 78 74 73 63  |row...E   textsc|
00000610  61 6e 5f 64 69 73 61 62  6c 65 3d a4 69 63 6f 6e  |an_disable=.icon|
00000620  5f 72 61 64 69 6f 28 22  44 69 73 61 62 6c 65 20  |_radio("Disable |
00000630  6d 75 6c 74 69 74 61 73  6b 69 6e 67 22 2c 22 4f  |multitasking","O|
00000640  66 66 22 2c 30 2c 31 29  0d 02 bc 45 20 20 20 74  |ff",0,1)...E   t|
00000650  65 78 74 73 63 61 6e 5f  64 65 6c 61 79 3d a4 69  |extscan_delay=.i|
00000660  63 6f 6e 5f 72 61 64 69  6f 28 22 44 65 6c 61 79  |con_radio("Delay|
00000670  65 64 20 6d 75 6c 74 69  74 61 73 6b 69 6e 67 22  |ed multitasking"|
00000680  2c 22 44 65 6c 61 79 22  2c 30 2c 31 29 0d 02 c6  |,"Delay",0,1)...|
00000690  43 20 20 20 74 65 78 74  73 63 61 6e 5f 65 78 74  |C   textscan_ext|
000006a0  72 61 3d a4 69 63 6f 6e  5f 72 61 64 69 6f 28 22  |ra=.icon_radio("|
000006b0  45 78 74 72 61 20 6d 75  6c 74 69 74 61 73 6b 69  |Extra multitaski|
000006c0  6e 67 22 2c 22 45 78 74  72 61 22 2c 30 2c 31 29  |ng","Extra",0,1)|
000006d0  0d 02 d0 28 20 20 20 64  75 6d 6d 79 3d a4 69 63  |...(   dummy=.ic|
000006e0  6f 6e 5f 74 65 78 74 28  22 50 6f 6c 6c 20 72 61  |on_text("Poll ra|
000006f0  74 65 22 2c 2d 2e 35 29  0d 02 da 2f 20 20 20 74  |te",-.5).../   t|
00000700  65 78 74 73 63 61 6e 5f  72 61 74 65 3d a4 69 63  |extscan_rate=.ic|
00000710  6f 6e 5f 77 69 6e 75 6d  28 32 2c 33 2c 22 52 61  |on_winum(2,3,"Ra|
00000720  74 65 22 2c 2e 35 29 0d  02 e4 35 20 20 20 f2 75  |te",.5)...5   .u|
00000730  70 64 6f 77 6e 62 75 74  74 6f 6e 73 28 22 52 61  |pdownbuttons("Ra|
00000740  74 65 22 2c 2d 32 2c 74  65 78 74 73 63 61 6e 5f  |te",-2,textscan_|
00000750  72 61 74 65 2c 31 2c 32  30 2c 31 29 0d 02 ee 0d  |rate,1,20,1)....|
00000760  20 20 f2 65 6e 64 72 6f  77 0d 02 f8 0e 20 f2 65  |  .endrow.... .e|
00000770  6e 64 62 6c 6f 63 6b 0d  03 02 22 20 f2 73 74 61  |ndblock..." .sta|
00000780  72 74 62 6c 6f 63 6b 28  22 53 63 61 6e 20 66 69  |rtblock("Scan fi|
00000790  6c 65 74 79 70 65 73 22  29 0d 03 0c 3d 20 20 74  |letypes")...=  t|
000007a0  65 78 74 73 63 61 6e 5f  61 6c 6c 3d a4 69 63 6f  |extscan_all=.ico|
000007b0  6e 5f 74 6f 67 67 6c 65  28 22 53 63 61 6e 20 61  |n_toggle("Scan a|
000007c0  6c 6c 20 66 69 6c 65 74  79 70 65 73 22 2c 22 41  |ll filetypes","A|
000007d0  6c 6c 22 2c 30 29 0d 03  16 3b 20 20 74 65 78 74  |ll",0)...;  text|
000007e0  73 63 61 6e 5f 66 66 64  3d a4 69 63 6f 6e 5f 74  |scan_ffd=.icon_t|
000007f0  6f 67 67 6c 65 28 22 53  63 61 6e 20 64 61 74 61  |oggle("Scan data|
00000800  20 66 69 6c 65 73 22 2c  22 44 61 74 61 22 2c 30  | files","Data",0|
00000810  29 0d 03 20 3b 20 20 74  65 78 74 73 63 61 6e 5f  |).. ;  textscan_|
00000820  66 65 62 3d a4 69 63 6f  6e 5f 74 6f 67 67 6c 65  |feb=.icon_toggle|
00000830  28 22 53 63 61 6e 20 6f  62 65 79 20 66 69 6c 65  |("Scan obey file|
00000840  73 22 2c 22 4f 62 65 79  22 2c 30 29 0d 03 2a 0e  |s","Obey",0)..*.|
00000850  20 f2 65 6e 64 62 6c 6f  63 6b 0d 03 34 0e f2 65  | .endblock..4..e|
00000860  6e 64 77 69 6e 64 6f 77  0d 03 3e 05 e1 0d 03 48  |ndwindow..>....H|
00000870  05 3a 0d 03 52 13 dd f2  74 65 78 74 73 63 61 6e  |.:..R...textscan|
00000880  5f 6f 70 65 6e 0d 03 5c  36 f2 72 65 61 64 73 74  |_open..\6.readst|
00000890  61 74 75 73 6f 66 28 22  3c 54 65 78 74 53 63 61  |atusof("<TextSca|
000008a0  6e 24 44 69 72 3e 2e 4f  70 74 69 6f 6e 73 22 2c  |n$Dir>.Options",|
000008b0  22 54 65 78 74 53 63 61  6e 22 29 0d 03 66 28 f2  |"TextScan")..f(.|
000008c0  69 63 6f 6e 5f 74 65 78  74 5f 6c 6f 61 64 28 74  |icon_text_load(t|
000008d0  65 78 74 73 63 61 6e 5f  64 69 72 2c 22 50 61 74  |extscan_dir,"Pat|
000008e0  68 22 29 0d 03 70 30 f2  69 63 6f 6e 5f 74 65 78  |h")..p0.icon_tex|
000008f0  74 5f 6c 6f 61 64 28 74  65 78 74 73 63 61 6e 5f  |t_load(textscan_|
00000900  65 64 69 74 6f 72 2c 22  54 68 72 6f 77 62 61 63  |editor,"Throwbac|
00000910  6b 22 29 0d 03 7a 1d 64  75 6d 6d 79 3d a4 73 74  |k")..z.dummy=.st|
00000920  61 74 75 73 67 65 74 76  28 22 50 6f 6c 6c 22 29  |atusgetv("Poll")|
00000930  0d 03 84 25 f2 69 63 6f  6e 5f 67 72 65 79 28 74  |...%.icon_grey(t|
00000940  65 78 74 73 63 61 6e 5f  72 61 74 65 2c 64 75 6d  |extscan_rate,dum|
00000950  6d 79 3d 30 29 0d 03 8e  31 f2 69 63 6f 6e 5f 74  |my=0)...1.icon_t|
00000960  65 78 74 28 74 65 78 74  73 63 61 6e 5f 72 61 74  |ext(textscan_rat|
00000970  65 2c c3 94 28 64 75 6d  6d 79 2d 28 64 75 6d 6d  |e,..(dummy-(dumm|
00000980  79 3d 30 29 29 29 0d 03  98 2a f2 69 63 6f 6e 5f  |y=0)))...*.icon_|
00000990  73 65 6c 65 63 74 28 74  65 78 74 73 63 61 6e 5f  |select(textscan_|
000009a0  64 69 73 61 62 6c 65 2c  64 75 6d 6d 79 3d 30 29  |disable,dummy=0)|
000009b0  0d 03 a2 28 f2 69 63 6f  6e 5f 73 65 6c 65 63 74  |...(.icon_select|
000009c0  28 74 65 78 74 73 63 61  6e 5f 64 65 6c 61 79 2c  |(textscan_delay,|
000009d0  64 75 6d 6d 79 3c 30 29  0d 03 ac 28 f2 69 63 6f  |dummy<0)...(.ico|
000009e0  6e 5f 73 65 6c 65 63 74  28 74 65 78 74 73 63 61  |n_select(textsca|
000009f0  6e 5f 65 78 74 72 61 2c  64 75 6d 6d 79 3e 30 29  |n_extra,dummy>0)|
00000a00  0d 03 b6 23 64 75 6d 6d  79 3d a4 73 74 61 74 75  |...#dummy=.statu|
00000a10  73 67 65 74 66 6c 61 67  28 22 53 63 61 6e 41 6c  |sgetflag("ScanAl|
00000a20  6c 22 29 0d 03 c0 24 f2  69 63 6f 6e 5f 73 65 6c  |l")...$.icon_sel|
00000a30  65 63 74 28 74 65 78 74  73 63 61 6e 5f 61 6c 6c  |ect(textscan_all|
00000a40  2c 64 75 6d 6d 79 29 0d  03 ca 2e f2 69 63 6f 6e  |,dummy).....icon|
00000a50  5f 73 65 6c 65 63 74 5f  6c 6f 61 64 28 74 65 78  |_select_load(tex|
00000a60  74 73 63 61 6e 5f 66 66  64 2c 22 53 63 61 6e 44  |tscan_ffd,"ScanD|
00000a70  61 74 61 22 29 0d 03 d4  2e f2 69 63 6f 6e 5f 73  |ata").....icon_s|
00000a80  65 6c 65 63 74 5f 6c 6f  61 64 28 74 65 78 74 73  |elect_load(texts|
00000a90  63 61 6e 5f 66 65 62 2c  22 53 63 61 6e 4f 62 65  |can_feb,"ScanObe|
00000aa0  79 22 29 0d 03 de 24 f2  69 63 6f 6e 5f 67 72 65  |y")...$.icon_gre|
00000ab0  79 28 74 65 78 74 73 63  61 6e 5f 66 66 64 2c 64  |y(textscan_ffd,d|
00000ac0  75 6d 6d 79 3d b9 29 0d  03 e8 24 f2 69 63 6f 6e  |ummy=.)...$.icon|
00000ad0  5f 67 72 65 79 28 74 65  78 74 73 63 61 6e 5f 66  |_grey(textscan_f|
00000ae0  65 62 2c 64 75 6d 6d 79  3d b9 29 0d 03 f2 14 f2  |eb,dummy=.).....|
00000af0  63 6c 6f 73 65 73 74 61  74 75 73 66 69 6c 65 0d  |closestatusfile.|
00000b00  03 fc 05 e1 0d 04 06 05  3a 0d 04 10 14 dd f2 74  |........:......t|
00000b10  65 78 74 73 63 61 6e 5f  63 6c 6f 73 65 0d 04 1a  |extscan_close...|
00000b20  36 f2 6d 61 6b 65 73 74  61 74 75 73 61 73 28 22  |6.makestatusas("|
00000b30  3c 54 65 78 74 53 63 61  6e 24 44 69 72 3e 2e 4f  |<TextScan$Dir>.O|
00000b40  70 74 69 6f 6e 73 22 2c  22 54 65 78 74 53 63 61  |ptions","TextSca|
00000b50  6e 22 29 0d 04 24 28 f2  69 63 6f 6e 5f 74 65 78  |n")..$(.icon_tex|
00000b60  74 5f 73 61 76 65 28 74  65 78 74 73 63 61 6e 5f  |t_save(textscan_|
00000b70  64 69 72 2c 22 50 61 74  68 22 29 0d 04 2e 30 f2  |dir,"Path")...0.|
00000b80  69 63 6f 6e 5f 74 65 78  74 5f 73 61 76 65 28 74  |icon_text_save(t|
00000b90  65 78 74 73 63 61 6e 5f  65 64 69 74 6f 72 2c 22  |extscan_editor,"|
00000ba0  54 68 72 6f 77 62 61 63  6b 22 29 0d 04 38 29 64  |Throwback")..8)d|
00000bb0  75 6d 6d 79 3d bb 28 a4  69 63 6f 6e 5f 67 65 74  |ummy=.(.icon_get|
00000bc0  74 65 78 74 28 74 65 78  74 73 63 61 6e 5f 72 61  |text(textscan_ra|
00000bd0  74 65 29 29 0d 04 42 38  e7 20 a4 69 63 6f 6e 5f  |te))..B8. .icon_|
00000be0  73 74 61 74 65 28 74 65  78 74 73 63 61 6e 5f 64  |state(textscan_d|
00000bf0  69 73 61 62 6c 65 2c 22  30 22 2c 22 31 22 29 3d  |isable,"0","1")=|
00000c00  22 31 22 20 8c 64 75 6d  6d 79 3d 30 0d 04 4c 3b  |"1" .dummy=0..L;|
00000c10  e7 20 a4 69 63 6f 6e 5f  73 74 61 74 65 28 74 65  |. .icon_state(te|
00000c20  78 74 73 63 61 6e 5f 64  65 6c 61 79 2c 22 30 22  |xtscan_delay,"0"|
00000c30  2c 22 31 22 29 3d 22 31  22 20 8c 64 75 6d 6d 79  |,"1")="1" .dummy|
00000c40  3d 2d 64 75 6d 6d 79 0d  04 56 1f f2 73 74 61 74  |=-dummy..V..stat|
00000c50  75 73 6f 70 74 69 6f 6e  28 22 50 6f 6c 6c 22 2c  |usoption("Poll",|
00000c60  64 75 6d 6d 79 29 0d 04  60 2d f2 69 63 6f 6e 5f  |dummy)..`-.icon_|
00000c70  73 65 6c 65 63 74 5f 73  61 76 65 28 74 65 78 74  |select_save(text|
00000c80  73 63 61 6e 5f 61 6c 6c  2c 22 53 63 61 6e 41 6c  |scan_all,"ScanAl|
00000c90  6c 22 29 0d 04 6a 2e f2  69 63 6f 6e 5f 73 65 6c  |l")..j..icon_sel|
00000ca0  65 63 74 5f 73 61 76 65  28 74 65 78 74 73 63 61  |ect_save(textsca|
00000cb0  6e 5f 66 66 64 2c 22 53  63 61 6e 44 61 74 61 22  |n_ffd,"ScanData"|
00000cc0  29 0d 04 74 2e f2 69 63  6f 6e 5f 73 65 6c 65 63  |)..t..icon_selec|
00000cd0  74 5f 73 61 76 65 28 74  65 78 74 73 63 61 6e 5f  |t_save(textscan_|
00000ce0  66 65 62 2c 22 53 63 61  6e 4f 62 65 79 22 29 0d  |feb,"ScanObey").|
00000cf0  04 7e 14 f2 63 6c 6f 73  65 73 74 61 74 75 73 66  |.~..closestatusf|
00000d00  69 6c 65 0d 04 88 05 e1  0d 04 92 05 3a 0d 04 9c  |ile.........:...|
00000d10  27 dd f2 74 65 78 74 73  63 61 6e 5f 63 6c 69 63  |'..textscan_clic|
00000d20  6b 28 62 75 74 2c 6e 61  6d 65 24 2c 61 63 74 69  |k(but,name$,acti|
00000d30  6f 6e 24 29 0d 04 a6 0e  c8 8e 20 6e 61 6d 65 24  |on$)...... name$|
00000d40  20 ca 0d 04 b0 2a 20 c9  20 22 43 6c 65 61 72 22  | ....* . "Clear"|
00000d50  3a f2 69 63 6f 6e 5f 74  65 78 74 28 74 65 78 74  |:.icon_text(text|
00000d60  73 63 61 6e 5f 64 69 72  2c 22 22 29 0d 04 ba 28  |scan_dir,"")...(|
00000d70  20 c9 20 22 4f 66 66 22  3a f2 69 63 6f 6e 5f 67  | . "Off":.icon_g|
00000d80  72 65 79 28 74 65 78 74  73 63 61 6e 5f 72 61 74  |rey(textscan_rat|
00000d90  65 2c 31 29 0d 04 c4 32  20 c9 20 22 44 65 6c 61  |e,1)...2 . "Dela|
00000da0  79 22 2c 22 45 78 74 72  61 22 3a f2 69 63 6f 6e  |y","Extra":.icon|
00000db0  5f 67 72 65 79 28 74 65  78 74 73 63 61 6e 5f 72  |_grey(textscan_r|
00000dc0  61 74 65 2c 30 29 0d 04  ce 0c 20 c9 20 22 41 6c  |ate,0).... . "Al|
00000dd0  6c 22 0d 04 d8 2b 20 20  f2 69 63 6f 6e 5f 67 72  |l"...+  .icon_gr|
00000de0  65 79 28 74 65 78 74 73  63 61 6e 5f 66 66 64 2c  |ey(textscan_ffd,|
00000df0  61 63 74 69 6f 6e 24 3d  22 4f 6e 22 29 0d 04 e2  |action$="On")...|
00000e00  2b 20 20 f2 69 63 6f 6e  5f 67 72 65 79 28 74 65  |+  .icon_grey(te|
00000e10  78 74 73 63 61 6e 5f 66  65 62 2c 61 63 74 69 6f  |xtscan_feb,actio|
00000e20  6e 24 3d 22 4f 6e 22 29  0d 04 ec 05 cb 0d 04 f6  |n$="On")........|
00000e30  05 e1 0d 05 00 05 3a 0d  05 0a 21 dd f2 74 65 78  |......:...!..tex|
00000e40  74 73 63 61 6e 5f 68 65  6c 70 28 6e 61 6d 65 24  |tscan_help(name$|
00000e50  2c 65 78 74 72 61 24 29  0d 05 14 13 c8 8e 20 c0  |,extra$)...... .|
00000e60  65 78 74 72 61 24 2c 31  29 20 ca 0d 05 1e 1e 20  |extra$,1) ..... |
00000e70  c9 20 22 2b 22 2c 22 2d  22 3a f4 20 69 6e 63 2f  |. "+","-":. inc/|
00000e80  64 65 63 20 69 63 6f 6e  73 0d 05 1f 10 20 20 c8  |dec icons....  .|
00000e90  8e 20 6e 61 6d 65 24 20  ca 0d 05 20 64 20 20 20  |. name$ ... d   |
00000ea0  c9 20 22 52 61 74 65 22  3a f2 65 78 74 72 61 5f  |. "Rate":.extra_|
00000eb0  68 65 6c 70 28 65 78 74  72 61 24 2c 22 74 68 65  |help(extra$,"the|
00000ec0  20 70 6f 6c 6c 20 72 61  74 65 7c 4d 53 65 65 20  | poll rate|MSee |
00000ed0  74 68 65 20 68 65 6c 70  20 66 6f 72 20 44 65 6c  |the help for Del|
00000ee0  61 79 65 64 20 61 6e 64  20 45 78 74 72 61 20 6d  |ayed and Extra m|
00000ef0  75 6c 74 69 74 61 73 6b  69 6e 67 22 29 0d 05 21  |ultitasking")..!|
00000f00  07 20 20 cb 0d 05 28 16  20 c9 20 22 4d 22 3a f4  |.  ...(. . "M":.|
00000f10  20 6d 65 6e 75 20 69 63  6f 6e 0d 05 32 16 20 c9  | menu icon..2. .|
00000f20  20 22 4c 22 3a f4 20 6c  6f 61 64 20 69 63 6f 6e  | "L":. load icon|
00000f30  0d 05 3c 10 20 20 c8 8e  20 6e 61 6d 65 24 20 ca  |..<.  .. name$ .|
00000f40  0d 05 46 41 20 20 20 c9  20 22 44 69 72 22 3a f2  |..FA   . "Dir":.|
00000f50  65 78 74 72 61 5f 68 65  6c 70 28 22 4c 44 22 2c  |extra_help("LD",|
00000f60  22 73 65 74 20 74 68 65  20 64 65 66 61 75 6c 74  |"set the default|
00000f70  20 73 63 61 6e 20 64 69  72 65 63 74 6f 72 79 22  | scan directory"|
00000f80  29 0d 05 50 07 20 20 cb  0d 05 5a 16 20 7f 3a f4  |)..P.  ...Z. .:.|
00000f90  20 61 6e 79 74 68 69 6e  67 20 65 6c 73 65 0d 05  | anything else..|
00000fa0  64 10 20 20 c8 8e 20 6e  61 6d 65 24 20 ca 0d 05  |d.  .. name$ ...|
00000fb0  6e 35 20 20 20 c9 20 22  44 69 72 22 3a f2 67 69  |n5   . "Dir":.gi|
00000fc0  76 65 5f 68 65 6c 70 28  22 5c 54 64 65 66 61 75  |ve_help("\Tdefau|
00000fd0  6c 74 20 73 63 61 6e 20  64 69 72 65 63 74 6f 72  |lt scan director|
00000fe0  79 22 29 0d 05 78 41 20  20 20 c9 20 22 43 6c 65  |y")..xA   . "Cle|
00000ff0  61 72 22 3a f2 67 69 76  65 5f 68 65 6c 70 28 22  |ar":.give_help("|
00001000  5c 53 63 6c 65 61 72 20  74 68 65 20 64 65 66 61  |\Sclear the defa|
00001010  75 6c 74 20 73 63 61 6e  20 64 69 72 65 63 74 6f  |ult scan directo|
00001020  72 79 22 29 0d 05 82 7e  20 20 20 c9 20 22 45 64  |ry")...~   . "Ed|
00001030  69 74 6f 72 22 3a f2 67  69 76 65 5f 68 65 6c 70  |itor":.give_help|
00001040  28 22 45 6e 74 65 72 20  74 68 65 20 6e 61 6d 65  |("Enter the name|
00001050  20 6f 66 20 74 68 65 20  64 65 66 61 75 6c 74 20  | of the default |
00001060  74 68 72 6f 77 62 61 63  6b 20 65 64 69 74 6f 72  |throwback editor|
00001070  2c 20 6f 72 20 6c 65 61  76 65 20 62 6c 61 6e 6b  |, or leave blank|
00001080  20 74 6f 20 62 72 6f 61  64 63 61 73 74 20 74 68  | to broadcast th|
00001090  72 6f 77 62 61 63 6b 20  6d 65 73 73 61 67 65 73  |rowback messages|
000010a0  22 29 0d 05 8c b9 20 20  20 c9 20 22 4f 66 66 22  |")....   . "Off"|
000010b0  3a f2 67 69 76 65 5f 68  65 6c 70 28 22 5c 58 64  |:.give_help("\Xd|
000010c0  69 73 61 62 6c 65 20 61  6c 6c 20 6d 75 6c 74 69  |isable all multi|
000010d0  74 61 73 6b 69 6e 67 20  77 68 69 6c 73 74 20 61  |tasking whilst a|
000010e0  20 73 63 61 6e 20 69 73  20 69 6e 20 6f 70 65 72  | scan is in oper|
000010f0  61 74 69 6f 6e 7c 4d 54  68 69 73 20 77 69 6c 6c  |ation|MThis will|
00001100  20 70 72 6f 62 61 62 6c  79 20 6c 65 61 64 20 74  | probably lead t|
00001110  6f 20 61 20 6c 6f 6e 67  20 64 65 6c 61 79 20 77  |o a long delay w|
00001120  68 65 6e 20 74 68 65 20  73 63 61 6e 20 69 73 20  |hen the scan is |
00001130  66 69 6e 69 73 68 65 64  20 61 73 20 61 6c 6c 20  |finished as all |
00001140  74 68 65 20 6d 65 73 73  61 67 65 73 20 61 72 65  |the messages are|
00001150  20 72 65 63 65 69 76 65  64 22 29 0d 05 96 9b 20  | received").... |
00001160  20 20 c9 20 22 44 65 6c  61 79 22 3a f2 67 69 76  |  . "Delay":.giv|
00001170  65 5f 68 65 6c 70 28 22  5c 58 65 6e 61 62 6c 65  |e_help("\Xenable|
00001180  20 64 65 6c 61 79 65 64  20 6d 75 6c 74 69 74 61  | delayed multita|
00001190  73 6b 69 6e 67 7c 4d 54  68 69 73 20 6d 65 61 6e  |sking|MThis mean|
000011a0  73 20 74 68 61 74 20 78  20 6d 65 73 73 61 67 65  |s that x message|
000011b0  73 20 77 69 6c 6c 20 62  65 20 73 65 6e 74 2c 20  |s will be sent, |
000011c0  61 6e 64 20 74 68 65 6e  20 6d 75 6c 74 69 74 61  |and then multita|
000011d0  73 6b 69 6e 67 20 77 69  6c 6c 20 62 65 20 65 6e  |sking will be en|
000011e0  61 62 6c 65 64 20 66 6f  72 20 78 20 65 76 65 6e  |abled for x even|
000011f0  74 73 7c 4d 22 29 0d 05  a0 87 20 20 20 c9 20 22  |ts|M")....   . "|
00001200  45 78 74 72 61 22 3a f2  67 69 76 65 5f 68 65 6c  |Extra":.give_hel|
00001210  70 28 22 5c 58 65 6e 61  62 6c 65 20 65 78 74 72  |p("\Xenable extr|
00001220  61 20 6d 75 6c 74 69 74  61 73 6b 69 6e 67 7c 4d  |a multitasking|M|
00001230  54 68 69 73 20 6d 65 61  6e 73 20 74 68 61 74 20  |This means that |
00001240  66 6f 72 20 65 76 65 72  79 20 6d 65 73 73 61 67  |for every messag|
00001250  65 20 73 65 6e 74 20 6d  75 6c 74 69 74 61 73 6b  |e sent multitask|
00001260  69 6e 67 20 77 69 6c 6c  20 6f 63 63 75 72 20 66  |ing will occur f|
00001270  6f 72 20 78 20 65 76 65  6e 74 73 22 29 0d 05 aa  |or x events")...|
00001280  84 20 20 20 c9 20 22 52  61 74 65 22 3a f2 67 69  |.   . "Rate":.gi|
00001290  76 65 5f 68 65 6c 70 28  22 5c 54 6e 75 6d 62 65  |ve_help("\Tnumbe|
000012a0  72 20 6f 66 20 70 6f 6c  6c 20 65 76 65 6e 74 73  |r of poll events|
000012b0  20 74 68 61 74 20 77 69  6c 6c 20 74 61 6b 65 20  | that will take |
000012c0  70 6c 61 63 65 7c 4d 53  65 65 20 74 68 65 20 64  |place|MSee the d|
000012d0  65 73 63 72 69 70 74 69  6f 6e 73 20 6f 66 20 44  |escriptions of D|
000012e0  65 6c 61 79 65 64 20 61  6e 64 20 45 78 74 72 61  |elayed and Extra|
000012f0  20 6d 75 6c 74 69 74 61  73 6b 69 6e 67 7c 4d 22  | multitasking|M"|
00001300  29 0d 05 b4 76 20 20 20  c9 20 22 41 6c 6c 22 3a  |)...v   . "All":|
00001310  f2 67 69 76 65 5f 68 65  6c 70 28 22 5c 58 73 63  |.give_help("\Xsc|
00001320  61 6e 20 61 6c 6c 20 66  69 6c 65 74 79 70 65 73  |an all filetypes|
00001330  7c 4d 54 68 69 73 20 69  73 20 6e 6f 74 20 61 20  ||MThis is not a |
00001340  76 65 72 79 20 67 6f 6f  64 20 69 64 65 61 20 69  |very good idea i|
00001350  66 20 74 68 65 20 70 61  74 68 20 68 61 73 20 6c  |f the path has l|
00001360  6f 74 73 20 6f 66 20 6e  6f 6e 2d 74 65 78 74 20  |ots of non-text |
00001370  66 69 6c 65 73 22 29 0d  05 be 8a 20 20 20 c9 20  |files")....   . |
00001380  22 4f 62 65 79 22 3a f2  67 69 76 65 5f 68 65 6c  |"Obey":.give_hel|
00001390  70 28 22 5c 58 73 63 61  6e 20 4f 62 65 79 20 66  |p("\Xscan Obey f|
000013a0  69 6c 65 73 7c 4d 54 68  69 73 20 6d 61 79 20 62  |iles|MThis may b|
000013b0  65 20 75 73 65 66 75 6c  20 69 66 20 79 6f 75 20  |e useful if you |
000013c0  77 61 6e 74 20 74 6f 20  6b 6e 6f 77 20 77 68 69  |want to know whi|
000013d0  63 68 20 61 70 70 6c 69  63 61 74 69 6f 6e 73 20  |ch applications |
000013e0  75 73 65 20 66 69 6c 65  20 74 79 70 65 20 46 45  |use file type FE|
000013f0  43 20 28 66 6f 72 20 65  78 61 6d 70 6c 65 29 22  |C (for example)"|
00001400  29 0d 05 c8 78 20 20 20  c9 20 22 44 61 74 61 22  |)...x   . "Data"|
00001410  3a f2 67 69 76 65 5f 68  65 6c 70 28 22 5c 58 73  |:.give_help("\Xs|
00001420  63 61 6e 20 44 61 74 61  20 66 69 6c 65 73 7c 4d  |can Data files|M|
00001430  54 68 69 73 20 69 73 20  6d 6f 73 74 20 75 73 65  |This is most use|
00001440  66 75 6c 20 69 73 20 74  68 65 20 73 63 61 6e 20  |ful is the scan |
00001450  64 69 72 65 63 74 6f 72  79 20 69 73 20 7c 3c 53  |directory is |<S|
00001460  74 72 6f 6e 67 48 65 6c  70 24 44 69 72 3e 2e 48  |trongHelp$Dir>.H|
00001470  65 6c 70 44 61 74 61 22  29 0d 05 c9 53 20 20 20  |elpData")...S   |
00001480  c9 20 22 49 63 6f 6e 22  3a f2 67 69 76 65 5f 68  |. "Icon":.give_h|
00001490  65 6c 70 28 22 5c 53 6f  70 65 6e 20 61 20 77 69  |elp("\Sopen a wi|
000014a0  6e 64 6f 77 20 74 6f 20  63 6f 6e 74 72 6f 6c 20  |ndow to control |
000014b0  74 68 65 20 64 65 66 61  75 6c 74 73 20 66 6f 72  |the defaults for|
000014c0  20 21 54 65 78 74 53 63  61 6e 22 29 0d 05 dc 07  | !TextScan")....|
000014d0  20 20 cb 0d 05 e6 05 cb  0d 05 f0 05 e1 0d 05 fa  |  ..............|
000014e0  05 3a 0d 06 04 25 dd a4  74 65 78 74 73 63 61 6e  |.:...%..textscan|
000014f0  5f 6c 6f 61 64 28 6e 61  6d 65 24 2c 66 69 6c 65  |_load(name$,file|
00001500  24 2c 74 79 70 65 29 0d  06 0e 08 ea 20 6f 6b 0d  |$,type)..... ok.|
00001510  06 18 0e c8 8e 20 6e 61  6d 65 24 20 ca 0d 06 22  |..... name$ ..."|
00001520  0c 20 c9 20 22 44 69 72  22 0d 06 2c 14 20 20 e7  |. . "Dir"..,.  .|
00001530  20 74 79 70 65 3d 26 31  30 30 30 20 8c 0d 06 36  | type=&1000 ...6|
00001540  2a 20 20 20 6f 6b 3d b9  3a f2 69 63 6f 6e 5f 74  |*   ok=.:.icon_t|
00001550  65 78 74 28 74 65 78 74  73 63 61 6e 5f 64 69 72  |ext(textscan_dir|
00001560  2c 66 69 6c 65 24 29 0d  06 40 07 20 20 cd 0d 06  |,file$)..@.  ...|
00001570  4a 05 cb 0d 06 54 07 3d  6f 6b 0d ff              |J....T.=ok..|
0000157c