7� � �error(�,�$+" (At line: "+Þ+" / !RunImage)"):�
�init:finished%=�
�openwindow(rndpass%)
(,ș "Wimp_Poll",,tempbufalg% � eventCode%
2mask%=0
<�
F1ș "Wimp_Poll",mask%,tempbufalg% � eventCode%
P  Ȏ eventCode% �
Z*� 2:ș "Wimp_OpenWindow",0,tempbufalg%
d7� 3:ș "Wimp_CloseWindow",0,tempbufalg%:finished%=�
n=� 6:�buttons(tempbufalg%!12,tempbufalg%!8,tempbufalg%!16)
x�
�� finished%=�
�ș "Wimp_CloseDown"
��
���init:timer%=0
�� tempbufalg% 10000
�� tempbufrnd% 1000
�� font% 1000
�3� blk% 1000:� bb% 100:� wimp% 1000:� menu% 1000
�wordold%=�(15)
�$bb%="TASK"
�6ș"Wimp_Initialise",200,!bb%,"!RNDpass" � ,MyTask%
�
�template
��



��template

3 ș "Wimp_OpenTemplate",,"<rnd$pass>.Templates"

"R ș "Wimp_LoadTemplate",,tempbufalg%,tempbufrnd%,tempbufrnd%+1000,font%,"Main"

,3 ș "Wimp_CreateWindow",,tempbufalg% � rndpass%

6 ș "Wimp_CloseTemplate"

@�

J��openwindow(windownummer%)

T*�getw(windownummer%):tempbufalg%!28=-1

^%ș "Wimp_OpenWindow",,tempbufalg%

h�

r

|��error(!blk%,$(blk%+4))

�(ș "Wimp_ReportError",blk%,1,"!Nuke"

��

�

�J��getw(win%):!tempbufalg%=win%:ș "Wimp_GetWindowState",,tempbufalg%:�

�

�$��buttons(window%,button%,icon%)

�� icon%=13 � �test

�0� icon%=15 � �("Filer_Run <rnd$pass>.!Help")

�0� icon%=12 � �("Filer_Run <rnd$pass>.!Tips")

��

���test:flag%=0

�!words%  =�(�read(rndpass%,1))

�Y� words%<3 � words%>15 � error$="Enter number of words in the range of 3-15.":�error2
cmin%=�(�read(rndpass%,3)):� min%<1 � error$="Most sentences have at least one word ;-)":�error2
`max%=�(�read(rndpass%,5)):� max%>90 � error$="Enter a smaller number of characters.":�error2
`� min%>max% � error$="The minimum wordlength is bigger than the maximum wordlength.":�error2
&!sp%   =�iconstate(rndpass%,6)
0!caps% =�iconstate(rndpass%,7)
:!smile%=�iconstate(rndpass%,8)
D per%  =�(�read(rndpass%,11))
N_stop% =�(�read(rndpass%,18)):� stop%<500 � error$="Minimum number of tries is 500.":�error2
X� flag%=1 � �
b �generate
l�
v#ݤread(w%,i%):� window% + icon%
�
�getw(w%)
�� t%
�blk%!0=w%:blk%!4=i%
�ș"Wimp_GetIconState",,blk%
�A$=$(blk%!28)
�t%=�A$,�(0))
�A$=�A$,t%-1)
�=A$
�
���error2
�Sș "Wimp_ReportError","     "+error$,2^9+256,"!RNDpass","!RNDpass",1,"OK" � ,b%
�flag%=1
��

ݤiconstate(window%,icn%)
blk%!0=window%:blk%!4=icn%
 ș"Wimp_GetIconState",,blk%
