If Then Else EndIf[]
Ces commandes permettent de traiter des conditions. Toujours terminer avec EndIf.
- If : si
- Then : alors
- Else : sinon
L'exemple suivant demande d'entrer un code d'accès qui est Hello. Si l'utilisateur entre le bon code un message "Bon code !" s'affiche, sinon "Mauvais code" s'affiche.
TextWindow.Write("Entrez le code d'accès: ")
Code=TextWindow.Read()
If code="Hello" Then
TextWindow.WriteLine("Bon code !")
Else
TextWindow.WriteLine("Mauvais code")
EndIf
Notez que Else n'est pas obligatoire dans une condition If, il sert à ne pas répéter If Then et EndIf une seconde fois.
Goto[]
Cette commande permet de se déplacer dans un programme, elle a besoin d'un label cible qui est un nom suivit de ":" comme ceci nom:.
L'exemple ci-dessous affiche "Essaie de Goto" sur chaque ligne de la fenêtre de texte en continu.
Debut:
o="Essaie de Goto"
TextWindow.WriteLine(o)
Goto Debut
For EndFor[]
Boucle permettant d'exécuter plusieurs fois un ensemble de fonctions. Très utile pour simplifier des parties du code. Cette commande est accompagnée de To ( vers ), suivit d'un chiffre ou d'un nombre, qui termine la boucle une fois ce chiffre ou ce nombre atteint. Après To l'on peut placer Step ( étape ) afin de préciser un incrément.
For i = 1 To 10 ' répétera 10 fois la boucle
TextWindow.WriteLine(i)
EndFor
Cet exemple affichera : 1,2,3,4,5,6,7,8,9,10 à l'écran.
L'exemple ci-dessus permet d'éviter d'écrire i=1, i=2, i=3... jusque i=10 et d'écrire dix fois TextWindow.WriteLine(i).
Par contre For i = 1 To 10 Step 2 comptera jusqu à 9 en allant de 2 en 2 : 1,3,5,7,9.
Sub EndSub[]
Les sous routines ou subroutines, d'où le mot clé de Sub, permettent d'exécuter plusieurs fonctions avec un seul appel.
TextWindow.Write("Entrez le code d'accès: ")
Code=TextWindow.Read()
If code="Hello" Then
ok()
Else
non()
EndIf
Sub ok
TextWindow.WriteLine("Bon code !")
TextWindow.WriteLine("Bonjour Monsieur")
EndSub
Sub non
TextWindow.WriteLine("Mauvais code")
TextWindow.WriteLine("Veuillez recommencer SVP !")
EndSub
While EndWhile[]
Cette boucle permet de répéter une opération jusqu'au résultat attendu.
a=1
While a < 10 ' résultat attendu et de a=10 pour terminer la boucle.
TextWindow.WriteLine(a)
a=a+1
EndWhile