Rechercher
 
 

Résultats par :
 


Rechercher Recherche avancée

Connexion

Récupérer mon mot de passe

Chatbox externe


Derniers sujets
» [JEU] Mon voisin du dessous
Hier à 11:52 par Clément.7

» Lancement du TI-Concours 2017 !
Sam 20 Mai 2017 - 0:27 par Paulo1026

» Chaînes Youtube des membres
Ven 19 Mai 2017 - 22:41 par Wistaro

» cacul du taux d'intêret
Ven 24 Mar 2017 - 21:50 par m@thieu41

» [Projet] Un mario by tout82
Dim 29 Jan 2017 - 14:09 par Wistaro

» Cherche documentation assembleur TI82stat
Mer 25 Jan 2017 - 12:29 par Ti64CLi++

» Probleme Ti-82 Stats fr
Jeu 12 Jan 2017 - 13:56 par Ti64CLi++

» ROM 82 stats.fr
Jeu 15 Déc 2016 - 10:24 par Ti64CLi++

» flappy bird
Jeu 15 Déc 2016 - 10:23 par Ti64CLi++

Partenaires
TI-Planet Espace-TI : Forum

Faire un don à Tout-82...
Où va cet argent ?
Membres donateurs:- Persalteas (10€)
- Wistaro (5€)
- jo2geek (22€)

Les posteurs les plus actifs du mois
Wistaro
 
Clément.7
 


T-invader V2

Poster un nouveau sujet   Répondre au sujet

Voir le sujet précédent Voir le sujet suivant Aller en bas

T-invader V2

Message par grmycaire le Dim 4 Jan 2015 - 11:47

Bonjour, voici enfin une nouvelle version de t-invader, mais cette fois-ci en AXE parser. autrement dis, le programme sera plus beau et plus fluide. le programme est disponible pour les shell ION doorCS et MirageOS. une version fonctionnant sans shell l'est également.
Télécharger
screen:


Code source (en AXE parser):

