VEXOR par CDBVS:
""""""""""""""""

Respectez les espaces

1 cls:mode 2
2 mode 0:print"VEXOR !":for c=1 to 5000:next c:cls:mode 2
3 input"Quel est le nom du Vexor";v$:cls
4 input"Quel est le nom du joueur n°2";s$
5 cls
6 print"Le Vexor cree des tours malefiques, et "s$" les détruits avec la touche F":for c=1 to 10000:next c:cls
8 print v$^;" va donner un nombre de mechansete dans la fourchette ci-jointe (1 à 290):";chr$(225)
10 b=50
20 locate 1,23:input"(1 - 290)";a
30 x=100:plot x,55,1
40 draw x-b*2,55:draw x-b*2,a+55
50 draw x-b,a+55+b:draw x+b,a+55+b
60 draw x,a+55:draw x-b*2,a+55
70 move x+b,a+b+55:draw x+b,b+55
80 draw x,55:draw x,55+a
90 locate 1,23
95 rem pour la ligne suivant, il n'est pas la peine de respecter le nombre d'espace, mettez en au moins 40
100 print"                                                                                "
110 plot 500,380:print s$;" reagit"
120 window 35,39,2,5:print"F"
130 a$=inkey$:if a$=""goto 130
140 if a$="f"then goto 200
145 if a$<>"f"then goto 120
150 next
200 window 38,40,21,24:print chr$(224)
210 window 33,35,20,22:print chr$(252):for c=1 to 150:next c:cls
220 window 29,31,19,21:print chr$(252):for c=1 to 150:next c:cls
230 window 24,26,18,20:print chr$(252):for c=1 to 150:next c:cls
240 window 20,22,17,19:print chr$(252):for c=1 to 150:next c:cls
250 window 15,17,17,19:print chr$(252):for c=1 to 150:next c:cls
260 window 10,12,18,20:print chr$(252):for c=1 to 150:next c:cls
270 window 5,7,20,22::print chr$(252):for c=1 to 150:next c:cls
280 cls:mode 0:print"BOOM":sound 1,3822,150,5,0,0,1:border 6:for c=1 to 1000:next c:cls:mode 1
285 cls:mode 2:border 1:cls
290 mode 2:print v$;" est mort, ";s$;" l'a aneanti ."s$" avec son Famass lance roquette sont les sauveurs de l'univer...":for c=1 to 10000:next c:cls
300 print"Voulez vous recomancer a aider l'univer 'R' ou quitter 'Q' ?"
310 a$=inkey$:if a$=""goto 310
320 if a$="r"then goto 1
330 if a$="q"then goto 400
400 cls:mode 2:end

---

Vexor c'est mon 1er jeu !
Vexor, le jeu qui vas Vexer les utilisateurs CPC 464 >:>
Bon c'est vrais qu'il pue séver ;(
Mais bon, pour une fois que j'avais réussi à faire un truc, j'ai dessider de le garder.