� MICRO FRENCH (IRVERB)
, � COPYRIGHT (C) GENEVIEVE GREVILLE 1986
� CRACKED BY THE DAVE EC
� �"MENU1":�
 *KEY10"OLD|M RUN|M"
 �4
(9 � J$(50),K$(50),Q$(5),A$(5),W%(50),N%(5),V$(5),P$(8)
2 C0=0:C1=1:C2=1:C3=1
<1 �19,0,4,0,0,0:� VDU19,0,4,0,0,0,19,2,3,0,0,0
F, �23,224,&01,&02,&04,&08,&90,&A0,&C0,&80
G, �23,225,&3C,&42,&99,&A1,&A1,&99,&42,&3C
H �23,1,0;0;0;0;
Ph S$=�40," "):V$(0)="finir":V$(1)="dormir":V$(2)="courir":V$(3)="ouvrir":V$(4)="sortir":V$(5)="venir"
Rf P$(1)="je":P$(2)="tu":P$(3)="il":P$(4)="elle":P$(5)="nous":P$(6)="vous":P$(7)="ils":P$(8)="elles"
Z D$=�40,".")
d	 TS=0
n �C0+128
x
 �I=1�500
z+ �K$(I):�K$(I)="*" � DA=I-1:I=500:�tV@
| JE=I-(�((I-1)/8)*8)
�� J$(I)="("+V$(�((I-1)/8))+") "+P$(I-(�((I-1)/8)*8)):K$=�K$(I),1):� (K$="a" � K$="e" � K$="o") � I-(�((I-1)/8)*8)=1 � J$(I)=�J$(I),�(J$(I))-1)+"'"
�2 � �P$(JE),2)="il" � I=I+1:K$(I)=K$(I-1):�D|@
�	 �I  
�! TE=0:MK=0:TW=0:WN=0:�=0:DD=8
� �
� TE=TE+1
� � �dR@
� � �TDA
�a �C0:�C3+128:�0,3);S$;"Les verbes en ir(Micro French) ";�(225);"LCL 1986";S$:�C0+128:�C3:�:�
ܣ �"Most -ir verbs are like this:"':�:�"Finir - to finish":�:� "je fin";:� �T`C:�"is";:� �TjC:�"I finish"':�"tu fin";:� �T`C:�"is";:� �TjC:�"you (sing.) finish"
� �"il (elle) fin";:� �T`C:�"it";:� �TjC:�"he (she) finishes"':�"nous fin";:� �T`C:�"issons";:�TjC:�"we finish"':�"vous fin";:�T`C:�"issez";:�TjC:�"you (pl.) finish":�
�A �"ils (elles) fin";:�T`C:�"issent";:� �TjC:�"they finish":�
� �0,30);:�d^C:�tDC
� �

e �:�:�C0:�C3+128:�0,3);S$;"Les verbes en ir(Micro French) ";�(225);"LCL 1986";S$:�C0+128:�C3:�:�

# H$="Fill in the missing word."

"
 �:�H$

,	 NM=0

.	 TT=�

6 �I=0�4

@, � I<>0 � I<=WN � W=W%(I):W%(I)=0:� �DBA

A W=�(DD)

B N%(I)=W

J
 K=I+1

T � K=K-1

^ � (J$(W)=Q$(K)) � K=0 

h �J$(W)=Q$(K)��DAA

r Q$(I+1)=J$(W) 

| A$(I+1)=K$(W)  

~ �I<>0��tPA

�T �0,14);"0 ";Q$(1);".";:� C2:�A$(1);�35-�(Q$(1))-�(A$(1)),".");:�C1:�(224):�C3

� �txA 

� �I>4��tZA

�
 Y=14+I*3

� X=0

� �I<5��tdA

� Y=14+(I-5)*3

�	 X=20

� LD=36-�Q$(I+1)

�$ �X,Y);I;" ";Q$(I+1);�D$,LD);  

� �I

� DD=DA:WN=0

� �I=1�4

� WT=0:TE=TE+1:I$="":IA$=""