Code:
.TINVADER
ClrDraw
ClrHome
[42247EDBBDA51800]→Pic1
[183C5AFF7E244224]→Pic2
[0000000000000000]→Pic0
[1808100810081018]→Pic3
[FEFE303030303030]→Pic5
[000000FEFE000000]
[FEFE30303030FEFE]
[C6C6F6F6DEDEC6C6]
[FCFCC6C6C6C6FCFC]
Lbl 2
ClrDraw
Pt-On(11,8,Pic5
Pt-On(19,8,Pic5+8
Pt-On(27,8,Pic5+16
Pt-On(35,8,Pic5+24
Pt-On(43,8,Pic4+40
Pt-On(51,8,Pic4+8
Pt-On(59,8,Pic5+32
Pt-On(67,8,Pic4+24
Pt-On(75,8,Pic4+48
DispGraph
Text(20,30,"1.COMMENCER
Text(20,38,"2.QUITTER"
Repeat getKey(34)
If getKey(26)
Goto 0
End
End
ClrDraw
47→X
rand ^81→θ
0→C
1→Y
0→O
10→T
0→J
0→R
θ+5→θ
ClrDraw
Repeat getKey(15)
Pt-Off(θ,Y,Pic2
Pt-Off(θ,Y-8,Pic0
Pt-Off(X,54,Pic1
Pt-Off(X-8,54,Pic0
Pt-Off(X+8,54,Pic0
DispGraph
O++
If J=10
T--
0→J
End
If O≥T
0→O
Y++
End
If Y=54
ClrDraw
Goto 1
End
If getKey(2)
X--
ElseIf getKey(3)
X++
End
If X=88
0→X
ClrDraw
ElseIf X=0
86→X
ClrDraw
End
If getKey(54)
ClrDraw
X→S
46→N
1→R
End
If R=1
N--
Pt-Off(S,N,Pic3
Pt-Off(S,N+8,Pic0
End
If (Y≥N) and (S≥(θ-5)) and (S≤(θ+5))
ClrDraw
0→R
C++
rand ^81→θ
θ+5→θ
1→Y
46→N
J++
If J=10
T--
End
End
End
Lbl 1
ClrDraw
[7EFEC0C0CEC6FE7E]→Pic4
[7C7CC6C6FEC6C6C6]
[666666DBDBDBC3C3]
[FEFEE0F8F8E0FEFE]
[FEFEC6C6C6C6FEFE]
[C6C6C6C66C6C7C38]
[FEFEC6C6FEFECCC6]
Pt-On(31,8,Pic4
Pt-On(39,8,Pic4+8
Pt-On(47,8,Pic4+16
Pt-On(56,8,Pic4+24
Pt-On(31,17,Pic4+32
Pt-On(39,17,Pic4+40
Pt-On(47,17,Pic4+24
Pt-On(55,17,Pic4+48
DispGraph
Pause 1000
Text(33,31,"SCORE:
Text(56,31,CDec
If C>F
C→F
End
Pause 1000
Text(17,41,"MEILLEUR SCORE:
Text(73,41,FDec
Repeat getKey(54)
End
Goto 2
Lbl 0
ClrDraw
ClrHome

n'hésitez pas à me faire part de vos avis, conseils, sachant que je débute dans ce language.
à la prochaine Very Happy


Dernière édition par grmycaire le Dim 4 Jan 2015 - 12:01, édité 1 fois (Raison : ajout du screen)

grmycaire
Intéressé
Intéressé

Messages : 79
Points Concours : 14
Productivité : 7
Date d'inscription : 13/12/2013
Localisation : Embrun
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: T-invader V2

Message par Linkakro le Dim 4 Jan 2015 - 21:09

Chouette Smile

Ce changement de langage rend les programmes incomparables selon moi donc je ne baptiserais pas l'un des deux "version 2". Mais cela ne retire rien au mérite.
Je ne pratique pas ce langage donc je n'ai aucun commentaire à formuler.
Je propose pour l'avenir de générer plusieurs ennemis et de leur permettre d'attaquer comme nous. Apprend l'Axe par la pratique. Réfléchis bien à ton algorithme avant de coder en revanche.


Dernière édition par Linkakro le Mar 6 Jan 2015 - 20:05, édité 1 fois

__________________________________________________________________________
Vétéran du TI-Basic Zilog80. Ti82statfr sur Tout82 depuis 2009 et ti84pocketfr depuis noël 2012. Ti83plusfrUSB (été 2014, concours tiplanet suite du geek). Bidouille un peu d'assembleur Z80.
Incappable de gérer le temps et manque de tact, plutôt serviable.
Je prend les commandes de programme. Je suis motivé par les maths et la physique tant que ce n'est pas une simple copie d'antisèche.
Vous pouvez trouver une grande partie de mes données hébergées dans mon mediafire. Le ZIP et la liste sont périmées depuis longtemps.
coucou Invité What a Face
avatar
Linkakro
----------------------
----------------------

Messages : 533
Points Concours : 55
Productivité : 31
Date d'inscription : 30/07/2013
Localisation : origine région centre, puis perpignan
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: T-invader V2

Message par Wistaro le Mar 6 Jan 2015 - 19:05

Pas mal du tou!!

__________________________________________________________________________
Clique ici pour retrouver tout mes programmes en TIbasic

Tu es curieux, Invité? Alors clique ici:


Coucou Invité !Ta dernière visite sur ce forum date de . Tu as posté un total de 78 message(s) sur Tout 82 et enfin, tu as 0 ans.
Si nous sommes le 0, je te souhaite un joyeux anniversaire ;-)

avatar
Wistaro
Passioné
Passioné

Messages : 906
Points Concours : 86
Productivité : 28
Date d'inscription : 16/06/2013
Localisation : Tarbes - DUT GEII
Calculatrice(s) :
  • TI-82
  • TI-82 Stats
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur http://www.youtube.com/user/Wistaro

Revenir en haut Aller en bas

Re: T-invader V2

Message par rpgcreator le Ven 23 Jan 2015 - 19:24

Magnifique !!!! Et en plus c'est suer fluide comme jeu!! Enfin 60fps!!!

__________________________________________________________________________
troll!!!
je prefere la ti-82stats a la fumette Razz

ET VOUS ?

Je travaille en ce moment sur une adaptation de pokémon donjon mystère en ti-basic sur 82stats. J'ai fini la première version du jeu que je posterais prochainement !!!!!!!!!!
En attendant, viens voir mes RPG supra légers en ti-basic pour ti-82stats:

http://www.tout82.org/t87-rpg82-iii-world-war-z
http://www.tout82.org/t75-skyrim-ii-modern-warfare
http://www.tout82.org/t78-rpg82-deluxe

avatar
rpgcreator
Connaisseur
Connaisseur

Messages : 252
Points Concours : 27
Productivité : 6
Date d'inscription : 16/09/2013
Localisation : Vernouillet 28
Calculatrice(s) :
  • TI-82 Stats.fr

. : TI-82 Stats.fr

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: T-invader V2

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Voir le sujet précédent Voir le sujet suivant Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous pouvez répondre aux sujets dans ce forum