Le deuligne de RetroPoke #10 OPERATION SUICIDE

***********************
OPERATION SUICIDE
***********************

Lorsque j'étais môme, je voulais être le héros des temps modernes. Ce que je ne savais pas, c'est que maintenant, je suis le héros de moi-même et c'est déjà ça !

Vous vous portez volontaire pour sauver les survivants du canyon intergalactique qui est le seul passage à sens unique pour rejoindre la planète Kepler.
Ce canyon est hélas entouré de fortes ondes solaires neutralisantes, et une tempête électro-cosmique a provoqué un dérèglement des moteurs des vaisseaux de transport, les projetants contre les parois solarisées.

Beaucoup y ont laissé leur vie, mais beaucoup aussi se retrouvent prisonniers dans cet interminable canyon intergalactique.

Votre mission est d'aller récupérer les survivants représentés par un point bleu sur la carte, tout en évitant les parois et les éclats de vaisseaux détruits qui eux, apparaitront en rouge.
Les commandes :
Touche [HAUT] pour reprendre de l'altitude et touche [ESPACE] pour lancer votre vaisseau.
La traversée de tous les canyons s'effectue de gauche à droite.

Listing :

1 DEFINT a-y:MODE 0:FOR l=1 TO 2:PLOT 9,99*l,3:FOR c=1 TO 31:DRAW c*25,99*l+RND*80:NEXT c,l:FOR c=1 TO 22:PLOT 36+c*26,130+RND*90,2+RND:NEXT:x=0:y=192:PLOT x,y,14:PRINT" "d"KMs"SPC(6)CHR$(&F8)v:WHILE INKEY(47):WEND:WHILE x<644:z=1+INKEY(0):y=y-1+3*z:x=x+4

2 SOUND z,5,1:t=TEST(x,y)+TEST(x,y-2):DRAW x,y,1:WHILE t>2:SOUND 1,0,49,15,9,,31:WHILE z<50:PLOT -z+x+RND*z*2,-z+y+RND*z*2,15:z=z+0.4:WEND:TAG:MOVE 170,80:PRINT"GAME OVER";:WHILE INKEY(47):WEND:RUN:WEND:v=v-(t<3 AND t>0):SOUND t,9,9,,,,9:WEND:d=d+1:GOTO 1

Téléchargement : DEUULIGNE #10 OPERATION SUICIDE

0 commentaire

Envoyer un commentaire Annuler la réponse

Vous devez vous connecter pour publier un commentaire.

Evènements

Live en cours Jeu 29 Oct · 12h Sortie de ùCPM #8 Autre
Aujourd'hui Lun 9 Nov · 20h30 Geekorex Twitch
À venir Ven 13 Nov · 22h Xyphoe YouTube
À venir Ven 17 Sep 2027 · 9h → dim 19 Sep 2027 · 18h Amstrad Connection 86120 Saint-Léger-de-Montbrillais