�8 �T`C:�I<5� � �0,14+I*3);I;:�(Q$(I+1))+3,14+I*3);

�< �I>4� � �20,14+(I-5)*3);I;:�(Q$(I+1))+23,14+(I-5)*3);

� �C0+128:�C3

� I1$=�(0):� I1$="?" � � �-(I>4)*20+�(Q$(I+1))+3,14+I*3+(I>4)*15);A$(I+1);�35-�(Q$(I+1))-�(A$(I+1)),".");" ";:� C2:WN=WN+1:W%(WN)=N%(I):� �DNB

�{ � WT=1 � I1$<>"" � LI=35-�(Q$(I+1)):LA=�(A$(I+1)):� C2:� �LI,".");" ";�LI+1,�(8));�(10);�LA," ");�LA,�(8));�(11);:WT=0

� �<(6000+TT)��d}A

�	 XP=�

�	 YP=�

� �C2

� �30,1);"TIME UP"

�	 � C2

� �XP,YP);

� �I1$<>""��TGB

�	 XP=�

�	 YP=�
; �0,1);�(TE)+")   Score "+�(MK)+"   "+�(�(�/100))+" s"

 �XP,YP);

 �djA
: � I1$=�(13) � �(Q$(I+1))+�(I$)>33 � I1$=�(127) ��TRB
 XP=�+1:YP=�


 �I1$;
; �0,1);�(TE)+")   Score "+�(MK)+"   "+�(�(�/100))+" s"
 �XP,YP);

] II$=�A$(I+1),�(I$)+1,1):� II$=I1$ � �(�(II$)+&60)=I1$ � I$=I$+II$  � I$=I$+�(�(I1$)�&20)
 � �djA
! � I1$<>�(127) � I$="" ��T\B
 I$=�I$,�(I$)-1)

 �(127);
 � �djA
 �C1
& �I$<>A$(I+1) ��TpB
( �" ";�(224)
* �1,-15,101,10
,
 TS=TS+1 
0 �I$=A$(I+1) ��TzB
2
 �" X"
4�1,-15,73,10
6 �1,-15,69,5
7! TW=TW+1:WN=WN+1:W%(WN)=N%(I)
87 �3-(I>4)*20+�(Q$(I+1)),15+(I+(I>4)*5)*3);A$(I+1) 
9 WT=1:I$="":� C2:� �dLA
:	 � C2
D MK=�(100*TS/(TS+TW))
N �I
X5 �0,29);"Pressez C pour continuer,H pour aider";
b	 R$=�
d2 �R$<>"C"�R$<>"c" � R$<>"H" � R$<>"h" � � �DbB
f/ � R$="C" � R$="c" � � �TDA � �:�dR@:�TDA
  � C1+128:� C0:�
* � C0+128:� C3:�22,�);:�
4 � C0+128:� C3:�
6% �C0:�C1+128::�P$;:�C3:� C0+128:�
�� �:�0,3);"Irregular ir verbs are :":�:�T`C:�"   Dormir (to sleep),courir (to run)    ":�TtC:�"je dors,tu dors,il dort,nous dormons,   vous dormez,ils dorment.":�"Cours,cours,court,courons,courez,courent"
�� �T`C:�" Sortir (to bring out),partir(to leave) ":�TtC:�"Sors,sors,sort,sortons,sortez,sortent.  Pars,pars,part,partons,partez,partent.":�:�T`C:�"    Venir (to come),tenir (to hold)     ":�TtC
�� �"Viens,viens,vient,venons,venez,viennent.Tiens,tiens,tient,tenons,tenez,tiennent.":�T`C:�"   Ouvrir (to open),offrir (to offer)   ":�TtC:�"Ouvre,ouvres,ouvre,ouvrons,ouvrez,      ouvrent."
�8 �"Offre,offres,offre,offrons,offrez,      offrent."
� � �0,30);:�d^C
� �
�/ �"Pressez 'Return' pour continuer";:�RB$:�
T� � finis,finis,finit,finissons,finissez,finissent,dors,dors,dort,dormons,dormez,dorment,cours,cours,court,courons,courez,courent,ouvre,ouvres,ouvre,ouvrons,ouvrez,ouvrent,sors,sors,sort,sortons,sortez,sortent,viens,viens,vient
^ � venons,venez,viennent
� � *
�

00000000  0d 00 0a 1c 20 f4 20 4d  49 43 52 4f 20 46 52 45  |.... . MICRO FRE|
00000010  4e 43 48 20 28 49 52 56  45 52 42 29 0d 00 14 2c  |NCH (IRVERB)...,|
00000020  20 f4 20 43 4f 50 59 52  49 47 48 54 20 28 43 29  | . COPYRIGHT (C)|
00000030  20 47 45 4e 45 56 49 45  56 45 20 47 52 45 56 49  | GENEVIEVE GREVI|
00000040  4c 4c 45 20 31 39 38 36  0d 00 15 1c f4 20 43 52  |LLE 1986..... CR|
00000050  41 43 4b 45 44 20 42 59  20 54 48 45 20 44 41 56  |ACKED BY THE DAV|
00000060  45 20 45 43 0d 00 16 11  ee 85 20 d7 22 4d 45 4e  |E EC...... ."MEN|
00000070  55 31 22 3a f9 0d 00 18  18 20 2a 4b 45 59 31 30  |U1":..... *KEY10|
00000080  22 4f 4c 44 7c 4d 20 52  55 4e 7c 4d 22 0d 00 1e  |"OLD|M RUN|M"...|
00000090  07 20 eb 34 0d 00 28 39  20 de 20 4a 24 28 35 30  |. .4..(9 . J$(50|
000000a0  29 2c 4b 24 28 35 30 29  2c 51 24 28 35 29 2c 41  |),K$(50),Q$(5),A|
000000b0  24 28 35 29 2c 57 25 28  35 30 29 2c 4e 25 28 35  |$(5),W%(50),N%(5|
000000c0  29 2c 56 24 28 35 29 2c  50 24 28 38 29 0d 00 32  |),V$(5),P$(8)..2|
000000d0  18 20 43 30 3d 30 3a 43  31 3d 31 3a 43 32 3d 31  |. C0=0:C1=1:C2=1|
000000e0  3a 43 33 3d 31 0d 00 3c  31 20 ef 31 39 2c 30 2c  |:C3=1..<1 .19,0,|
000000f0  34 2c 30 2c 30 2c 30 3a  f4 20 56 44 55 31 39 2c  |4,0,0,0:. VDU19,|
00000100  30 2c 34 2c 30 2c 30 2c  30 2c 31 39 2c 32 2c 33  |0,4,0,0,0,19,2,3|
00000110  2c 30 2c 30 2c 30 0d 00  46 2c 20 ef 32 33 2c 32  |,0,0,0..F, .23,2|
00000120  32 34 2c 26 30 31 2c 26  30 32 2c 26 30 34 2c 26  |24,&01,&02,&04,&|
00000130  30 38 2c 26 39 30 2c 26  41 30 2c 26 43 30 2c 26  |08,&90,&A0,&C0,&|
00000140  38 30 0d 00 47 2c 20 ef  32 33 2c 32 32 35 2c 26  |80..G, .23,225,&|
00000150  33 43 2c 26 34 32 2c 26  39 39 2c 26 41 31 2c 26  |3C,&42,&99,&A1,&|
00000160  41 31 2c 26 39 39 2c 26  34 32 2c 26 33 43 0d 00  |A1,&99,&42,&3C..|
00000170  48 13 20 ef 32 33 2c 31  2c 30 3b 30 3b 30 3b 30  |H. .23,1,0;0;0;0|
00000180  3b 0d 00 50 68 20 53 24  3d c4 34 30 2c 22 20 22  |;..Ph S$=.40," "|
00000190  29 3a 56 24 28 30 29 3d  22 66 69 6e 69 72 22 3a  |):V$(0)="finir":|
000001a0  56 24 28 31 29 3d 22 64  6f 72 6d 69 72 22 3a 56  |V$(1)="dormir":V|
000001b0  24 28 32 29 3d 22 63 6f  75 72 69 72 22 3a 56 24  |$(2)="courir":V$|
000001c0  28 33 29 3d 22 6f 75 76  72 69 72 22 3a 56 24 28  |(3)="ouvrir":V$(|
000001d0  34 29 3d 22 73 6f 72 74  69 72 22 3a 56 24 28 35  |4)="sortir":V$(5|
000001e0  29 3d 22 76 65 6e 69 72  22 0d 00 52 66 20 50 24  |)="venir"..Rf P$|
000001f0  28 31 29 3d 22 6a 65 22  3a 50 24 28 32 29 3d 22  |(1)="je":P$(2)="|
00000200  74 75 22 3a 50 24 28 33  29 3d 22 69 6c 22 3a 50  |tu":P$(3)="il":P|
00000210  24 28 34 29 3d 22 65 6c  6c 65 22 3a 50 24 28 35  |$(4)="elle":P$(5|
00000220  29 3d 22 6e 6f 75 73 22  3a 50 24 28 36 29 3d 22  |)="nous":P$(6)="|
00000230  76 6f 75 73 22 3a 50 24  28 37 29 3d 22 69 6c 73  |vous":P$(7)="ils|
00000240  22 3a 50 24 28 38 29 3d  22 65 6c 6c 65 73 22 0d  |":P$(8)="elles".|
00000250  00 5a 10 20 44 24 3d c4  34 30 2c 22 2e 22 29 0d  |.Z. D$=.40,".").|
00000260  00 64 09 20 54 53 3d 30  0d 00 6e 0c 20 fb 43 30  |.d. TS=0..n. .C0|
00000270  2b 31 32 38 0d 00 78 0d  20 e3 49 3d 31 b8 35 30  |+128..x. .I=1.50|
00000280  30 0d 00 7a 2b 20 f3 4b  24 28 49 29 3a e7 4b 24  |0..z+ .K$(I):.K$|
00000290  28 49 29 3d 22 2a 22 20  8c 20 44 41 3d 49 2d 31  |(I)="*" . DA=I-1|
000002a0  3a 49 3d 35 30 30 3a e5  8d 74 56 40 0d 00 7c 18  |:I=500:..tV@..|.|
000002b0  20 4a 45 3d 49 2d 28 a8  28 28 49 2d 31 29 2f 38  | JE=I-(.((I-1)/8|
000002c0  29 2a 38 29 0d 00 82 95  20 4a 24 28 49 29 3d 22  |)*8).... J$(I)="|
000002d0  28 22 2b 56 24 28 a8 28  28 49 2d 31 29 2f 38 29  |("+V$(.((I-1)/8)|
000002e0  29 2b 22 29 20 22 2b 50  24 28 49 2d 28 a8 28 28  |)+") "+P$(I-(.((|
000002f0  49 2d 31 29 2f 38 29 2a  38 29 29 3a 4b 24 3d c0  |I-1)/8)*8)):K$=.|
00000300  4b 24 28 49 29 2c 31 29  3a e7 20 28 4b 24 3d 22  |K$(I),1):. (K$="|
00000310  61 22 20 84 20 4b 24 3d  22 65 22 20 84 20 4b 24  |a" . K$="e" . K$|
00000320  3d 22 6f 22 29 20 80 20  49 2d 28 a8 28 28 49 2d  |="o") . I-(.((I-|
00000330  31 29 2f 38 29 2a 38 29  3d 31 20 8c 20 4a 24 28  |1)/8)*8)=1 . J$(|
00000340  49 29 3d c0 4a 24 28 49  29 2c a9 28 4a 24 28 49  |I)=.J$(I),.(J$(I|
00000350  29 29 2d 31 29 2b 22 27  22 0d 00 8c 32 20 e7 20  |))-1)+"'"...2 . |
00000360  c0 50 24 28 4a 45 29 2c  32 29 3d 22 69 6c 22 20  |.P$(JE),2)="il" |
00000370  8c 20 49 3d 49 2b 31 3a  4b 24 28 49 29 3d 4b 24  |. I=I+1:K$(I)=K$|
00000380  28 49 2d 31 29 3a e5 8d  44 7c 40 0d 00 96 09 20  |(I-1):..D|@.... |
00000390  ed 49 20 20 0d 00 a0 21  20 54 45 3d 30 3a 4d 4b  |.I  ...! TE=0:MK|
000003a0  3d 30 3a 54 57 3d 30 3a  57 4e 3d 30 3a d1 3d 30  |=0:TW=0:WN=0:.=0|
000003b0  3a 44 44 3d 38 0d 00 be  06 20 db 0d 00 c8 0c 20  |:DD=8.... ..... |
000003c0  54 45 3d 54 45 2b 31 0d  00 ca 0b 20 e4 20 8d 64  |TE=TE+1.... . .d|
000003d0  52 40 0d 00 cc 0b 20 e5  20 8d 54 44 41 0d 00 d2  |R@.... . .TDA...|
000003e0  61 20 fb 43 30 3a fb 43  33 2b 31 32 38 3a f1 8a  |a .C0:.C3+128:..|
000003f0  30 2c 33 29 3b 53 24 3b  22 4c 65 73 20 76 65 72  |0,3);S$;"Les ver|
00000400  62 65 73 20 65 6e 20 69  72 28 4d 69 63 72 6f 20  |bes en ir(Micro |
00000410  46 72 65 6e 63 68 29 20  22 3b bd 28 32 32 35 29  |French) ";.(225)|
00000420  3b 22 4c 43 4c 20 31 39  38 36 22 3b 53 24 3a fb  |;"LCL 1986";S$:.|
00000430  43 30 2b 31 32 38 3a fb  43 33 3a f1 3a f1 0d 00  |C0+128:.C3:.:...|
00000440  dc a3 20 f1 22 4d 6f 73  74 20 2d 69 72 20 76 65  |.. ."Most -ir ve|
00000450  72 62 73 20 61 72 65 20  6c 69 6b 65 20 74 68 69  |rbs are like thi|
00000460  73 3a 22 27 3a f1 3a f1  22 46 69 6e 69 72 20 2d  |s:"':.:."Finir -|
00000470  20 74 6f 20 66 69 6e 69  73 68 22 3a f1 3a f1 20  | to finish":.:. |
00000480  22 6a 65 20 66 69 6e 22  3b 3a e4 20 8d 54 60 43  |"je fin";:. .T`C|
00000490  3a f1 22 69 73 22 3b 3a  e4 20 8d 54 6a 43 3a f1  |:."is";:. .TjC:.|
000004a0  22 49 20 66 69 6e 69 73  68 22 27 3a f1 22 74 75  |"I finish"':."tu|
000004b0  20 66 69 6e 22 3b 3a e4  20 8d 54 60 43 3a f1 22  | fin";:. .T`C:."|
000004c0  69 73 22 3b 3a e4 20 8d  54 6a 43 3a f1 22 79 6f  |is";:. .TjC:."yo|
000004d0  75 20 28 73 69 6e 67 2e  29 20 66 69 6e 69 73 68  |u (sing.) finish|
000004e0  22 0d 00 e6 ad 20 f1 22  69 6c 20 28 65 6c 6c 65  |".... ."il (elle|
000004f0  29 20 66 69 6e 22 3b 3a  e4 20 8d 54 60 43 3a f1  |) fin";:. .T`C:.|
00000500  22 69 74 22 3b 3a e4 20  8d 54 6a 43 3a f1 22 68  |"it";:. .TjC:."h|
00000510  65 20 28 73 68 65 29 20  66 69 6e 69 73 68 65 73  |e (she) finishes|
00000520  22 27 3a f1 22 6e 6f 75  73 20 66 69 6e 22 3b 3a  |"':."nous fin";:|
00000530  e4 20 8d 54 60 43 3a f1  22 69 73 73 6f 6e 73 22  |. .T`C:."issons"|
00000540  3b 3a e4 8d 54 6a 43 3a  f1 22 77 65 20 66 69 6e  |;:..TjC:."we fin|
00000550  69 73 68 22 27 3a f1 22  76 6f 75 73 20 66 69 6e  |ish"':."vous fin|
00000560  22 3b 3a e4 8d 54 60 43  3a f1 22 69 73 73 65 7a  |";:..T`C:."issez|
00000570  22 3b 3a e4 8d 54 6a 43  3a f1 22 79 6f 75 20 28  |";:..TjC:."you (|
00000580  70 6c 2e 29 20 66 69 6e  69 73 68 22 3a f1 0d 00  |pl.) finish":...|
00000590  f0 41 20 f1 22 69 6c 73  20 28 65 6c 6c 65 73 29  |.A ."ils (elles)|
000005a0  20 66 69 6e 22 3b 3a e4  8d 54 60 43 3a f1 22 69  | fin";:..T`C:."i|
000005b0  73 73 65 6e 74 22 3b 3a  e4 20 8d 54 6a 43 3a f1  |ssent";:. .TjC:.|
000005c0  22 74 68 65 79 20 66 69  6e 69 73 68 22 3a f1 0d  |"they finish":..|
000005d0  00 fa 19 20 f1 8a 30 2c  33 30 29 3b 3a e4 8d 64  |... ..0,30);:..d|
000005e0  5e 43 3a e4 8d 74 44 43  0d 00 fc 06 20 f8 0d 01  |^C:..tDC.... ...|
000005f0  04 65 20 db 3a f1 3a fb  43 30 3a fb 43 33 2b 31  |.e .:.:.C0:.C3+1|
00000600  32 38 3a f1 8a 30 2c 33  29 3b 53 24 3b 22 4c 65  |28:..0,3);S$;"Le|
00000610  73 20 76 65 72 62 65 73  20 65 6e 20 69 72 28 4d  |s verbes en ir(M|
00000620  69 63 72 6f 20 46 72 65  6e 63 68 29 20 22 3b bd  |icro French) ";.|
00000630  28 32 32 35 29 3b 22 4c  43 4c 20 31 39 38 36 22  |(225);"LCL 1986"|
00000640  3b 53 24 3a fb 43 30 2b  31 32 38 3a fb 43 33 3a  |;S$:.C0+128:.C3:|
00000650  f1 3a f1 0d 01 0e 23 20  48 24 3d 22 46 69 6c 6c  |.:....# H$="Fill|
00000660  20 69 6e 20 74 68 65 20  6d 69 73 73 69 6e 67 20  | in the missing |
00000670  77 6f 72 64 2e 22 0d 01  22 0a 20 f1 3a f1 48 24  |word."..". .:.H$|
00000680  0d 01 2c 09 20 4e 4d 3d  30 0d 01 2e 09 20 54 54  |..,. NM=0.... TT|
00000690  3d 91 0d 01 36 0b 20 e3  49 3d 30 b8 34 0d 01 40  |=...6. .I=0.4..@|
000006a0  2c 20 e7 20 49 3c 3e 30  20 80 20 49 3c 3d 57 4e  |, . I<>0 . I<=WN|
000006b0  20 8c 20 57 3d 57 25 28  49 29 3a 57 25 28 49 29  | . W=W%(I):W%(I)|
000006c0  3d 30 3a e5 20 8d 44 42  41 0d 01 41 0c 20 57 3d  |=0:. .DBA..A. W=|
000006d0  b3 28 44 44 29 0d 01 42  0c 20 4e 25 28 49 29 3d  |.(DD)..B. N%(I)=|
000006e0  57 0d 01 4a 0a 20 4b 3d  49 2b 31 0d 01 54 0c 20  |W..J. K=I+1..T. |
000006f0  f5 20 4b 3d 4b 2d 31 0d  01 5e 1b 20 fd 20 28 4a  |. K=K-1..^. . (J|
00000700  24 28 57 29 3d 51 24 28  4b 29 29 20 84 20 4b 3d  |$(W)=Q$(K)) . K=|
00000710  30 20 0d 01 68 17 20 e7  4a 24 28 57 29 3d 51 24  |0 ..h. .J$(W)=Q$|
00000720  28 4b 29 8c e5 8d 44 41  41 0d 01 72 13 20 51 24  |(K)...DAA..r. Q$|
00000730  28 49 2b 31 29 3d 4a 24  28 57 29 20 0d 01 7c 14  |(I+1)=J$(W) ..|.|
00000740  20 41 24 28 49 2b 31 29  3d 4b 24 28 57 29 20 20  | A$(I+1)=K$(W)  |
00000750  0d 01 7e 10 20 e7 49 3c  3e 30 8c e5 8d 74 50 41  |..~. .I<>0...tPA|
00000760  0d 01 80 54 20 f1 8a 30  2c 31 34 29 3b 22 30 20  |...T ..0,14);"0 |
00000770  22 3b 51 24 28 31 29 3b  22 2e 22 3b 3a fb 20 43  |";Q$(1);".";:. C|
00000780  32 3a f1 41 24 28 31 29  3b c4 33 35 2d a9 28 51  |2:.A$(1);.35-.(Q|
00000790  24 28 31 29 29 2d a9 28  41 24 28 31 29 29 2c 22  |$(1))-.(A$(1)),"|
000007a0  2e 22 29 3b 3a fb 43 31  3a f1 bd 28 32 32 34 29  |.");:.C1:..(224)|
000007b0  3a fb 43 33 0d 01 82 0b  20 e5 8d 74 78 41 20 0d  |:.C3.... ..txA .|
000007c0  01 90 0f 20 e7 49 3e 34  8c e5 8d 74 5a 41 0d 01  |... .I>4...tZA..|
000007d0  92 0d 20 59 3d 31 34 2b  49 2a 33 0d 01 94 08 20  |.. Y=14+I*3.... |
000007e0  58 3d 30 0d 01 9a 0f 20  e7 49 3c 35 8c e5 8d 74  |X=0.... .I<5...t|
000007f0  64 41 0d 01 9c 11 20 59  3d 31 34 2b 28 49 2d 35  |dA.... Y=14+(I-5|
00000800  29 2a 33 0d 01 9e 09 20  58 3d 32 30 0d 01 a4 13  |)*3.... X=20....|
00000810  20 4c 44 3d 33 36 2d a9  51 24 28 49 2b 31 29 0d  | LD=36-.Q$(I+1).|
00000820  01 ae 24 20 f1 8a 58 2c  59 29 3b 49 3b 22 20 22  |..$ ..X,Y);I;" "|
00000830  3b 51 24 28 49 2b 31 29  3b c0 44 24 2c 4c 44 29  |;Q$(I+1);.D$,LD)|
00000840  3b 20 20 0d 01 b8 07 20  ed 49 0d 01 ba 0f 20 44  |;  .... .I.... D|
00000850  44 3d 44 41 3a 57 4e 3d  30 0d 01 c2 0b 20 e3 49  |D=DA:WN=0.... .I|
00000860  3d 31 b8 34 0d 01 c4 1e  20 57 54 3d 30 3a 54 45  |=1.4.... WT=0:TE|
00000870  3d 54 45 2b 31 3a 49 24  3d 22 22 3a 49 41 24 3d  |=TE+1:I$="":IA$=|
00000880  22 22 0d 01 cc 38 20 e4  8d 54 60 43 3a e7 49 3c  |""...8 ..T`C:.I<|
00000890  35 8c 20 f1 20 8a 30 2c  31 34 2b 49 2a 33 29 3b  |5. . .0,14+I*3);|
000008a0  49 3b 3a f1 8a a9 28 51  24 28 49 2b 31 29 29 2b  |I;:...(Q$(I+1))+|
000008b0  33 2c 31 34 2b 49 2a 33  29 3b 0d 01 d6 3c 20 e7  |3,14+I*3);...< .|
000008c0  49 3e 34 8c 20 f1 20 8a  32 30 2c 31 34 2b 28 49  |I>4. . .20,14+(I|
000008d0  2d 35 29 2a 33 29 3b 49  3b 3a f1 8a a9 28 51 24  |-5)*3);I;:...(Q$|
000008e0  28 49 2b 31 29 29 2b 32  33 2c 31 34 2b 28 49 2d  |(I+1))+23,14+(I-|
000008f0  35 29 2a 33 29 3b 0d 01  e0 10 20 fb 43 30 2b 31  |5)*3);.... .C0+1|
00000900  32 38 3a fb 43 33 0d 01  ea 91 20 49 31 24 3d bf  |28:.C3.... I1$=.|
00000910  28 30 29 3a e7 20 49 31  24 3d 22 3f 22 20 8c 20  |(0):. I1$="?" . |
00000920  f1 20 8a 2d 28 49 3e 34  29 2a 32 30 2b a9 28 51  |. .-(I>4)*20+.(Q|
00000930  24 28 49 2b 31 29 29 2b  33 2c 31 34 2b 49 2a 33  |$(I+1))+3,14+I*3|
00000940  2b 28 49 3e 34 29 2a 31  35 29 3b 41 24 28 49 2b  |+(I>4)*15);A$(I+|
00000950  31 29 3b c4 33 35 2d a9  28 51 24 28 49 2b 31 29  |1);.35-.(Q$(I+1)|
00000960  29 2d a9 28 41 24 28 49  2b 31 29 29 2c 22 2e 22  |)-.(A$(I+1)),"."|
00000970  29 3b 22 20 22 3b 3a fb  20 43 32 3a 57 4e 3d 57  |);" ";:. C2:WN=W|
00000980  4e 2b 31 3a 57 25 28 57  4e 29 3d 4e 25 28 49 29  |N+1:W%(WN)=N%(I)|
00000990  3a e5 20 8d 44 4e 42 0d  01 eb 7b 20 e7 20 57 54  |:. .DNB...{ . WT|
000009a0  3d 31 20 80 20 49 31 24  3c 3e 22 22 20 8c 20 4c  |=1 . I1$<>"" . L|
000009b0  49 3d 33 35 2d a9 28 51  24 28 49 2b 31 29 29 3a  |I=35-.(Q$(I+1)):|
000009c0  4c 41 3d a9 28 41 24 28  49 2b 31 29 29 3a fb 20  |LA=.(A$(I+1)):. |
000009d0  43 32 3a f1 20 c4 4c 49  2c 22 2e 22 29 3b 22 20  |C2:. .LI,".");" |
000009e0  22 3b c4 4c 49 2b 31 2c  bd 28 38 29 29 3b bd 28  |";.LI+1,.(8));.(|
000009f0  31 30 29 3b c4 4c 41 2c  22 20 22 29 3b c4 4c 41  |10);.LA," ");.LA|
00000a00  2c bd 28 38 29 29 3b bd  28 31 31 29 3b 3a 57 54  |,.(8));.(11);:WT|
00000a10  3d 30 0d 01 ec 17 20 e7  91 3c 28 36 30 30 30 2b  |=0.... ..<(6000+|
00000a20  54 54 29 8c e5 8d 64 7d  41 0d 01 f4 09 20 58 50  |TT)...d}A.... XP|
00000a30  3d b1 0d 01 f6 09 20 59  50 3d bc 0d 01 f8 08 20  |=..... YP=..... |
00000a40  fb 43 32 0d 01 fa 16 20  f1 8a 33 30 2c 31 29 3b  |.C2.... ..30,1);|
00000a50  22 54 49 4d 45 20 55 50  22 0d 01 fb 09 20 fb 20  |"TIME UP".... . |
00000a60  43 32 0d 01 fc 0e 20 f1  8a 58 50 2c 59 50 29 3b  |C2.... ..XP,YP);|
00000a70  0d 01 fd 13 20 e7 49 31  24 3c 3e 22 22 8c e5 8d  |.... .I1$<>""...|
00000a80  54 47 42 0d 01 fe 09 20  58 50 3d b1 0d 01 ff 09  |TGB.... XP=.....|
00000a90  20 59 50 3d bc 0d 02 00  3b 20 f1 8a 30 2c 31 29  | YP=....; ..0,1)|
00000aa0  3b c3 28 54 45 29 2b 22  29 20 20 20 53 63 6f 72  |;.(TE)+")   Scor|
00000ab0  65 20 22 2b c3 28 4d 4b  29 2b 22 20 20 20 22 2b  |e "+.(MK)+"   "+|
00000ac0  c3 28 a8 28 91 2f 31 30  30 29 29 2b 22 20 73 22  |.(.(./100))+" s"|
00000ad0  0d 02 01 0e 20 f1 8a 58  50 2c 59 50 29 3b 0d 02  |.... ..XP,YP);..|
00000ae0  02 0a 20 e5 8d 64 6a 41  0d 02 07 3a 20 e7 20 49  |.. ..djA...: . I|
00000af0  31 24 3d bd 28 31 33 29  20 84 20 a9 28 51 24 28  |1$=.(13) . .(Q$(|
00000b00  49 2b 31 29 29 2b a9 28  49 24 29 3e 33 33 20 84  |I+1))+.(I$)>33 .|
00000b10  20 49 31 24 3d bd 28 31  32 37 29 20 8c e5 8d 54  | I1$=.(127) ...T|
00000b20  52 42 0d 02 08 10 20 58  50 3d b1 2b 31 3a 59 50  |RB.... XP=.+1:YP|
00000b30  3d bc 0d 02 0a 0a 20 f1  49 31 24 3b 0d 02 0b 3b  |=..... .I1$;...;|
00000b40  20 f1 8a 30 2c 31 29 3b  c3 28 54 45 29 2b 22 29  | ..0,1);.(TE)+")|
00000b50  20 20 20 53 63 6f 72 65  20 22 2b c3 28 4d 4b 29  |   Score "+.(MK)|
00000b60  2b 22 20 20 20 22 2b c3  28 a8 28 91 2f 31 30 30  |+"   "+.(.(./100|
00000b70  29 29 2b 22 20 73 22 0d  02 0c 0e 20 f1 8a 58 50  |))+" s".... ..XP|
00000b80  2c 59 50 29 3b 0d 02 0d  5d 20 49 49 24 3d c1 41  |,YP);...] II$=.A|
00000b90  24 28 49 2b 31 29 2c a9  28 49 24 29 2b 31 2c 31  |$(I+1),.(I$)+1,1|
00000ba0  29 3a e7 20 49 49 24 3d  49 31 24 20 84 20 bd 28  |):. II$=I1$ . .(|
00000bb0  97 28 49 49 24 29 2b 26  36 30 29 3d 49 31 24 20  |.(II$)+&60)=I1$ |
00000bc0  8c 20 49 24 3d 49 24 2b  49 49 24 20 20 8b 20 49  |. I$=I$+II$  . I|
00000bd0  24 3d 49 24 2b bd 28 97  28 49 31 24 29 84 26 32  |$=I$+.(.(I1$).&2|
00000be0  30 29 0d 02 0e 0b 20 e5  20 8d 64 6a 41 0d 02 12  |0).... . .djA...|
00000bf0  21 20 e7 20 49 31 24 3c  3e bd 28 31 32 37 29 20  |! . I1$<>.(127) |
00000c00  84 20 49 24 3d 22 22 20  8c e5 8d 54 5c 42 0d 02  |. I$="" ...T\B..|
00000c10  14 14 20 49 24 3d c0 49  24 2c a9 28 49 24 29 2d  |.. I$=.I$,.(I$)-|
00000c20  31 29 0d 02 16 0d 20 f1  bd 28 31 32 37 29 3b 0d  |1).... ..(127);.|
00000c30  02 18 0b 20 e5 20 8d 64  6a 41 0d 02 1c 08 20 fb  |... . .djA.... .|
00000c40  43 31 0d 02 26 18 20 e7  49 24 3c 3e 41 24 28 49  |C1..&. .I$<>A$(I|
00000c50  2b 31 29 20 8c e5 8d 54  70 42 0d 02 28 10 20 f1  |+1) ...TpB..(. .|
00000c60  22 20 22 3b bd 28 32 32  34 29 0d 02 2a 12 20 d4  |" ";.(224)..*. .|
00000c70  31 2c 2d 31 35 2c 31 30  31 2c 31 30 0d 02 2c 0d  |1,-15,101,10..,.|
00000c80  20 54 53 3d 54 53 2b 31  20 0d 02 30 17 20 e7 49  | TS=TS+1 ..0. .I|
00000c90  24 3d 41 24 28 49 2b 31  29 20 8c e5 8d 54 7a 42  |$=A$(I+1) ...TzB|
00000ca0  0d 02 32 0a 20 f1 22 20  58 22 0d 02 34 10 d4 31  |..2. ." X"..4..1|
00000cb0  2c 2d 31 35 2c 37 33 2c  31 30 0d 02 36 10 20 d4  |,-15,73,10..6. .|
00000cc0  31 2c 2d 31 35 2c 36 39  2c 35 0d 02 37 21 20 54  |1,-15,69,5..7! T|
00000cd0  57 3d 54 57 2b 31 3a 57  4e 3d 57 4e 2b 31 3a 57  |W=TW+1:WN=WN+1:W|
00000ce0  25 28 57 4e 29 3d 4e 25  28 49 29 0d 02 38 37 20  |%(WN)=N%(I)..87 |
00000cf0  f1 8a 33 2d 28 49 3e 34  29 2a 32 30 2b a9 28 51  |..3-(I>4)*20+.(Q|
00000d00  24 28 49 2b 31 29 29 2c  31 35 2b 28 49 2b 28 49  |$(I+1)),15+(I+(I|
00000d10  3e 34 29 2a 35 29 2a 33  29 3b 41 24 28 49 2b 31  |>4)*5)*3);A$(I+1|
00000d20  29 20 0d 02 39 1b 20 57  54 3d 31 3a 49 24 3d 22  |) ..9. WT=1:I$="|
00000d30  22 3a fb 20 43 32 3a e5  20 8d 64 4c 41 0d 02 3a  |":. C2:. .dLA..:|
00000d40  09 20 fb 20 43 32 0d 02  44 19 20 4d 4b 3d a8 28  |. . C2..D. MK=.(|
00000d50  31 30 30 2a 54 53 2f 28  54 53 2b 54 57 29 29 0d  |100*TS/(TS+TW)).|
00000d60  02 4e 07 20 ed 49 0d 02  58 35 20 f1 8a 30 2c 32  |.N. .I..X5 ..0,2|
00000d70  39 29 3b 22 50 72 65 73  73 65 7a 20 43 20 70 6f  |9);"Pressez C po|
00000d80  75 72 20 63 6f 6e 74 69  6e 75 65 72 2c 48 20 70  |ur continuer,H p|
00000d90  6f 75 72 20 61 69 64 65  72 22 3b 0d 02 62 09 20  |our aider";..b. |
00000da0  52 24 3d be 0d 02 64 32  20 e7 52 24 3c 3e 22 43  |R$=...d2 .R$<>"C|
00000db0  22 80 52 24 3c 3e 22 63  22 20 80 20 52 24 3c 3e  |".R$<>"c" . R$<>|
00000dc0  22 48 22 20 80 20 52 24  3c 3e 22 68 22 20 8c 20  |"H" . R$<>"h" . |
00000dd0  e5 20 8d 44 62 42 0d 02  66 2f 20 e7 20 52 24 3d  |. .DbB..f/ . R$=|
00000de0  22 43 22 20 84 20 52 24  3d 22 63 22 20 8c 20 e5  |"C" . R$="c" . .|
00000df0  20 8d 54 44 41 20 8b 20  db 3a e4 8d 64 52 40 3a  | .TDA . .:..dR@:|
00000e00  e5 8d 54 44 41 0d 03 20  14 20 fb 20 43 31 2b 31  |..TDA.. . . C1+1|
00000e10  32 38 3a fb 20 43 30 3a  f8 0d 03 2a 1d 20 fb 20  |28:. C0:...*. . |
00000e20  43 30 2b 31 32 38 3a fb  20 43 33 3a f1 8a 32 32  |C0+128:. C3:..22|
00000e30  2c bc 29 3b 3a f8 0d 03  34 14 20 fb 20 43 30 2b  |,.);:...4. . C0+|
00000e40  31 32 38 3a fb 20 43 33  3a f8 0d 03 36 25 20 fb  |128:. C3:...6% .|
00000e50  43 30 3a fb 43 31 2b 31  32 38 3a 3a f1 50 24 3b  |C0:.C1+128::.P$;|
00000e60  3a fb 43 33 3a fb 20 43  30 2b 31 32 38 3a f8 0d  |:.C3:. C0+128:..|
00000e70  03 84 d2 20 db 3a f1 8a  30 2c 33 29 3b 22 49 72  |... .:..0,3);"Ir|
00000e80  72 65 67 75 6c 61 72 20  69 72 20 76 65 72 62 73  |regular ir verbs|
00000e90  20 61 72 65 20 3a 22 3a  f1 3a e4 8d 54 60 43 3a  | are :":.:..T`C:|
00000ea0  f1 22 20 20 20 44 6f 72  6d 69 72 20 28 74 6f 20  |."   Dormir (to |
00000eb0  73 6c 65 65 70 29 2c 63  6f 75 72 69 72 20 28 74  |sleep),courir (t|
00000ec0  6f 20 72 75 6e 29 20 20  20 20 22 3a e4 8d 54 74  |o run)    ":..Tt|
00000ed0  43 3a f1 22 6a 65 20 64  6f 72 73 2c 74 75 20 64  |C:."je dors,tu d|
00000ee0  6f 72 73 2c 69 6c 20 64  6f 72 74 2c 6e 6f 75 73  |ors,il dort,nous|
00000ef0  20 64 6f 72 6d 6f 6e 73  2c 20 20 20 76 6f 75 73  | dormons,   vous|
00000f00  20 64 6f 72 6d 65 7a 2c  69 6c 73 20 64 6f 72 6d  | dormez,ils dorm|
00000f10  65 6e 74 2e 22 3a f1 22  43 6f 75 72 73 2c 63 6f  |ent.":."Cours,co|
00000f20  75 72 73 2c 63 6f 75 72  74 2c 63 6f 75 72 6f 6e  |urs,court,couron|
00000f30  73 2c 63 6f 75 72 65 7a  2c 63 6f 75 72 65 6e 74  |s,courez,courent|
00000f40  22 0d 03 8e c8 20 e4 8d  54 60 43 3a f1 22 20 53  |".... ..T`C:." S|
00000f50  6f 72 74 69 72 20 28 74  6f 20 62 72 69 6e 67 20  |ortir (to bring |
00000f60  6f 75 74 29 2c 70 61 72  74 69 72 28 74 6f 20 6c  |out),partir(to l|
00000f70  65 61 76 65 29 20 22 3a  e4 8d 54 74 43 3a f1 22  |eave) ":..TtC:."|
00000f80  53 6f 72 73 2c 73 6f 72  73 2c 73 6f 72 74 2c 73  |Sors,sors,sort,s|
00000f90  6f 72 74 6f 6e 73 2c 73  6f 72 74 65 7a 2c 73 6f  |ortons,sortez,so|
00000fa0  72 74 65 6e 74 2e 20 20  50 61 72 73 2c 70 61 72  |rtent.  Pars,par|
00000fb0  73 2c 70 61 72 74 2c 70  61 72 74 6f 6e 73 2c 70  |s,part,partons,p|
00000fc0  61 72 74 65 7a 2c 70 61  72 74 65 6e 74 2e 22 3a  |artez,partent.":|
00000fd0  f1 3a e4 8d 54 60 43 3a  f1 22 20 20 20 20 56 65  |.:..T`C:."    Ve|
00000fe0  6e 69 72 20 28 74 6f 20  63 6f 6d 65 29 2c 74 65  |nir (to come),te|
00000ff0  6e 69 72 20 28 74 6f 20  68 6f 6c 64 29 20 20 20  |nir (to hold)   |
00001000  20 20 22 3a e4 8d 54 74  43 0d 03 98 c4 20 f1 22  |  ":..TtC.... ."|
00001010  56 69 65 6e 73 2c 76 69  65 6e 73 2c 76 69 65 6e  |Viens,viens,vien|
00001020  74 2c 76 65 6e 6f 6e 73  2c 76 65 6e 65 7a 2c 76  |t,venons,venez,v|
00001030  69 65 6e 6e 65 6e 74 2e  54 69 65 6e 73 2c 74 69  |iennent.Tiens,ti|
00001040  65 6e 73 2c 74 69 65 6e  74 2c 74 65 6e 6f 6e 73  |ens,tient,tenons|
00001050  2c 74 65 6e 65 7a 2c 74  69 65 6e 6e 65 6e 74 2e  |,tenez,tiennent.|
00001060  22 3a e4 8d 54 60 43 3a  f1 22 20 20 20 4f 75 76  |":..T`C:."   Ouv|
00001070  72 69 72 20 28 74 6f 20  6f 70 65 6e 29 2c 6f 66  |rir (to open),of|
00001080  66 72 69 72 20 28 74 6f  20 6f 66 66 65 72 29 20  |frir (to offer) |
00001090  20 20 22 3a e4 8d 54 74  43 3a f1 22 4f 75 76 72  |  ":..TtC:."Ouvr|
000010a0  65 2c 6f 75 76 72 65 73  2c 6f 75 76 72 65 2c 6f  |e,ouvres,ouvre,o|
000010b0  75 76 72 6f 6e 73 2c 6f  75 76 72 65 7a 2c 20 20  |uvrons,ouvrez,  |
000010c0  20 20 20 20 6f 75 76 72  65 6e 74 2e 22 0d 03 a2  |    ouvrent."...|
000010d0  38 20 f1 22 4f 66 66 72  65 2c 6f 66 66 72 65 73  |8 ."Offre,offres|
000010e0  2c 6f 66 66 72 65 2c 6f  66 66 72 6f 6e 73 2c 6f  |,offre,offrons,o|
000010f0  66 66 72 65 7a 2c 20 20  20 20 20 20 6f 66 66 72  |ffrez,      offr|
00001100  65 6e 74 2e 22 0d 03 ca  14 20 f1 20 8a 30 2c 33  |ent.".... . .0,3|
00001110  30 29 3b 3a e4 8d 64 5e  43 0d 03 d4 06 20 f8 0d  |0);:..d^C.... ..|
00001120  03 de 2f 20 f1 22 50 72  65 73 73 65 7a 20 27 52  |../ ."Pressez 'R|
00001130  65 74 75 72 6e 27 20 70  6f 75 72 20 63 6f 6e 74  |eturn' pour cont|
00001140  69 6e 75 65 72 22 3b 3a  e8 52 42 24 3a f8 0d 06  |inuer";:.RB$:...|
00001150  54 e6 20 dc 20 66 69 6e  69 73 2c 66 69 6e 69 73  |T. . finis,finis|
00001160  2c 66 69 6e 69 74 2c 66  69 6e 69 73 73 6f 6e 73  |,finit,finissons|
00001170  2c 66 69 6e 69 73 73 65  7a 2c 66 69 6e 69 73 73  |,finissez,finiss|
00001180  65 6e 74 2c 64 6f 72 73  2c 64 6f 72 73 2c 64 6f  |ent,dors,dors,do|
00001190  72 74 2c 64 6f 72 6d 6f  6e 73 2c 64 6f 72 6d 65  |rt,dormons,dorme|
000011a0  7a 2c 64 6f 72 6d 65 6e  74 2c 63 6f 75 72 73 2c  |z,dorment,cours,|
000011b0  63 6f 75 72 73 2c 63 6f  75 72 74 2c 63 6f 75 72  |cours,court,cour|
000011c0  6f 6e 73 2c 63 6f 75 72  65 7a 2c 63 6f 75 72 65  |ons,courez,coure|
000011d0  6e 74 2c 6f 75 76 72 65  2c 6f 75 76 72 65 73 2c  |nt,ouvre,ouvres,|
000011e0  6f 75 76 72 65 2c 6f 75  76 72 6f 6e 73 2c 6f 75  |ouvre,ouvrons,ou|
000011f0  76 72 65 7a 2c 6f 75 76  72 65 6e 74 2c 73 6f 72  |vrez,ouvrent,sor|
00001200  73 2c 73 6f 72 73 2c 73  6f 72 74 2c 73 6f 72 74  |s,sors,sort,sort|
00001210  6f 6e 73 2c 73 6f 72 74  65 7a 2c 73 6f 72 74 65  |ons,sortez,sorte|
00001220  6e 74 2c 76 69 65 6e 73  2c 76 69 65 6e 73 2c 76  |nt,viens,viens,v|
00001230  69 65 6e 74 0d 06 5e 1c  20 dc 20 76 65 6e 6f 6e  |ient..^. . venon|
00001240  73 2c 76 65 6e 65 7a 2c  76 69 65 6e 6e 65 6e 74  |s,venez,viennent|
00001250  0d 06 a4 08 20 dc 20 2a  0d ff                    |.... . *..|
0000125a