label abandon,non,oui
label gagner,gagner2,gagner3,gagner4
label gagner5,gagner6,gagner7,gagner8
label gagner9,gagner10,gagner11,gagner12
label gagner13,gagner14,gagner15,gagner16
label gagner17,gagner18,gagner19,gagner20
label gagner21,gagner22,gagner23,gagner24
label gagner25,gagner26,gagner27,gagner28
label gagner29,gagner30,gagner31,gagner32
label gagner33,gagner34,gagner35,gagner36
label gagner37,gagner38,gagner39,gagner40
label gagner41,gagner42
dim i
i=0
left 0,250
top 0,150
width 0,400
height 0,200
caption 0,"Questionnaire ?"
alpha 4
left 4,20
top 4,10
width 4,350
caption 4,"Quelle est la capitale du canada ?"
font_size 4,10
option 1
left 1,10
top 1,100
width 1,200
caption 1,"Ottawa"
option 2
left 2,10
top 2,120
width 2,200
caption 2,"Québec"
option 3
left 3,10
top 3,140
width 3,200
caption 3,"Alberta"
button 5
left 5,235
top 5,120
width 5,150
height 5,40
font_bold 5
font_size 5,15
caption 5,"&Suivant..."
on_click 5,gagner
button 6
left 6,235
top 6,75
width 6,150
height 6,40
font_bold 6
font_size 6,12
caption 6,"Abandonner"
on_click 6,abandon
alpha 12
left 12,250
top 12,35
font_bold 12
font_size 12,10
caption 12,"Score : "+str$(i)
rem abandonner -----------------------------------------------
form 7
hide 7
left 7,300
width 7,400
top 7,190
height 7,150
caption 7,"Abandonner"
command_target_is 7
alpha 8
hide 8
left 8,20
top 8,10
width 8,300
left 8,20
caption 8,"Vous avez abandonner. Recommencer ?"
font_size 8,14
alpha 11
hide 11
left 11,0
top 11,40
width 11,200
left 11,20
caption 11," Score : "+str$(i)
font_size 11,12
button 9
hide 9
left 9,50
top 9,80
width 9,100
caption 9,"&Oui"
font_bold 9
on_click 9,oui
button 10
hide 10
left 10,180
top 10,80
width 10,100
caption 10,"Non"
font_bold 10
on_click 10,non
command_target_is 0
rem lettres niveaux -----------------------
alpha 13
left 13,20
top 13,40
font_size 13,15
font_bold 13
caption 13,"Niveau 1 : Terre"
wait 1000
hide 13
alpha 14
left 14,25
top 14,35
font_size 14,10
end
abandon:
show 7
show 8
show 9
show 10
show 11
return
non:
hide 7
hide 8
hide 9
hide 10
hide 11
return
gagner:
if checked(1)=1
i=10
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"890 personnes"
caption 2,"2 000000 personnes"
caption 3,"63 0000000 personnes"
caption 4,"Quelle est la population en France ?"
on_click 5,gagner2
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner2:
if checked(3)=1
i=20
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"5 500 km"
caption 2,"17 000 km"
caption 3,"10 000 km"
caption 4,"Quelle est la distance de Paris jusqu'au Québec ?"
on_click 5,gagner3
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner3:
if checked(1)=1
i=30
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"180 000 km carré"
caption 2,"8 500 000 km carré"
caption 3,"17 000 000 km carré"
caption 4,"Quelle est la superficie du Brésil ?"
on_click 5,gagner4
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner4:
if checked(2)=1
i=40
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"Lima"
caption 2,"Canberra"
caption 3,"Beijing"
caption 4,"Quelle est la capitale de la Chine ?"
on_click 5,gagner5
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner5:
if checked(3)=1
i=50
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"Afrique"
caption 2,"Amérique du Sud"
caption 3,"Océanie"
caption 4,"Dans quel continent se trouve Suriname ?"
on_click 5,gagner6
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner6:
if checked(2)=1
i=60
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"Jeudi 5h25"
caption 2,"Mardi 2h03"
caption 3,"Mercredi 20h54"
caption 4,"Si il est mercredi 11h24 au Brésil en Inde il sera ?"
on_click 5,gagner7
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner7:
if checked(3)=1
i=70
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"1 000 000 personnes"
caption 2,"1 360 500 000 personnes"
caption 3,"20 000 000 personnes"
caption 4,"Quelle est la population en Australie ?"
on_click 5,gagner8
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner8:
if checked(3)=1
i=80
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"12 000 km"
caption 2,"10 km"
caption 3,"14 000 km"
caption 4,"Quelle est la distance de La Havane jusqu'a Astana ?"
on_click 5,gagner9
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner9:
if checked(1)=1
i=90
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"Antananarivo"
caption 2,"Kaboul"
caption 3,"Harare"
caption 4,"Quelle est la capitale de l'Afghanistan ?"
on_click 5,gagner10
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner10:
if checked(2)=1
i=100
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"Andorre"
caption 2,"Vatican"
caption 3,"Monaco"
caption 4,"Quel est le plus petit pays du monde ?"
on_click 5,gagner11
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner11:
if checked(2)=1
i=110
show 13
hide 14
caption 13,"Niveau 2 : Astronomie"
wait 1000
hide 13
show 14
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"Soleil"
caption 2,"NGC 5462"
caption 3,"HD 129798"
caption 4,"Quelle est l'étoile la plus proche de la terre ?"
on_click 5,gagner12
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner12:
if checked(1)=1
i=120
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"Jaune"
caption 2,"Beige"
caption 3,"Blanc"
caption 4,"Quelle est la couleur du Soleil ?"
on_click 5,gagner13
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner13:
if checked(3)=1
i=130
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"4 000 000 000"
caption 2,"Infini"
caption 3,"300 000 000 000 000"
caption 4,"Quelle est la grosseur de l'espace en km ?"
on_click 5,gagner14
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner14:
if checked(2)=1
i=140
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"Ariane 5"
caption 2,"Saturn V"
caption 3,"Voskhod 2"
caption 4,"Quelle est la plus grosse fusée ?"
on_click 5,gagner15
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner15:
if checked(2)=1
i=150
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"Appolon 11"
caption 2,"Appolon 5"
caption 3,"Appolon 7"
caption 4,"Saturn V à servi pour quelle mission ?"
on_click 5,gagner16
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner16:
if checked(1)=1
i=160
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
hide 1
caption 2,"Non"
caption 3,"Oui"
caption 4,"Mars a t'elle déjà eu une atmosphère ?"
on_click 5,gagner17
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner17:
if checked(3)=1
i=160
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
show 1
caption 1,"Neptune"
caption 2,"Mars"
caption 3,"Pluton"
caption 4,"À quelle planète appartient la lune Europe ?"
on_click 5,gagner18
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner18:
if checked(1)=1
i=170
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"Neptune"
caption 2,"Jupiter"
caption 3,"Uranus"
caption 4,"Quelle est la 4e planète la plus massive ?"
on_click 5,gagner19
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner19:
if checked(3)=1
i=180
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
hide 1
caption 2,"Rocheuse"
caption 3,"Gazeuse"
caption 4,"Pluton est t'elle une planète rocheuse ou gazeuse ?"
on_click 5,gagner20
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner20:
if checked(2)=1
i=190
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
show 1
caption 1,"1e"
caption 2,"5e"
caption 3,"8e"
caption 4,"Mercure est t'elle la 1e la 5e ou la 8e planète du"
caption 14,"sytème solaire ?"
on_click 5,gagner21
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner21:
if checked(1)=1
i=200
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
show 1
caption 1,"600 km/h"
caption 2,"50 km/h"
caption 3,"1000 km/h"
caption 4,"Les vents sur Jupiter sont habituellement à combien de km/h ?"
caption 14,""
on_click 5,gagner22
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
rem niveau 3 : Maths -----------------------------------------------------------------------------------------------
gagner22:
if checked(1)=1
i=210
show 13
hide 14
caption 13,"Niveau 3 : Maths"
wait 1000
hide 13
show 14
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"1179"
caption 2,"1178"
caption 3,"1177"
caption 4,"857+9321 est égal à ?"
on_click 5,gagner23
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner23:
if checked(2)=1
i=220
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"8010"
caption 2,"8096"
caption 3,"7920"
caption 4,"(45*88)*2 est égal à ?"
caption 14,""
on_click 5,gagner24
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner24:
if checked(3)=1
i=230
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"0.215"
caption 2,"0.23880597"
caption 3,"0.24"
caption 4,"(5*9+3)/200 est égal à ?"
caption 14,""
on_click 5,gagner25
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner25:
if checked(3)=1
i=240
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"-10"
caption 2,"-12"
caption 3,"-0.24"
caption 4,"((0*233*1)/890)-12 est égal à ?"
caption 14,""
on_click 5,gagner26
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner26:
if checked(2)=1
i=250
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"0.567"
caption 2,"-46,32"
caption 3,"-45,3806181"
caption 4,"((e*12)-33)-45 est égal à ?"
caption 14,""
on_click 5,gagner27
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner27:
if checked(3)=1
i=260
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"0.909297427"
caption 2,"0.932039086"
caption 3,"0.034899497"
caption 4,"sinus(2 rad) est égal à ?"
caption 14,""
on_click 5,gagner28
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner28:
if checked(1)=1
i=270
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"0.209298490"
caption 2,"0.017452406"
caption 3,"0.510177045"
caption 4,"cosinus(89 deg) est égal à ?"
caption 14,""
on_click 5,gagner29
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner29:
if checked(2)=1
i=280
top 12,56
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"Il en a 20%"
caption 2,"Il en a 40%"
caption 3,"Il en a 30%"
caption 4,"S'il y a du lait et du cacao dans le chocolat et que le chocolat"
caption 14,"est fait de 70% de cacao combien de lait y a t'il ?"
on_click 5,gagner30
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner30:
if checked(3)=1
i=290
top 12,35
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"12 cotés"
caption 2,"8 cotés"
caption 3,"10 cotés"
caption 4,"Un decagone à 10, 8 ou 12 cotés ?"
caption 14,""
on_click 5,gagner31
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner31:
if checked(3)=1
i=300
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
hide 1
caption 2,"Non convexe"
caption 3,"Convexe"
caption 4,"L'hexagone est un polygone convexe ou non convexe ?"
caption 14,""
on_click 5,gagner32
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
rem nivaux 4 : Ordinateur -----------------------------------------------------------------------------------------------------
gagner32:
if checked(3)=1
i=310
show 13
hide 14
caption 13,"Niveau 4 : Ordinateur"
wait 1000
hide 13
show 14
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"Shift+F1"
show 1
caption 2,"F1"
caption 3,"Ctrl+F1"
caption 4,"Quelle est la touche d'aide Microsof Office 2000 ?"
on_click 5,gagner33
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner33:
if checked(1)=1
i=320
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
hide 1
caption 2,"Non"
caption 3,"Oui"
caption 4,"Pouvons nous traduire des textes sur le traducteur Google ?"
caption 14,""
on_click 5,gagner34
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner34:
if checked(3)=1
i=330
show 1
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"À plus tard"
caption 2,"A+ (la note à l'école)"
caption 3,"Super bien"
caption 4,"Que veut dire A+ dans un message ?"
caption 14,""
on_click 5,gagner35
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner35:
if checked(1)=1
i=340
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"
www.google/" caption 2,"http://www.google.ca/webhp?rls=ig"
caption 3,"http://www.google.ca/"
caption 4,"Quelle est le bon site Google parmi ces réponses ?"
caption 14,""
on_click 5,gagner36
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner36:
if checked(3)=1
i=350
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"77 choix de langues"
caption 2,"50 choix de langues"
caption 3,"23 choix de langues"
caption 4,"Combien de choix de langues avons nous pour traduire des"
caption 14,"textes ou des mots ?"
on_click 5,gagner37
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner37:
if checked(2)=1
i=360
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
caption 1,"Table des caractères"
caption 2,"Charmap"
caption 3,"Caractèresmap"
caption 4,"Quelle est l'autre nom de la table des caractères sur"
caption 14,"Windows ?"
on_click 5,gagner38
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner38:
if checked(2)=1
i=370
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
hide 1
caption 1,""
caption 2,"Oui"
caption 3,"Non"
caption 4,"Est-ce que ça existe des images format WBMP ?"
caption 14,""
on_click 5,gagner39
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner39:
if checked(2)=1
i=380
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
show 1
caption 1,"Le bureau"
caption 2,"Explorer"
caption 3,"NotePad"
caption 4,"Quand l'ordinateur ouvre, il ouvre sur ?"
caption 14,""
on_click 5,gagner40
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner40:
if checked(1)=1
i=390
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
show 1
caption 1,"La règle"
caption 2,"Celle avec les boutons couper ,etc..."
caption 3,"Celle de la police et des caractères"
caption 4,"Qu'est-ce que la barre de format ?"
caption 14,""
on_click 5,gagner41
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
gagner41:
if checked(3)=1
i=400
caption 12,"Score : "+str$(i)
caption 11," Score : "+str$(i)
show 1
caption 1,"À rechercher un fichiers sur Windows"
caption 2,"À conpresser les fichiers"
caption 3,"À trier les icones par nom"
caption 4,"À quoi sert Winzip ?"
caption 14,""
on_click 5,gagner42
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
rem Niveau 5 : Animaux --------------------------------------------
gagner42:
if checked(2)=1
i=410
show 13
hide 14
caption 13,"Brovo ! Vous avez gagner."
else
i=0
left 4,100
Caption 4,"Tu as perdu !"
color 4,255,20,0
font_bold 4
wait 2000
terminate
end_if
return
rem fin sesion -------------------------------------------------------------------------------------------
oui:
terminate
Accueil 
Calendrier
