%Header Record
Format:TXT
Communication SW:0
Data Type:PG
Capacity:140
File Name:CHOIX 2
Group Name:
Password:
Option1:NL
Option2:
Option3:
Option4:
%Data Record
\ClrText
\Locate 1,5," Lire les Actinides ?"
\Locate 1,6,"---------------------"
\Locate 1,7,"OUI\slash             \slashNON"
\Do:\Getkey\->\theta
\LpWhile \theta\<>79\ And \theta\<>29
\theta=79\=>\Prog "ACTINIDE"
0\->\theta:\Return
%End