*icn%=blk%?26
4 � icn%>&1F � icn%=1 � icn%=0
>	=icn%
H�
R
\>� --------------------------------------------------------
f� passphrase generation
p��generate
zdone%=0
�
adr%=0
�#wordlist$="<rnd$pass>.Wordlist"
�x%=�(wordlist$)
�(ș "OS_File" ,5,wordlist$ � ,,,,len%
�(lo%=5     :� length of previous word
�interval%=�
�>interval%=(�-interval%)/10:� time to answer above question
�PassPhrase$=""
�� t%=1 � words%
�1PassPhrase$=PassPhrase$+�word(�rnd(len%))+" "
�� done%=stop% � �#x%:�
�� t%
��add_special
(�UpdateIcon(rndpass%,16,PassPhrase$)
words%=wordold%
�#x%
$�
.
8��UpdateIcon(w%,i%,new$)
B� Offset,Step,IconName%
L!blk%=w%
V!ș "Wimp_GetWindowInfo",,blk%
`Offset%=88+20+4:Step%=32
j&IconName%=!(blk%+Offset%+Step%*i%)
t$IconName%=new$+�(0)
~�ForceRedrawIcon(w%,i%)
��
�
�$��ForceRedrawIcon(blk%!0,blk%!4)
�blk%!8=0:blk%!12=0
� :ș"Wimp_SetIconState",,blk%
��
�
�
ݤrnd(n%)
�seed$=�$+�(�)
�+z%=�("<rnd$pass>.Pass"):�#z%,seed$:�#z%
�*�"MD5 <rnd$pass>.Pass <rnd$pass>.Pass"
�z%=�("<rnd$pass>.Pass")
�#z%=�#z%+�(13)

a$=�~(�#z%)
b$=�~(�#z%)
c$=�~(�#z%)
(seed$="&"+a$+b$+c$
2!seed%=�(seed$)/(&FFFFFF/len%)
<�#z%
F
=seed%
P
Zݤword(n%):� t%
d
�#x%=0
n� n%>adr% � adr%=n%
x�#x%=n%
��:� �#x% � �#x=�#x%-�(100)
�c%=�#x%:� c%=&A
�word$="":done%=done%+1:
�T� �-timer%>100 � �UpdateIcon(rndpass%,16,"Checked "+�(done%)+" words."):timer%=�
�]� done%=stop% � �UpdateIcon(rndpass%,16,"Search aborted after "+�(stop%)+" words"):� �TDF
�� �#x% � �#x%=�#x%-�(100)
�c%=�#x%
�� c%=&D � �ttE
�� c%=&A � �dpE
�word$=word$+�(c%)
�
� �ttE
�lo%=�(word$)
�"� lo%<min% � lo%>max% � � �tVE

=word$

(��add_special:special$="":smiley$=""
"t%=(sp%+caps%+smile%)
,� t%=0 � per%=0 :�
6#per%=per%/100/t%*�(PassPhrase$)
@'� first 'collect' the special chars
J� sp%=0 � �tPF
T� t%=1 � per%
^?special$="!$%^&*()_+=;:@'~#|\<>-1234567890":� special chars
h3special$=�special$,�(�(special$)),1):� pick one
rn%=�(�(PassPhrase$)-1)
|KPassPhrase$=�PassPhrase$,n%-1)+special$+�PassPhrase$,�(PassPhrase$)-n%)
�� t%
�� smile%=0 � �TzG
�� n%=1 � per%
�
� �tTG
�B� t%=1 � �(19):� smiley$:� t%:� get a smiley or something else
�� insert smiley
�pos%=�(words%)
�:� pos%<2      � PassPhrase$=smiley$+PassPhrase$:� �TRG
�:� pos%=words% � PassPhrase$=PassPhrase$+smiley$:� �TRG
�
t%=0:n%=0
�t%=t%+1
�&� �PassPhrase$,t%,1)=" " � n%=n%+1
�� n%<>pos% � �djF
NPassPhrase$=�PassPhrase$,t%)+smiley$+" "+�PassPhrase$,�(PassPhrase$)-t%-1)
words%=words%+1
� n%
&
0� make uppercase
:� caps%=0 � �tJG
D� t%=1 � per%
Nn%=�(�(PassPhrase$)-1)
Xc%=�(�PassPhrase$,n%,1))-32
b� c%<65 � c%>90 � c%=c%+32
la$=�(c%)
vEPassPhrase$=�PassPhrase$,n%-1)+a$+�PassPhrase$,�(PassPhrase$)-n%)
�� t%
��
�x� ":-)",":-(",":->",":-<",":-|",";-)",";-(",";->",";-<",";-|",":)",":(",":>",":<","<-->","..."," E=MC^2","123","321"
�

00000000  0d 00 0a 37 ee 20 85 20  f2 65 72 72 6f 72 28 9e  |...7. . .error(.|
00000010  2c f6 24 2b 22 20 28 41  74 20 6c 69 6e 65 3a 20  |,.$+" (At line: |
00000020  22 2b c3 9e 2b 22 20 2f  20 21 52 75 6e 49 6d 61  |"+..+" / !RunIma|
00000030  67 65 29 22 29 3a e0 0d  00 14 15 f2 69 6e 69 74  |ge)"):......init|
00000040  3a 66 69 6e 69 73 68 65  64 25 3d a3 0d 00 1e 19  |:finished%=.....|
00000050  f2 6f 70 65 6e 77 69 6e  64 6f 77 28 72 6e 64 70  |.openwindow(rndp|
00000060  61 73 73 25 29 0d 00 28  2c c8 99 20 22 57 69 6d  |ass%)..(,.. "Wim|
00000070  70 5f 50 6f 6c 6c 22 2c  2c 74 65 6d 70 62 75 66  |p_Poll",,tempbuf|
00000080  61 6c 67 25 20 b8 20 65  76 65 6e 74 43 6f 64 65  |alg% . eventCode|
00000090  25 0d 00 32 0b 6d 61 73  6b 25 3d 30 0d 00 3c 05  |%..2.mask%=0..<.|
000000a0  f5 0d 00 46 31 c8 99 20  22 57 69 6d 70 5f 50 6f  |...F1.. "Wimp_Po|
000000b0  6c 6c 22 2c 6d 61 73 6b  25 2c 74 65 6d 70 62 75  |ll",mask%,tempbu|
000000c0  66 61 6c 67 25 20 b8 20  65 76 65 6e 74 43 6f 64  |falg% . eventCod|
000000d0  65 25 0d 00 50 15 20 20  c8 8e 20 65 76 65 6e 74  |e%..P.  .. event|
000000e0  43 6f 64 65 25 20 ca 0d  00 5a 2a c9 20 32 3a c8  |Code% ...Z*. 2:.|
000000f0  99 20 22 57 69 6d 70 5f  4f 70 65 6e 57 69 6e 64  |. "Wimp_OpenWind|
00000100  6f 77 22 2c 30 2c 74 65  6d 70 62 75 66 61 6c 67  |ow",0,tempbufalg|
00000110  25 0d 00 64 37 c9 20 33  3a c8 99 20 22 57 69 6d  |%..d7. 3:.. "Wim|
00000120  70 5f 43 6c 6f 73 65 57  69 6e 64 6f 77 22 2c 30  |p_CloseWindow",0|
00000130  2c 74 65 6d 70 62 75 66  61 6c 67 25 3a 66 69 6e  |,tempbufalg%:fin|
00000140  69 73 68 65 64 25 3d b9  0d 00 6e 3d c9 20 36 3a  |ished%=...n=. 6:|
00000150  f2 62 75 74 74 6f 6e 73  28 74 65 6d 70 62 75 66  |.buttons(tempbuf|
00000160  61 6c 67 25 21 31 32 2c  74 65 6d 70 62 75 66 61  |alg%!12,tempbufa|
00000170  6c 67 25 21 38 2c 74 65  6d 70 62 75 66 61 6c 67  |lg%!8,tempbufalg|
00000180  25 21 31 36 29 0d 00 78  05 cb 0d 00 82 11 fd 20  |%!16)..x....... |
00000190  66 69 6e 69 73 68 65 64  25 3d b9 0d 00 8c 17 c8  |finished%=......|
000001a0  99 20 22 57 69 6d 70 5f  43 6c 6f 73 65 44 6f 77  |. "Wimp_CloseDow|
000001b0  6e 22 0d 00 96 05 e0 0d  00 a0 13 dd f2 69 6e 69  |n"...........ini|
000001c0  74 3a 74 69 6d 65 72 25  3d 30 0d 00 aa 17 de 20  |t:timer%=0..... |
000001d0  74 65 6d 70 62 75 66 61  6c 67 25 20 31 30 30 30  |tempbufalg% 1000|
000001e0  30 0d 00 b4 16 de 20 74  65 6d 70 62 75 66 72 6e  |0..... tempbufrn|
000001f0  64 25 20 31 30 30 30 0d  00 be 10 de 20 66 6f 6e  |d% 1000..... fon|
00000200  74 25 20 31 30 30 30 0d  00 c8 33 de 20 62 6c 6b  |t% 1000...3. blk|
00000210  25 20 31 30 30 30 3a de  20 62 62 25 20 31 30 30  |% 1000:. bb% 100|
00000220  3a de 20 77 69 6d 70 25  20 31 30 30 30 3a de 20  |:. wimp% 1000:. |
00000230  6d 65 6e 75 25 20 31 30  30 30 0d 00 d2 12 77 6f  |menu% 1000....wo|
00000240  72 64 6f 6c 64 25 3d b3  28 31 35 29 0d 00 dc 0f  |rdold%=.(15)....|
00000250  24 62 62 25 3d 22 54 41  53 4b 22 0d 00 e6 36 c8  |$bb%="TASK"...6.|
00000260  99 22 57 69 6d 70 5f 49  6e 69 74 69 61 6c 69 73  |."Wimp_Initialis|
00000270  65 22 2c 32 30 30 2c 21  62 62 25 2c 22 21 52 4e  |e",200,!bb%,"!RN|
00000280  44 70 61 73 73 22 20 b8  20 2c 4d 79 54 61 73 6b  |Dpass" . ,MyTask|
00000290  25 0d 00 f0 0d f2 74 65  6d 70 6c 61 74 65 0d 00  |%.....template..|
000002a0  fa 05 e1 0d 01 04 04 0d  01 0e 0e dd f2 74 65 6d  |.............tem|
000002b0  70 6c 61 74 65 0d 01 18  33 20 c8 99 20 22 57 69  |plate...3 .. "Wi|
000002c0  6d 70 5f 4f 70 65 6e 54  65 6d 70 6c 61 74 65 22  |mp_OpenTemplate"|
000002d0  2c 2c 22 3c 72 6e 64 24  70 61 73 73 3e 2e 54 65  |,,"<rnd$pass>.Te|
000002e0  6d 70 6c 61 74 65 73 22  0d 01 22 52 20 c8 99 20  |mplates".."R .. |
000002f0  22 57 69 6d 70 5f 4c 6f  61 64 54 65 6d 70 6c 61  |"Wimp_LoadTempla|
00000300  74 65 22 2c 2c 74 65 6d  70 62 75 66 61 6c 67 25  |te",,tempbufalg%|
00000310  2c 74 65 6d 70 62 75 66  72 6e 64 25 2c 74 65 6d  |,tempbufrnd%,tem|
00000320  70 62 75 66 72 6e 64 25  2b 31 30 30 30 2c 66 6f  |pbufrnd%+1000,fo|
00000330  6e 74 25 2c 22 4d 61 69  6e 22 0d 01 2c 33 20 c8  |nt%,"Main"..,3 .|
00000340  99 20 22 57 69 6d 70 5f  43 72 65 61 74 65 57 69  |. "Wimp_CreateWi|
00000350  6e 64 6f 77 22 2c 2c 74  65 6d 70 62 75 66 61 6c  |ndow",,tempbufal|
00000360  67 25 20 b8 20 72 6e 64  70 61 73 73 25 0d 01 36  |g% . rndpass%..6|
00000370  1c 20 c8 99 20 22 57 69  6d 70 5f 43 6c 6f 73 65  |. .. "Wimp_Close|
00000380  54 65 6d 70 6c 61 74 65  22 0d 01 40 05 e1 0d 01  |Template"..@....|
00000390  4a 1f dd f2 6f 70 65 6e  77 69 6e 64 6f 77 28 77  |J...openwindow(w|
000003a0  69 6e 64 6f 77 6e 75 6d  6d 65 72 25 29 0d 01 54  |indownummer%)..T|
000003b0  2a f2 67 65 74 77 28 77  69 6e 64 6f 77 6e 75 6d  |*.getw(windownum|
000003c0  6d 65 72 25 29 3a 74 65  6d 70 62 75 66 61 6c 67  |mer%):tempbufalg|
000003d0  25 21 32 38 3d 2d 31 0d  01 5e 25 c8 99 20 22 57  |%!28=-1..^%.. "W|
000003e0  69 6d 70 5f 4f 70 65 6e  57 69 6e 64 6f 77 22 2c  |imp_OpenWindow",|
000003f0  2c 74 65 6d 70 62 75 66  61 6c 67 25 0d 01 68 05  |,tempbufalg%..h.|
00000400  e1 0d 01 72 04 0d 01 7c  1c dd f2 65 72 72 6f 72  |...r...|...error|
00000410  28 21 62 6c 6b 25 2c 24  28 62 6c 6b 25 2b 34 29  |(!blk%,$(blk%+4)|
00000420  29 0d 01 86 28 c8 99 20  22 57 69 6d 70 5f 52 65  |)...(.. "Wimp_Re|
00000430  70 6f 72 74 45 72 72 6f  72 22 2c 62 6c 6b 25 2c  |portError",blk%,|
00000440  31 2c 22 21 4e 75 6b 65  22 0d 01 90 05 e1 0d 01  |1,"!Nuke".......|
00000450  9a 04 0d 01 a4 4a dd f2  67 65 74 77 28 77 69 6e  |.....J..getw(win|
00000460  25 29 3a 21 74 65 6d 70  62 75 66 61 6c 67 25 3d  |%):!tempbufalg%=|
00000470  77 69 6e 25 3a c8 99 20  22 57 69 6d 70 5f 47 65  |win%:.. "Wimp_Ge|
00000480  74 57 69 6e 64 6f 77 53  74 61 74 65 22 2c 2c 74  |tWindowState",,t|
00000490  65 6d 70 62 75 66 61 6c  67 25 3a e1 0d 01 ae 04  |empbufalg%:.....|
000004a0  0d 01 b8 24 dd f2 62 75  74 74 6f 6e 73 28 77 69  |...$..buttons(wi|
000004b0  6e 64 6f 77 25 2c 62 75  74 74 6f 6e 25 2c 69 63  |ndow%,button%,ic|
000004c0  6f 6e 25 29 0d 01 c2 16  e7 20 69 63 6f 6e 25 3d  |on%)..... icon%=|
000004d0  31 33 20 8c 20 f2 74 65  73 74 0d 01 cc 30 e7 20  |13 . .test...0. |
000004e0  69 63 6f 6e 25 3d 31 35  20 8c 20 ff 28 22 46 69  |icon%=15 . .("Fi|
000004f0  6c 65 72 5f 52 75 6e 20  3c 72 6e 64 24 70 61 73  |ler_Run <rnd$pas|
00000500  73 3e 2e 21 48 65 6c 70  22 29 0d 01 d6 30 e7 20  |s>.!Help")...0. |
00000510  69 63 6f 6e 25 3d 31 32  20 8c 20 ff 28 22 46 69  |icon%=12 . .("Fi|
00000520  6c 65 72 5f 52 75 6e 20  3c 72 6e 64 24 70 61 73  |ler_Run <rnd$pas|
00000530  73 3e 2e 21 54 69 70 73  22 29 0d 01 e0 05 e1 0d  |s>.!Tips")......|
00000540  01 ea 12 dd f2 74 65 73  74 3a 66 6c 61 67 25 3d  |.....test:flag%=|
00000550  30 0d 01 f4 21 77 6f 72  64 73 25 20 20 3d bb 28  |0...!words%  =.(|
00000560  a4 72 65 61 64 28 72 6e  64 70 61 73 73 25 2c 31  |.read(rndpass%,1|
00000570  29 29 0d 01 fe 59 e7 20  77 6f 72 64 73 25 3c 33  |))...Y. words%<3|
00000580  20 84 20 77 6f 72 64 73  25 3e 31 35 20 8c 20 65  | . words%>15 . e|
00000590  72 72 6f 72 24 3d 22 45  6e 74 65 72 20 6e 75 6d  |rror$="Enter num|
000005a0  62 65 72 20 6f 66 20 77  6f 72 64 73 20 69 6e 20  |ber of words in |
000005b0  74 68 65 20 72 61 6e 67  65 20 6f 66 20 33 2d 31  |the range of 3-1|
000005c0  35 2e 22 3a f2 65 72 72  6f 72 32 0d 02 08 63 6d  |5.":.error2...cm|
000005d0  69 6e 25 3d bb 28 a4 72  65 61 64 28 72 6e 64 70  |in%=.(.read(rndp|
000005e0  61 73 73 25 2c 33 29 29  3a e7 20 6d 69 6e 25 3c  |ass%,3)):. min%<|
000005f0  31 20 8c 20 65 72 72 6f  72 24 3d 22 4d 6f 73 74  |1 . error$="Most|
00000600  20 73 65 6e 74 65 6e 63  65 73 20 68 61 76 65 20  | sentences have |
00000610  61 74 20 6c 65 61 73 74  20 6f 6e 65 20 77 6f 72  |at least one wor|
00000620  64 20 3b 2d 29 22 3a f2  65 72 72 6f 72 32 0d 02  |d ;-)":.error2..|
00000630  12 60 6d 61 78 25 3d bb  28 a4 72 65 61 64 28 72  |.`max%=.(.read(r|
00000640  6e 64 70 61 73 73 25 2c  35 29 29 3a e7 20 6d 61  |ndpass%,5)):. ma|
00000650  78 25 3e 39 30 20 8c 20  65 72 72 6f 72 24 3d 22  |x%>90 . error$="|
00000660  45 6e 74 65 72 20 61 20  73 6d 61 6c 6c 65 72 20  |Enter a smaller |
00000670  6e 75 6d 62 65 72 20 6f  66 20 63 68 61 72 61 63  |number of charac|
00000680  74 65 72 73 2e 22 3a f2  65 72 72 6f 72 32 0d 02  |ters.":.error2..|
00000690  1c 60 e7 20 6d 69 6e 25  3e 6d 61 78 25 20 8c 20  |.`. min%>max% . |
000006a0  65 72 72 6f 72 24 3d 22  54 68 65 20 6d 69 6e 69  |error$="The mini|
000006b0  6d 75 6d 20 77 6f 72 64  6c 65 6e 67 74 68 20 69  |mum wordlength i|
000006c0  73 20 62 69 67 67 65 72  20 74 68 61 6e 20 74 68  |s bigger than th|
000006d0  65 20 6d 61 78 69 6d 75  6d 20 77 6f 72 64 6c 65  |e maximum wordle|
000006e0  6e 67 74 68 2e 22 3a f2  65 72 72 6f 72 32 0d 02  |ngth.":.error2..|
000006f0  26 21 73 70 25 20 20 20  3d a4 69 63 6f 6e 73 74  |&!sp%   =.iconst|
00000700  61 74 65 28 72 6e 64 70  61 73 73 25 2c 36 29 0d  |ate(rndpass%,6).|
00000710  02 30 21 63 61 70 73 25  20 3d a4 69 63 6f 6e 73  |.0!caps% =.icons|
00000720  74 61 74 65 28 72 6e 64  70 61 73 73 25 2c 37 29  |tate(rndpass%,7)|
00000730  0d 02 3a 21 73 6d 69 6c  65 25 3d a4 69 63 6f 6e  |..:!smile%=.icon|
00000740  73 74 61 74 65 28 72 6e  64 70 61 73 73 25 2c 38  |state(rndpass%,8|
00000750  29 0d 02 44 20 70 65 72  25 20 20 3d bb 28 a4 72  |)..D per%  =.(.r|
00000760  65 61 64 28 72 6e 64 70  61 73 73 25 2c 31 31 29  |ead(rndpass%,11)|
00000770  29 0d 02 4e 5f 73 74 6f  70 25 20 3d bb 28 a4 72  |)..N_stop% =.(.r|
00000780  65 61 64 28 72 6e 64 70  61 73 73 25 2c 31 38 29  |ead(rndpass%,18)|
00000790  29 3a e7 20 73 74 6f 70  25 3c 35 30 30 20 8c 20  |):. stop%<500 . |
000007a0  65 72 72 6f 72 24 3d 22  4d 69 6e 69 6d 75 6d 20  |error$="Minimum |
000007b0  6e 75 6d 62 65 72 20 6f  66 20 74 72 69 65 73 20  |number of tries |
000007c0  69 73 20 35 30 30 2e 22  3a f2 65 72 72 6f 72 32  |is 500.":.error2|
000007d0  0d 02 58 11 e7 20 66 6c  61 67 25 3d 31 20 8c 20  |..X.. flag%=1 . |
000007e0  e1 0d 02 62 0e 20 f2 67  65 6e 65 72 61 74 65 0d  |...b. .generate.|
000007f0  02 6c 05 e1 0d 02 76 23  dd a4 72 65 61 64 28 77  |.l....v#..read(w|
00000800  25 2c 69 25 29 3a f4 20  77 69 6e 64 6f 77 25 20  |%,i%):. window% |
00000810  2b 20 69 63 6f 6e 25 0d  02 80 0d f2 67 65 74 77  |+ icon%.....getw|
00000820  28 77 25 29 0d 02 8a 08  ea 20 74 25 0d 02 94 17  |(w%)..... t%....|
00000830  62 6c 6b 25 21 30 3d 77  25 3a 62 6c 6b 25 21 34  |blk%!0=w%:blk%!4|
00000840  3d 69 25 0d 02 9e 1f c8  99 22 57 69 6d 70 5f 47  |=i%......"Wimp_G|
00000850  65 74 49 63 6f 6e 53 74  61 74 65 22 2c 2c 62 6c  |etIconState",,bl|
00000860  6b 25 0d 02 a8 11 41 24  3d 24 28 62 6c 6b 25 21  |k%....A$=$(blk%!|
00000870  32 38 29 0d 02 b2 10 74  25 3d a7 41 24 2c bd 28  |28)....t%=.A$,.(|
00000880  30 29 29 0d 02 bc 10 41  24 3d c0 41 24 2c 74 25  |0))....A$=.A$,t%|
00000890  2d 31 29 0d 02 c6 07 3d  41 24 0d 02 d0 04 0d 02  |-1)....=A$......|
000008a0  da 0c dd f2 65 72 72 6f  72 32 0d 02 e4 53 c8 99  |....error2...S..|
000008b0  20 22 57 69 6d 70 5f 52  65 70 6f 72 74 45 72 72  | "Wimp_ReportErr|
000008c0  6f 72 22 2c 22 20 20 20  20 20 22 2b 65 72 72 6f  |or","     "+erro|
000008d0  72 24 2c 32 5e 39 2b 32  35 36 2c 22 21 52 4e 44  |r$,2^9+256,"!RND|
000008e0  70 61 73 73 22 2c 22 21  52 4e 44 70 61 73 73 22  |pass","!RNDpass"|
000008f0  2c 31 2c 22 4f 4b 22 20  b8 20 2c 62 25 0d 02 ee  |,1,"OK" . ,b%...|
00000900  0b 66 6c 61 67 25 3d 31  0d 02 f8 05 e1 0d 03 02  |.flag%=1........|
00000910  04 0d 03 0c 1d dd a4 69  63 6f 6e 73 74 61 74 65  |.......iconstate|
00000920  28 77 69 6e 64 6f 77 25  2c 69 63 6e 25 29 0d 03  |(window%,icn%)..|
00000930  16 1e 62 6c 6b 25 21 30  3d 77 69 6e 64 6f 77 25  |..blk%!0=window%|
00000940  3a 62 6c 6b 25 21 34 3d  69 63 6e 25 0d 03 20 1f  |:blk%!4=icn%.. .|
00000950  c8 99 22 57 69 6d 70 5f  47 65 74 49 63 6f 6e 53  |.."Wimp_GetIconS|
00000960  74 61 74 65 22 2c 2c 62  6c 6b 25 0d 03 2a 10 69  |tate",,blk%..*.i|
00000970  63 6e 25 3d 62 6c 6b 25  3f 32 36 0d 03 34 20 e7  |cn%=blk%?26..4 .|
00000980  20 69 63 6e 25 3e 26 31  46 20 8c 20 69 63 6e 25  | icn%>&1F . icn%|
00000990  3d 31 20 8b 20 69 63 6e  25 3d 30 0d 03 3e 09 3d  |=1 . icn%=0..>.=|
000009a0  69 63 6e 25 0d 03 48 05  e0 0d 03 52 04 0d 03 5c  |icn%..H....R...\|
000009b0  3e f4 20 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |>. -------------|
000009c0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 2d 2d 2d 2d 2d  |----------------|
*
000009e0  2d 2d 2d 2d 2d 2d 2d 2d  2d 2d 2d 0d 03 66 1b f4  |-----------..f..|
000009f0  20 70 61 73 73 70 68 72  61 73 65 20 67 65 6e 65  | passphrase gene|
00000a00  72 61 74 69 6f 6e 0d 03  70 0e dd f2 67 65 6e 65  |ration..p...gene|
00000a10  72 61 74 65 0d 03 7a 0b  64 6f 6e 65 25 3d 30 0d  |rate..z.done%=0.|
00000a20  03 84 0a 61 64 72 25 3d  30 0d 03 8e 23 77 6f 72  |...adr%=0...#wor|
00000a30  64 6c 69 73 74 24 3d 22  3c 72 6e 64 24 70 61 73  |dlist$="<rnd$pas|
00000a40  73 3e 2e 57 6f 72 64 6c  69 73 74 22 0d 03 98 13  |s>.Wordlist"....|
00000a50  78 25 3d ad 28 77 6f 72  64 6c 69 73 74 24 29 0d  |x%=.(wordlist$).|
00000a60  03 a2 28 c8 99 20 22 4f  53 5f 46 69 6c 65 22 20  |..(.. "OS_File" |
00000a70  2c 35 2c 77 6f 72 64 6c  69 73 74 24 20 b8 20 2c  |,5,wordlist$ . ,|
00000a80  2c 2c 2c 6c 65 6e 25 0d  03 ac 28 6c 6f 25 3d 35  |,,,len%...(lo%=5|
00000a90  20 20 20 20 20 3a f4 20  6c 65 6e 67 74 68 20 6f  |     :. length o|
00000aa0  66 20 70 72 65 76 69 6f  75 73 20 77 6f 72 64 0d  |f previous word.|
00000ab0  03 b6 0f 69 6e 74 65 72  76 61 6c 25 3d 91 0d 03  |...interval%=...|
00000ac0  c0 3e 69 6e 74 65 72 76  61 6c 25 3d 28 91 2d 69  |.>interval%=(.-i|
00000ad0  6e 74 65 72 76 61 6c 25  29 2f 31 30 3a f4 20 74  |nterval%)/10:. t|
00000ae0  69 6d 65 20 74 6f 20 61  6e 73 77 65 72 20 61 62  |ime to answer ab|
00000af0  6f 76 65 20 71 75 65 73  74 69 6f 6e 0d 03 ca 12  |ove question....|
00000b00  50 61 73 73 50 68 72 61  73 65 24 3d 22 22 0d 03  |PassPhrase$=""..|
00000b10  d4 13 e3 20 74 25 3d 31  20 b8 20 77 6f 72 64 73  |... t%=1 . words|
00000b20  25 0d 03 de 31 50 61 73  73 50 68 72 61 73 65 24  |%...1PassPhrase$|
00000b30  3d 50 61 73 73 50 68 72  61 73 65 24 2b a4 77 6f  |=PassPhrase$+.wo|
00000b40  72 64 28 a4 72 6e 64 28  6c 65 6e 25 29 29 2b 22  |rd(.rnd(len%))+"|
00000b50  20 22 0d 03 e8 1a e7 20  64 6f 6e 65 25 3d 73 74  | "..... done%=st|
00000b60  6f 70 25 20 8c 20 d9 23  78 25 3a e1 0d 03 f2 08  |op% . .#x%:.....|
00000b70  ed 20 74 25 0d 03 fc 10  f2 61 64 64 5f 73 70 65  |. t%.....add_spe|
00000b80  63 69 61 6c 0d 04 06 28  f2 55 70 64 61 74 65 49  |cial...(.UpdateI|
00000b90  63 6f 6e 28 72 6e 64 70  61 73 73 25 2c 31 36 2c  |con(rndpass%,16,|
00000ba0  50 61 73 73 50 68 72 61  73 65 24 29 0d 04 10 13  |PassPhrase$)....|
00000bb0  77 6f 72 64 73 25 3d 77  6f 72 64 6f 6c 64 25 0d  |words%=wordold%.|
00000bc0  04 1a 08 d9 23 78 25 0d  04 24 05 e1 0d 04 2e 04  |....#x%..$......|
00000bd0  0d 04 38 1c dd f2 55 70  64 61 74 65 49 63 6f 6e  |..8...UpdateIcon|
00000be0  28 77 25 2c 69 25 2c 6e  65 77 24 29 0d 04 42 1b  |(w%,i%,new$)..B.|
00000bf0  ea 20 4f 66 66 73 65 74  2c 53 74 65 70 2c 49 63  |. Offset,Step,Ic|
00000c00  6f 6e 4e 61 6d 65 25 0d  04 4c 0c 21 62 6c 6b 25  |onName%..L.!blk%|
00000c10  3d 77 25 0d 04 56 21 c8  99 20 22 57 69 6d 70 5f  |=w%..V!.. "Wimp_|
00000c20  47 65 74 57 69 6e 64 6f  77 49 6e 66 6f 22 2c 2c  |GetWindowInfo",,|
00000c30  62 6c 6b 25 0d 04 60 1c  4f 66 66 73 65 74 25 3d  |blk%..`.Offset%=|
00000c40  38 38 2b 32 30 2b 34 3a  53 74 65 70 25 3d 33 32  |88+20+4:Step%=32|
00000c50  0d 04 6a 26 49 63 6f 6e  4e 61 6d 65 25 3d 21 28  |..j&IconName%=!(|
00000c60  62 6c 6b 25 2b 4f 66 66  73 65 74 25 2b 53 74 65  |blk%+Offset%+Ste|
00000c70  70 25 2a 69 25 29 0d 04  74 18 24 49 63 6f 6e 4e  |p%*i%)..t.$IconN|
00000c80  61 6d 65 25 3d 6e 65 77  24 2b bd 28 30 29 0d 04  |ame%=new$+.(0)..|
00000c90  7e 1b f2 46 6f 72 63 65  52 65 64 72 61 77 49 63  |~..ForceRedrawIc|
00000ca0  6f 6e 28 77 25 2c 69 25  29 0d 04 88 05 e1 0d 04  |on(w%,i%).......|
00000cb0  92 04 0d 04 9c 24 dd f2  46 6f 72 63 65 52 65 64  |.....$..ForceRed|
00000cc0  72 61 77 49 63 6f 6e 28  62 6c 6b 25 21 30 2c 62  |rawIcon(blk%!0,b|
00000cd0  6c 6b 25 21 34 29 0d 04  a6 16 62 6c 6b 25 21 38  |lk%!4)....blk%!8|
00000ce0  3d 30 3a 62 6c 6b 25 21  31 32 3d 30 0d 04 b0 20  |=0:blk%!12=0... |
00000cf0  3a c8 99 22 57 69 6d 70  5f 53 65 74 49 63 6f 6e  |:.."Wimp_SetIcon|
00000d00  53 74 61 74 65 22 2c 2c  62 6c 6b 25 0d 04 ba 05  |State",,blk%....|
00000d10  e1 0d 04 c4 04 0d 04 ce  0d dd a4 72 6e 64 28 6e  |...........rnd(n|
00000d20  25 29 0d 04 d8 11 73 65  65 64 24 3d 91 24 2b c3  |%)....seed$=.$+.|
00000d30  28 91 29 0d 04 e2 2b 7a  25 3d ae 28 22 3c 72 6e  |(.)...+z%=.("<rn|
00000d40  64 24 70 61 73 73 3e 2e  50 61 73 73 22 29 3a d5  |d$pass>.Pass"):.|
00000d50  23 7a 25 2c 73 65 65 64  24 3a d9 23 7a 25 0d 04  |#z%,seed$:.#z%..|
00000d60  ec 2a ff 22 4d 44 35 20  3c 72 6e 64 24 70 61 73  |.*."MD5 <rnd$pas|
00000d70  73 3e 2e 50 61 73 73 20  3c 72 6e 64 24 70 61 73  |s>.Pass <rnd$pas|
00000d80  73 3e 2e 50 61 73 73 22  0d 04 f6 1b 7a 25 3d ad  |s>.Pass"....z%=.|
00000d90  28 22 3c 72 6e 64 24 70  61 73 73 3e 2e 50 61 73  |("<rnd$pass>.Pas|
00000da0  73 22 29 0d 05 00 13 cf  23 7a 25 3d 8f 23 7a 25  |s").....#z%=.#z%|
00000db0  2b b3 28 31 33 29 0d 05  0a 0f 61 24 3d c3 7e 28  |+.(13)....a$=.~(|
00000dc0  9a 23 7a 25 29 0d 05 14  0f 62 24 3d c3 7e 28 9a  |.#z%)....b$=.~(.|
00000dd0  23 7a 25 29 0d 05 1e 0f  63 24 3d c3 7e 28 9a 23  |#z%)....c$=.~(.#|
00000de0  7a 25 29 0d 05 28 16 73  65 65 64 24 3d 22 26 22  |z%)..(.seed$="&"|
00000df0  2b 61 24 2b 62 24 2b 63  24 0d 05 32 21 73 65 65  |+a$+b$+c$..2!see|
00000e00  64 25 3d a0 28 73 65 65  64 24 29 2f 28 26 46 46  |d%=.(seed$)/(&FF|
00000e10  46 46 46 46 2f 6c 65 6e  25 29 0d 05 3c 08 d9 23  |FFFF/len%)..<..#|
00000e20  7a 25 0d 05 46 0a 3d 73  65 65 64 25 0d 05 50 04  |z%..F.=seed%..P.|
00000e30  0d 05 5a 13 dd a4 77 6f  72 64 28 6e 25 29 3a ea  |..Z...word(n%):.|
00000e40  20 74 25 0d 05 64 0a cf  23 78 25 3d 30 0d 05 6e  | t%..d..#x%=0..n|
00000e50  17 e7 20 6e 25 3e 61 64  72 25 20 8c 20 61 64 72  |.. n%>adr% . adr|
00000e60  25 3d 6e 25 0d 05 78 0b  cf 23 78 25 3d 6e 25 0d  |%=n%..x..#x%=n%.|
00000e70  05 82 1e f5 3a e7 20 c5  23 78 25 20 8c 20 cf 23  |....:. .#x% . .#|
00000e80  78 3d 8f 23 78 25 2d b3  28 31 30 30 29 0d 05 8c  |x=.#x%-.(100)...|
00000e90  13 63 25 3d 9a 23 78 25  3a fd 20 63 25 3d 26 41  |.c%=.#x%:. c%=&A|
00000ea0  0d 05 96 1b 77 6f 72 64  24 3d 22 22 3a 64 6f 6e  |....word$="":don|
00000eb0  65 25 3d 64 6f 6e 65 25  2b 31 3a 0d 05 a0 54 e7  |e%=done%+1:...T.|
00000ec0  20 91 2d 74 69 6d 65 72  25 3e 31 30 30 20 8c 20  | .-timer%>100 . |
00000ed0  f2 55 70 64 61 74 65 49  63 6f 6e 28 72 6e 64 70  |.UpdateIcon(rndp|
00000ee0  61 73 73 25 2c 31 36 2c  22 43 68 65 63 6b 65 64  |ass%,16,"Checked|
00000ef0  20 22 2b c3 28 64 6f 6e  65 25 29 2b 22 20 77 6f  | "+.(done%)+" wo|
00000f00  72 64 73 2e 22 29 3a 74  69 6d 65 72 25 3d 91 0d  |rds."):timer%=..|
00000f10  05 aa 5d e7 20 64 6f 6e  65 25 3d 73 74 6f 70 25  |..]. done%=stop%|
00000f20  20 8c 20 f2 55 70 64 61  74 65 49 63 6f 6e 28 72  | . .UpdateIcon(r|
00000f30  6e 64 70 61 73 73 25 2c  31 36 2c 22 53 65 61 72  |ndpass%,16,"Sear|
00000f40  63 68 20 61 62 6f 72 74  65 64 20 61 66 74 65 72  |ch aborted after|
00000f50  20 22 2b c3 28 73 74 6f  70 25 29 2b 22 20 77 6f  | "+.(stop%)+" wo|
00000f60  72 64 73 22 29 3a e5 20  8d 54 44 46 0d 05 b4 1d  |rds"):. .TDF....|
00000f70  e7 20 c5 23 78 25 20 8c  20 cf 23 78 25 3d 8f 23  |. .#x% . .#x%=.#|
00000f80  78 25 2d b3 28 31 30 30  29 0d 05 be 0b 63 25 3d  |x%-.(100)....c%=|
00000f90  9a 23 78 25 0d 05 c8 12  e7 20 63 25 3d 26 44 20  |.#x%..... c%=&D |
00000fa0  8c 20 8d 74 74 45 0d 05  d2 12 e7 20 63 25 3d 26  |. .ttE..... c%=&|
00000fb0  41 20 8c 20 8d 64 70 45  0d 05 dc 15 77 6f 72 64  |A . .dpE....word|
00000fc0  24 3d 77 6f 72 64 24 2b  bd 28 63 25 29 0d 05 e6  |$=word$+.(c%)...|
00000fd0  0a e5 20 8d 74 74 45 0d  05 f0 10 6c 6f 25 3d a9  |.. .ttE....lo%=.|
00000fe0  28 77 6f 72 64 24 29 0d  05 fa 22 e7 20 6c 6f 25  |(word$)...". lo%|
00000ff0  3c 6d 69 6e 25 20 84 20  6c 6f 25 3e 6d 61 78 25  |<min% . lo%>max%|
00001000  20 8c 20 e5 20 8d 74 56  45 0d 06 04 0a 3d 77 6f  | . . .tVE....=wo|
00001010  72 64 24 0d 06 0e 04 0d  06 18 28 dd f2 61 64 64  |rd$.......(..add|
00001020  5f 73 70 65 63 69 61 6c  3a 73 70 65 63 69 61 6c  |_special:special|
00001030  24 3d 22 22 3a 73 6d 69  6c 65 79 24 3d 22 22 0d  |$="":smiley$="".|
00001040  06 22 19 74 25 3d 28 73  70 25 2b 63 61 70 73 25  |.".t%=(sp%+caps%|
00001050  2b 73 6d 69 6c 65 25 29  0d 06 2c 16 e7 20 74 25  |+smile%)..,.. t%|
00001060  3d 30 20 8c 20 70 65 72  25 3d 30 20 3a e1 0d 06  |=0 . per%=0 :...|
00001070  36 23 70 65 72 25 3d 70  65 72 25 2f 31 30 30 2f  |6#per%=per%/100/|
00001080  74 25 2a a9 28 50 61 73  73 50 68 72 61 73 65 24  |t%*.(PassPhrase$|
00001090  29 0d 06 40 27 f4 20 66  69 72 73 74 20 27 63 6f  |)..@'. first 'co|
000010a0  6c 6c 65 63 74 27 20 74  68 65 20 73 70 65 63 69  |llect' the speci|
000010b0  61 6c 20 63 68 61 72 73  0d 06 4a 12 e7 20 73 70  |al chars..J.. sp|
000010c0  25 3d 30 20 8c 20 8d 74  50 46 0d 06 54 11 e3 20  |%=0 . .tPF..T.. |
000010d0  74 25 3d 31 20 b8 20 70  65 72 25 0d 06 5e 3f 73  |t%=1 . per%..^?s|
000010e0  70 65 63 69 61 6c 24 3d  22 21 24 25 5e 26 2a 28  |pecial$="!$%^&*(|
000010f0  29 5f 2b 3d 3b 3a 40 27  7e 23 7c 5c 3c 3e 2d 31  |)_+=;:@'~#|\<>-1|
00001100  32 33 34 35 36 37 38 39  30 22 3a f4 20 73 70 65  |234567890":. spe|
00001110  63 69 61 6c 20 63 68 61  72 73 0d 06 68 33 73 70  |cial chars..h3sp|
00001120  65 63 69 61 6c 24 3d c1  73 70 65 63 69 61 6c 24  |ecial$=.special$|
00001130  2c b3 28 a9 28 73 70 65  63 69 61 6c 24 29 29 2c  |,.(.(special$)),|
00001140  31 29 3a f4 20 70 69 63  6b 20 6f 6e 65 0d 06 72  |1):. pick one..r|
00001150  1a 6e 25 3d b3 28 a9 28  50 61 73 73 50 68 72 61  |.n%=.(.(PassPhra|
00001160  73 65 24 29 2d 31 29 0d  06 7c 4b 50 61 73 73 50  |se$)-1)..|KPassP|
00001170  68 72 61 73 65 24 3d c0  50 61 73 73 50 68 72 61  |hrase$=.PassPhra|
00001180  73 65 24 2c 6e 25 2d 31  29 2b 73 70 65 63 69 61  |se$,n%-1)+specia|
00001190  6c 24 2b c2 50 61 73 73  50 68 72 61 73 65 24 2c  |l$+.PassPhrase$,|
000011a0  a9 28 50 61 73 73 50 68  72 61 73 65 24 29 2d 6e  |.(PassPhrase$)-n|
000011b0  25 29 0d 06 86 08 ed 20  74 25 0d 06 90 15 e7 20  |%)..... t%..... |
000011c0  73 6d 69 6c 65 25 3d 30  20 8c 20 8d 54 7a 47 0d  |smile%=0 . .TzG.|
000011d0  06 9a 11 e3 20 6e 25 3d  31 20 b8 20 70 65 72 25  |.... n%=1 . per%|
000011e0  0d 06 a4 0a f7 20 8d 74  54 47 0d 06 ae 42 e3 20  |..... .tTG...B. |
000011f0  74 25 3d 31 20 b8 20 b3  28 31 39 29 3a f3 20 73  |t%=1 . .(19):. s|
00001200  6d 69 6c 65 79 24 3a ed  20 74 25 3a f4 20 67 65  |miley$:. t%:. ge|
00001210  74 20 61 20 73 6d 69 6c  65 79 20 6f 72 20 73 6f  |t a smiley or so|
00001220  6d 65 74 68 69 6e 67 20  65 6c 73 65 0d 06 b8 13  |mething else....|
00001230  f4 20 69 6e 73 65 72 74  20 73 6d 69 6c 65 79 0d  |. insert smiley.|
00001240  06 c2 12 70 6f 73 25 3d  b3 28 77 6f 72 64 73 25  |...pos%=.(words%|
00001250  29 0d 06 cc 3a e7 20 70  6f 73 25 3c 32 20 20 20  |)...:. pos%<2   |
00001260  20 20 20 8c 20 50 61 73  73 50 68 72 61 73 65 24  |   . PassPhrase$|
00001270  3d 73 6d 69 6c 65 79 24  2b 50 61 73 73 50 68 72  |=smiley$+PassPhr|
00001280  61 73 65 24 3a e5 20 8d  54 52 47 0d 06 d6 3a e7  |ase$:. .TRG...:.|
00001290  20 70 6f 73 25 3d 77 6f  72 64 73 25 20 8c 20 50  | pos%=words% . P|
000012a0  61 73 73 50 68 72 61 73  65 24 3d 50 61 73 73 50  |assPhrase$=PassP|
000012b0  68 72 61 73 65 24 2b 73  6d 69 6c 65 79 24 3a e5  |hrase$+smiley$:.|
000012c0  20 8d 54 52 47 0d 06 e0  0d 74 25 3d 30 3a 6e 25  | .TRG....t%=0:n%|
000012d0  3d 30 0d 06 ea 0b 74 25  3d 74 25 2b 31 0d 06 f4  |=0....t%=t%+1...|
000012e0  26 e7 20 c1 50 61 73 73  50 68 72 61 73 65 24 2c  |&. .PassPhrase$,|
000012f0  74 25 2c 31 29 3d 22 20  22 20 8c 20 6e 25 3d 6e  |t%,1)=" " . n%=n|
00001300  25 2b 31 0d 06 fe 15 e7  20 6e 25 3c 3e 70 6f 73  |%+1..... n%<>pos|
00001310  25 20 8c 20 8d 64 6a 46  0d 07 08 4e 50 61 73 73  |% . .djF...NPass|
00001320  50 68 72 61 73 65 24 3d  c0 50 61 73 73 50 68 72  |Phrase$=.PassPhr|
00001330  61 73 65 24 2c 74 25 29  2b 73 6d 69 6c 65 79 24  |ase$,t%)+smiley$|
00001340  2b 22 20 22 2b c2 50 61  73 73 50 68 72 61 73 65  |+" "+.PassPhrase|
00001350  24 2c a9 28 50 61 73 73  50 68 72 61 73 65 24 29  |$,.(PassPhrase$)|
00001360  2d 74 25 2d 31 29 0d 07  12 13 77 6f 72 64 73 25  |-t%-1)....words%|
00001370  3d 77 6f 72 64 73 25 2b  31 0d 07 1c 08 ed 20 6e  |=words%+1..... n|
00001380  25 0d 07 26 04 0d 07 30  14 f4 20 6d 61 6b 65 20  |%..&...0.. make |
00001390  75 70 70 65 72 63 61 73  65 0d 07 3a 14 e7 20 63  |uppercase..:.. c|
000013a0  61 70 73 25 3d 30 20 8c  20 8d 74 4a 47 0d 07 44  |aps%=0 . .tJG..D|
000013b0  11 e3 20 74 25 3d 31 20  b8 20 70 65 72 25 0d 07  |.. t%=1 . per%..|
000013c0  4e 1a 6e 25 3d b3 28 a9  28 50 61 73 73 50 68 72  |N.n%=.(.(PassPhr|
000013d0  61 73 65 24 29 2d 31 29  0d 07 58 1f 63 25 3d 97  |ase$)-1)..X.c%=.|
000013e0  28 c1 50 61 73 73 50 68  72 61 73 65 24 2c 6e 25  |(.PassPhrase$,n%|
000013f0  2c 31 29 29 2d 33 32 0d  07 62 1e e7 20 63 25 3c  |,1))-32..b.. c%<|
00001400  36 35 20 84 20 63 25 3e  39 30 20 8c 20 63 25 3d  |65 . c%>90 . c%=|
00001410  63 25 2b 33 32 0d 07 6c  0c 61 24 3d bd 28 63 25  |c%+32..l.a$=.(c%|
00001420  29 0d 07 76 45 50 61 73  73 50 68 72 61 73 65 24  |)..vEPassPhrase$|
00001430  3d c0 50 61 73 73 50 68  72 61 73 65 24 2c 6e 25  |=.PassPhrase$,n%|
00001440  2d 31 29 2b 61 24 2b c2  50 61 73 73 50 68 72 61  |-1)+a$+.PassPhra|
00001450  73 65 24 2c a9 28 50 61  73 73 50 68 72 61 73 65  |se$,.(PassPhrase|
00001460  24 29 2d 6e 25 29 0d 07  80 08 ed 20 74 25 0d 07  |$)-n%)..... t%..|
00001470  8a 05 e1 0d 07 94 78 dc  20 22 3a 2d 29 22 2c 22  |......x. ":-)","|
00001480  3a 2d 28 22 2c 22 3a 2d  3e 22 2c 22 3a 2d 3c 22  |:-(",":->",":-<"|
00001490  2c 22 3a 2d 7c 22 2c 22  3b 2d 29 22 2c 22 3b 2d  |,":-|",";-)",";-|
000014a0  28 22 2c 22 3b 2d 3e 22  2c 22 3b 2d 3c 22 2c 22  |(",";->",";-<","|
000014b0  3b 2d 7c 22 2c 22 3a 29  22 2c 22 3a 28 22 2c 22  |;-|",":)",":(","|
000014c0  3a 3e 22 2c 22 3a 3c 22  2c 22 3c 2d 2d 3e 22 2c  |:>",":<","<-->",|
000014d0  22 2e 2e 2e 22 2c 22 20  45 3d 4d 43 5e 32 22 2c  |"..."," E=MC^2",|
000014e0  22 31 32 33 22 2c 22 33  32 31 22 0d ff           |"123","321"..|
000014ed