Forum | TOUT sur la TI-82

TOUT sur la TI-82/TI-82 STATS/TI-82 STATS.fr - Index -> Programmes -> Les programmes des internautes -> F*CKTIME (Interdit aux moins de 16 ans !)

Page: 1, 2, 3 >>

F*CKTIME (Interdit aux moins de 16 ans !)

Auteur

Message

Stupid

Autorisation : Membre
Nb de messages : 768
Inscrit le : Jeu 28 Sep 2006, 18:42

Posté le : Jeu 16 Aoû 2007, 16:43

Edit 01/2010: Je pensais pas que ce jeu sortirait un jour des profondeurs des sujets. Je l'avais codé il y'a 3 ans quand j'étais jeune et insouciant.

C'est donc un jeu porn en 95*63 pixels 1b, ou il faut appuyer avec rapidité sur le bouton qu'on nous demande (les 5 touches du haut, c'est expliqué dans le jeu) pour que ça coulisse comme il faut

Au bout de 3 échecs la partie est finie. Normalement le temps de réaction est de plus en plus réduit.

à=L des listes
ô=° (dans angle)
ü=[sto->]

Code

:ClrHome
:ClrDraw
:62ü

Ymax
:94ü

Xmax
:0ü

Ymin
:0ü

Xmin
:AxesOff
:ExprOff
:LabelOff
:CoordOff
:RectGC
:GridOff
:FnOff
:0ü

X
:16ü

A
:17ü

B
:For(G,2,6,2
:For(X,1,A
:round(X/2,0ü

V
:Output(G,V,"*
:Output(G,B-V,"*
:End
:End
:Output(3,4,"*FUCKTIME*
:Output(5,1,"UN JEU SAVOUREUX
:Output(8,1,"(C)COPYRIGHT2007
:Lbl W
:Pause
:ClrHome
:ClrDraw
:0ü

U
:60ü

G
:0ü

V
:0ü

H
:Menu("FUCKTIME","JOUER",U,"COMMENT JOUER",2,"RECORD",3,"QUITTER",4
:Lbl 2
:1ü

V
:Goto 1
:Lbl L
:Text(0,5,"<-TOUCHE A PRESSER
:Text(7,5,"<-SCORE
:Text(21,4,"VIES
:Text(19,0,"^
:Line(1,36,1,40
:Text(42,34,"TOUCHES
:Text(49,19,"1:F(X) 2:WINDOW
:Text(56,6,"3:ZOOM 4:TRACE 5:GRAPH
:Line(49,48,61,40
:Text(22,63,"PILOSITE
:Text(29,63,"REGLABLE
:Goto W
:Lbl 3
:Text(28,35,áSG(1
:Goto W
:Lbl U
:Menu("* PILOSITE *","RASEE",1,"TICKET",6,"TOUFFE",7,"MEGA TOUFFE",8
:Lbl 6
:1ü

H
:Goto 1
:Lbl 7
:2ü

H
:Goto 1
:Lbl 8
:3ü

H
:Lbl 1
:Line(24,0,42,45
:Line(12,0,26,45
:Line(26,45,30,62
:Line(70,0,52,45
:Line(82,0,68,45
:Line(68,45,64,62
:Line(42,45,45,43
:Line(45,43,49,43
:Line(49,43,52,45
:Line(47,43,47,50
:If H>0
:Then
:Line(46,43,46,50
:Line(48,43,48,50
:End
:If H>1
:Then
:Line(45,43,45,49
:Line(49,43,49,49
:End
:If H>2
:Then
:Line(44,44,44,48
:Line(50,44,50,48
:Line(43,44,43,47
:Line(51,44,51,47
:End
:15ü

M
:Text(14,0,"ôôô
:Lbl Y
:Text(0,0,0
:Text(7,0,U
:Line(50,43,50,29
:Line(44,43,44,29
:Line(44,39,50,39
:If V=1
:Goto L
:Lbl G
:int(rand75)+1ü

A
:If A>5
:Goto G
:Text(0,0,A
:For(J,1,G
:getKeyü

C
:If C
:Goto R
:End
:Lbl R
:Line(45,39,49,39,0
:Line(44,34,44,28,0
:Line(50,34,50,28,0
:If C-10=A
:Then
:Text(40,35,"OH OUI!
:U+1+((G-J)/100)ü

U
:Else
:Text(40,35,"OH NON!
:M-5ü

M
:If M<0
:Goto K
:Text(14,M,"
:End
:G-1ü

G
:For(B,1,350
:End
:0ü

A
:getKeyü

D
:teXt(0,0,0
:Goto Y
:Lbl K
:For(C,0,31
:Horizontal C
:Horizontal 62-C
:End
:ClrDraw
:Text(15,20,"GAME OVER
:If U>áSG(1
:Then
:Text(15,20,"NOUVEAU RECORD!
:Uü

áSG(1
:End
:Text(25,20,"SCORE:
:Text(35,20,"RECORD:
:Text(25,45,U
:Text(35,49,áSG(1
:Goto W
:Lbl 4

unknow

Autorisation : Membre
Nb de messages : 229
Inscrit le : Jeu 12 Oct 2006, 19:30

Posté le : Jeu 16 Aoû 2007, 21:56

totalement pueril ce petit jeux slovak!!!!

moi je programme plus, enfin si je fais un site internet, un vrai

----------------------
Ta le look coco

Stupid

Autorisation : Membre
Nb de messages : 768
Inscrit le : Jeu 28 Sep 2006, 18:42

Posté le : Ven 17 Aoû 2007, 13:12

puéril? Non c'est juste pour déconner, en plus c'est un vrai jeu

Sangohan38

Autorisation : Membre
Nb de messages : 3370
Inscrit le : Sam 31 Déc 2005, 19:48

Posté le : Ven 17 Aoû 2007, 16:22

Puéril, inutile et apprend l'orthographe Slovak ce sera mieux.

Sangohan38

Stupid

Autorisation : Membre
Nb de messages : 768
Inscrit le : Jeu 28 Sep 2006, 18:42

Posté le : Ven 17 Aoû 2007, 16:40

puéril, mais j'assume complétement
inutile tout autant que n'importe quel autre jeux
c'est pas pour jouer les rabats joies mais je fait moins de fautes d'orthographes que toi (sympa le puéril->e<-)

Sangohan38

Autorisation : Membre
Nb de messages : 3370
Inscrit le : Sam 31 Déc 2005, 19:48

Posté le : Ven 17 Aoû 2007, 17:11

Moins de fautes d'orthographes?
Euh tu as vu ton "cértifié"?

Sangohan38

Stupid

Autorisation : Membre
Nb de messages : 768
Inscrit le : Jeu 28 Sep 2006, 18:42

Posté le : Ven 17 Aoû 2007, 17:17

si tu veux on se fait une ortograph battle^^

Stupid

Autorisation : Membre
Nb de messages : 768
Inscrit le : Jeu 28 Sep 2006, 18:42

Posté le : Dim 19 Aoû 2007, 18:01

interdit aux moins de 16 ans? je peux meme plus acceder à mon topic^^

webmaster

Autorisation : Administrateur
Nb de messages : 792
Inscrit le : Mer 18 Aoû 2004, 22:13

Posté le : Dim 19 Aoû 2007, 18:28

Que veux-tu, les temps sont durs...

@+ Le webmaster

Stupid

Autorisation : Membre
Nb de messages : 768
Inscrit le : Jeu 28 Sep 2006, 18:42

Posté le : Dim 19 Aoû 2007, 18:36

salut webmaster^^

he merci de l'avoir laissé ça me fait plaisir

craminou

Autorisation : Membre
Nb de messages : 138
Inscrit le : Sam 15 Avr 2006, 11:31

Posté le : Jeu 23 Aoû 2007, 23:54

un p'tit lien ??? stp

Stupid

Autorisation : Membre
Nb de messages : 768
Inscrit le : Jeu 28 Sep 2006, 18:42

Posté le : Ven 24 Aoû 2007, 12:11

Lien du jeu?

ben copie colle dans ti graph link ça devrait marcher

craminou

Autorisation : Membre
Nb de messages : 138
Inscrit le : Sam 15 Avr 2006, 11:31

Posté le : Sam 25 Aoû 2007, 11:26

a oui , merci sa marche .. par contre j'ai une erreur indefinie sur le "AxesNaff" ligne trois.... c'est ou cette commande?

de plus j'ai une erreur label si je suprime la ligne ... il est ou ton lbl 1 ?

Stupid

Autorisation : Membre
Nb de messages : 768
Inscrit le : Jeu 28 Sep 2006, 18:42

Posté le : Sam 25 Aoû 2007, 11:28

ça doit etre la trzduction

c'est AxesOff je pense

t'as juste a supprimer la ligne il y'est apres

craminou

Autorisation : Membre
Nb de messages : 138
Inscrit le : Sam 15 Avr 2006, 11:31

Posté le : Sam 25 Aoû 2007, 11:30

et le lbl 1 il est ou?

Google_AdSense

Stupid

Autorisation : Membre
Nb de messages : 768
Inscrit le : Jeu 28 Sep 2006, 18:42

Posté le : Sam 25 Aoû 2007, 11:32

ok j'ai callé le bug au lieu d emettre un lbl j'ia mit un goto

je change, il est juste avan,t la série des lignes

craminou

Autorisation : Membre
Nb de messages : 138
Inscrit le : Sam 15 Avr 2006, 11:31

Posté le : Sam 25 Aoû 2007, 11:41

encore une erreur indefinie sur ":If U>áSG(1" apres le game over

Stupid

Autorisation : Membre
Nb de messages : 768
Inscrit le : Jeu 28 Sep 2006, 18:42

Posté le : Sam 25 Aoû 2007, 11:42

faut que tu crées la liste SG en faisant 0[sto]LSG(1

craminou

Autorisation : Membre
Nb de messages : 138
Inscrit le : Sam 15 Avr 2006, 11:31

Posté le : Sam 25 Aoû 2007, 11:46

il est ou le petit L de liste?

Stupid

Autorisation : Membre
Nb de messages : 768
Inscrit le : Jeu 28 Sep 2006, 18:42

Posté le : Sam 25 Aoû 2007, 11:47

dans le catalogue ou dans liste et tout en bas je crois

Page: 1, 2, 3 >>

TOUT sur la TI-82/TI-82 STATS/TI-82 STATS.fr - Index -> Programmes -> Les programmes des internautes -> F*CKTIME (Interdit aux moins de 16 ans !)

Flux RSS