GAMOPAT
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.

LE 10LIGNOPAT

+14
rocky007
Cormano
YannAros
grostonton
Monsieur Atari
goux.m
Matari
Anarwax
freed
youki
Copper
F.L
Irata64
drfloyd
18 participants

Page 5 sur 34 Précédent  1, 2, 3, 4, 5, 6 ... 19 ... 34  Suivant

Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par YannAros Lun 6 Déc 2021 - 17:36

@youki a écrit: cheers   Super celui ci aussi!!

Par contre, il manque le "scenario" en rapport  Gamopat et le Doc .   C'est quoi l'histoire?  Fait nous rever!  Very Happy

Le thème imposé c'est : "Un thème en lien direct avec l'univers Gamopat ou le Doc"
Vu la tournure actuel du forum je pensais à : choisi ton camps, Commodore ou Atari, et montre à l'autre camps qui est le meilleur.
Bon je sors, je reviendrais quand j'aurais mieux  saispas

YannAros
Patient contaminé

Nombre de messages : 739
Date d'inscription : 24/09/2020

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par freed Lun 6 Déc 2021 - 17:39

@Cormano a écrit:
Ah, les 4 magnifiques couleurs du Dragon 32, ça c'était de la palette ! amoureux
Bien joué Wink
Bah en 10 lignes je pouvais pas faire de tramage ou d'éléments de décor malheureusement Wink
Sinon il y a l'autre palette sur fond blanc, mais c'est pour un winter games Mr. Green
freed
freed
Patient incurable

Autre / Ne pas divulguer Nombre de messages : 1339
Age : 100
Localisation : chezmoi
Date d'inscription : 03/02/2021

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par freed Lun 6 Déc 2021 - 17:41

Qui va nous faire un lode runner avec le doc poursuivi par des amiga? Mr. Green
freed
freed
Patient incurable

Autre / Ne pas divulguer Nombre de messages : 1339
Age : 100
Localisation : chezmoi
Date d'inscription : 03/02/2021

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par Copper Lun 6 Déc 2021 - 17:43

Sinon tu peux toujours faire un outil bureautique (traitement de texte, tableur) ou mieux un séquenceur MIDI...

Les jeux vidéos c'est un peu secondaire... Razz
Copper
Copper
Patient incurable

Masculin Nombre de messages : 1606
Age : 45
Localisation : FRANCE
Date d'inscription : 02/11/2020

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par youki Lun 6 Déc 2021 - 17:51

@Copper a écrit:Sinon tu peux toujours faire un outil bureautique (traitement de texte, tableur) ou mieux un séquenceur MIDI...

Les jeux vidéos c'est un peu secondaire... Razz

Que de la gueule....       Mr. Green
youki
youki
Interne
Interne

Masculin Nombre de messages : 5925
Age : 49
Date d'inscription : 01/08/2009

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par drfloyd Lun 6 Déc 2021 - 18:05

@freed a écrit:Qui va nous faire un lode runner avec le doc poursuivi par des amiga? Mr. Green


du moment que j'ai un phaser pur les pulveriser, et des vies infinies  Mr. Green

_______________________________________________________
LE 10LIGNOPAT - Page 5 Giphy10
Ma brocante de poilu :
https://www.gamopat-forum.com/t113082-le-retour-de-la-brocante-du-doc
Mon profil Gamopat Advisor :
https://www.gamopat-forum.com/t94659-dr-floyd-advisor





drfloyd
drfloyd
DOYEN ET PROFESSEUR FOU DE L'HOPITAL

Masculin Nombre de messages : 169208
Age : 52
Localisation : Dpt 62
Date d'inscription : 05/12/2004

http://www.gamopat.com

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par drfloyd Lun 6 Déc 2021 - 18:08

Excellent Yannaros, mais il faut un titre et un scénario

_______________________________________________________
LE 10LIGNOPAT - Page 5 Giphy10
Ma brocante de poilu :
https://www.gamopat-forum.com/t113082-le-retour-de-la-brocante-du-doc
Mon profil Gamopat Advisor :
https://www.gamopat-forum.com/t94659-dr-floyd-advisor





drfloyd
drfloyd
DOYEN ET PROFESSEUR FOU DE L'HOPITAL

Masculin Nombre de messages : 169208
Age : 52
Localisation : Dpt 62
Date d'inscription : 05/12/2004

http://www.gamopat.com

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par drfloyd Lun 6 Déc 2021 - 18:11

Déjà 3 jeux développés en quelques jours, on va bientot pouvoir éditer une compilation GAMOPAT STUDIO ?????

_______________________________________________________
LE 10LIGNOPAT - Page 5 Giphy10
Ma brocante de poilu :
https://www.gamopat-forum.com/t113082-le-retour-de-la-brocante-du-doc
Mon profil Gamopat Advisor :
https://www.gamopat-forum.com/t94659-dr-floyd-advisor





drfloyd
drfloyd
DOYEN ET PROFESSEUR FOU DE L'HOPITAL

Masculin Nombre de messages : 169208
Age : 52
Localisation : Dpt 62
Date d'inscription : 05/12/2004

http://www.gamopat.com

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par freed Lun 6 Déc 2021 - 19:25

@Copper a écrit:Sinon tu peux toujours faire un outil bureautique (traitement de texte, tableur) ou mieux un séquenceur MIDI...

Les jeux vidéos c'est un peu secondaire... Razz
gna gna gna! langue Moi j'ai déjà fait un truc. J'attends ton 10 lignes Mr. Green
freed
freed
Patient incurable

Autre / Ne pas divulguer Nombre de messages : 1339
Age : 100
Localisation : chezmoi
Date d'inscription : 03/02/2021

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par youki Lun 6 Déc 2021 - 21:18

@drfloyd a écrit:Déjà 3 jeux développés en quelques jours, on va bientot pouvoir éditer une compilation GAMOPAT STUDIO ?????
 4 jeux!  

J'en ai fait 2 moi  ,  une version C64  et une version CPC!
youki
youki
Interne
Interne

Masculin Nombre de messages : 5925
Age : 49
Date d'inscription : 01/08/2009

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par YannAros Mar 7 Déc 2021 - 8:42

@drfloyd a écrit:Excellent Yannaros, mais il faut un titre et un scénario

Je reviens avec une nouvelle version de "16BIT DEATH RACE":
Code:
10 SYMBOL AFTER 200:SYMBOL 200,0,60,124,227,192,227,124,60:SYMBOL 201,0,56,56,56,124,124,214,214:DIM P(2,2):DATA 239,60,0,10,239,60,0,10,239,30,0,5,239,30,0,5,201,45,0,5,213,30,0,5,213,30,0,5,239,30,0,5,239,30,0,5,253,30,0,5,239,90
20 BORDER 0:MODE 0:PEN 1:?"  16BIT DEATH RACE  ":?"SELECT YOUR COMPANY":?" 1: ";CHR$(200);" OR 2: ";CHR$(201):INPUT C: C=199+C:P(1,1)=40:P(1,2)=20:P(2,1)=68:P(2,2)=16:Y=10:S=0
30 MODE 1:PEN 3:FOR I=1 TO 40:LOCATE I,20:?CHR$(143):NEXT I:PEN 1:LOCATE 1,25:?"M$-INTEL-IBM-PC-8086-640kB-MSDOS-WINDOW"
40 PEN 3:FOR I=1 TO 2:IF P(I,1)<26 THEN LOCATE P(I,1)+15,P(I,2):? " "
50 IF P(I,1)>0 AND P(I,1) < 41 THEN LOCATE P(I,1),P(I,2):? CHR$(143) ELSE IF (P(I,1)<-13) THEN P(I,1) = 41:P(I,2)=15+ROUND(RND*9)
60 P(I,1) = P(I,1) - 1:NEXT I:LOCATE 10,Y+1:B$ = COPYCHR$(#0):PEN 2:IF INKEY(47)<>-1 THEN J=J+1 ELSE IF J>0 AND B$=CHR$(143) THEN LOCATE 10,Y:? " ":Y=Y-8-J:J=0:SOUND 7,200+5*J,3,15:IF Y < 1 THEN Y = 1
70 IF Y < 24 AND B$<>CHR$(143) THEN LOCATE 10,Y:? " ":Y=Y+1:SOUND 7,Y*8+60,3,5 ELSE S=S+1:IF I<65536 THEN LOCATE 35,1: ? S ELSE LOCATE 10,12:? CHR$(C);" WON THE RACE":END
80 IF Y = 24 THEN GOTO 90 ELSE LOCATE 10,Y:? CHR$(C):GOTO 40
90 MODE 0:LOCATE 5,10:?"GAME OVER":LOCATE 5,12:? "SCORE ";S:FOR I = 1 TO 21: READ NO,DU:SOUND 1,NO,DU,6:NEXT:RESTORE:GOTO 20
J'ai condensé en 9 lignes tout en ajoutant du contenu!

Le scénario :
Choisissez votre société, Commodore ou Atari, et essayez de survivre dans le marché du début des années 90
Si vous tombez dans la banalité PC votre société disparaitra!
Le jeu se termine si vous arrivez à accumuler 65536 points.

LE 10LIGNOPAT - Page 5 2021-110
YannAros
YannAros
Patient contaminé

Masculin Nombre de messages : 739
Age : 47
Localisation : Liancourt Saint Pierre
Date d'inscription : 24/09/2020

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par rocky007 Mar 7 Déc 2021 - 19:22

allez je me lance avec ce jeu TI99, inspiré de Spy Demise ( Basic étendu vous que les lignes multiples sont impossible en BASIC Simple ) :

Scénario : Ce pauvre DOC doit s’échapper du club Amiga et doit monter au dessus de l'immeuble en évitant les ascenseurs le plus rapidement possible. C''est le meilleur temps qui l'emporte. Chaque ascenseur touché fait perdre du temps à son chrono.
Se joue au Joystick, il faut traverser chaque étage pour monter à l'étage supérieur.


désolé il n'y a pas le superbe son dans la vidéo.

Pour le tester en ligne : https://js99er.net/#/
Choisir option 2 TI EXTENDED BASIC. Ensuite faire copier / coller et RUN.
Sur l'émulateur en ligne, il tourne un peu moins vite qu'en réel...l'idéal est d'utiliser Classic99.




decro-042


Code:

1 DIM Y(48),YY(8):: FOR I=0 TO 10:: Y(I)=(I*16)+1:: Y(20-I)=Y(I)::NEXT I :: CALL MAGNIFY(4) :: CALL CLEAR ::CALL SPRITE(#8,136,5,176,1):: CALL SCREEN(2)
2 CALL CHAR(65,"00000000000000FF1818181818181818FF81FF81FF81FF81"):: FOR I=1 TO 32:: READ A:: CALL VCHAR(3,I,A+60,22)::  NEXT I :: T=0 ::  CALL COLOR(5,10,2)
3 CALL CHAR(132,"1F3E7C7E7F7F7F55555555555555557FF0F87CFCFCFCFC5454545454545454FC"):: FOR I=1 TO 7 :: YY(I)=INT(RND*19):: CALL SPRITE(#I,132,8,Y(YY(I)),I*32-18) :: NEXT I
4 CALL CHAR(136,"1C3E2A367F3E3E22000000000000000000000000000000000000000000000000") :: A=1:: BX=1::BY=176::BK=241::BXBUF=0
5 CALL JOYST(1,JX,JY) :: Z=BX+JX*2 :: IF (JY>0) AND (BX=BK) THEN BY=BY-16 :: BK=242-BK :: CALL SOUND(1,560,10) ELSE IF Z>0 AND Z<242 THEN BX=Z
6 C=INT((BX+23)/32):: TP=Y(YY(C)) ::IF C>0 AND C<8 AND BY>TP-7 AND BY<TP+31 THEN CALL COLOR(5,10,5)::CALL COLOR(5,10,2)::CALL SOUND(1,220,5)::T=T+100
7 IF BX=241 AND BY=16 THEN CALL CLEAR ::PRINT "YOU WIN !!! YOUR TIME :";T ::END  ELSE YY(A)=YY(A)+1  :: IF YY(A)>19 THEN YY(A)=0
8 CALL LOCATE(#A,Y(YY(A)),(A*32)-18) ::  A=A+1 :: IF A>7 THEN A=1 
9 CALL LOCATE(#8,BY,BX):: T=T+1 :: IF BX<>BXBUF THEN CALL SOUND(1,1950,1):: BXBUF=BX ::GOTO 5 ELSE 5
10 DATA 7,7,5,6,5,5,5,6,5,5,5,6,5,5,5,6,5,5,5,6,5,5,5,6,5,5,5,6,5,5,7,7


Dernière édition par rocky007 le Mar 7 Déc 2021 - 22:01, édité 8 fois
rocky007
rocky007
Infirmier

Masculin Nombre de messages : 3958
Age : 47
Date d'inscription : 29/01/2011

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par youki Mar 7 Déc 2021 - 19:24

tu pourrais faire une video?
youki
youki
Interne
Interne

Masculin Nombre de messages : 5925
Age : 49
Date d'inscription : 01/08/2009

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par drfloyd Mar 7 Déc 2021 - 19:32

Putain le graphisme !!!! Ca a l'air cool.

Le basic etendu du ti99 est tres sympa

_______________________________________________________
LE 10LIGNOPAT - Page 5 Giphy10
Ma brocante de poilu :
https://www.gamopat-forum.com/t113082-le-retour-de-la-brocante-du-doc
Mon profil Gamopat Advisor :
https://www.gamopat-forum.com/t94659-dr-floyd-advisor





drfloyd
drfloyd
DOYEN ET PROFESSEUR FOU DE L'HOPITAL

Masculin Nombre de messages : 169208
Age : 52
Localisation : Dpt 62
Date d'inscription : 05/12/2004

http://www.gamopat.com

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par youki Mar 7 Déc 2021 - 19:37

@drfloyd a écrit:Putain le graphisme !!!! 

heu... tu as vu la gueule qu'il t'a fait??  MDR MDR MDR MDR


sinon ca a l'air bien sympa.   Very Happy
youki
youki
Interne
Interne

Masculin Nombre de messages : 5925
Age : 49
Date d'inscription : 01/08/2009

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par rocky007 Mar 7 Déc 2021 - 19:41

voilà j'ai rajouté la vidéo...
rocky007
rocky007
Infirmier

Masculin Nombre de messages : 3958
Age : 47
Date d'inscription : 29/01/2011

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par YannAros Mar 7 Déc 2021 - 20:16

Superbe entrée en matière pour le ti99!
YannAros
YannAros
Patient contaminé

Masculin Nombre de messages : 739
Age : 47
Localisation : Liancourt Saint Pierre
Date d'inscription : 24/09/2020

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par Anarwax Mar 7 Déc 2021 - 20:46

@rocky007 a écrit:allez je me lance avec ce jeu TI99, inspiré de Spy Demise ( Basic étendu vous que les lignes multiples sont impossible en BASIC Simple ) :

Scénario :  Ce pauvre DOC doit s’échapper du club Amiga et doit monter au dessus de l'immeuble en évitant les ascenseurs le plus rapidement possible.   C''est le meilleur temps qui l'emporte.  Chaque ascenseur touché fait perdre du temps à son chrono.
Se joue au Joystick, il faut traverser chaque étage pour monter à l'étage supérieur.


désolé il n'y a pas le superbe son dans la vidéo.

Pour le tester en ligne :  https://js99er.net/#/
Choisir option 2 TI EXTENDED BASIC.  Ensuite faire copier / coller et RUN.
Sur l'émulateur en ligne, il tourne un peu moins vite qu'en réel...l'idéal est d'utiliser Classic99.




decro-042

Code:

1 DIM Y(48),YY(8):: FOR I=0 TO 10:: Y(I)=(I*16)+1:: Y(20-I)=Y(I)::NEXT I :: CALL MAGNIFY(4) :: CALL CLEAR ::CALL SPRITE(#8,136,5,176,1):: CALL SCREEN(2)
2 CALL CHAR(65,"00000000000000FF1818181818181818FF81FF81FF81FF81"):: FOR I=1 TO 32:: READ A:: CALL VCHAR(3,I,A+60,22)::  NEXT I :: TIME=0 ::  CALL COLOR(5,10,2)
3 CALL CHAR(132,"1F3E7C7E7F7F7F55555555555555557FF0F87CFCFCFCFC5454545454545454FC"):: FOR I=1 TO 7 :: YY(I)=INT(RND*19):: CALL SPRITE(#I,132,8,Y(YY(I)),I*32-18) :: NEXT I
4 CALL CHAR(136,"1C3E2A367F3E3E22000000000000000000000000000000000000000000000000") :: A=1:: BX=1::BY=176::BK=241::BXBUF=0
5 CALL JOYST(1,JX,JY) :: Z=BX+JX*2 :: IF (JY>0) AND (BX=BK) THEN BY=BY-16 :: BK=242-BK :: CALL SOUND(1,560,10)
6 IF Z>0 AND Z<242 THEN BX=Z :: C=INT((BX+23)/32):: TP=Y(YY(C)) ::IF (BY>TP-7) AND (BY<TP+31) THEN CALL COLOR(5,10,5)::CALL COLOR(5,10,2)::CALL SOUND(1,220,5)::T=T-100
7 IF BX=241 AND BY=16 THEN CALL CLEAR ::PRINT "YOU WIN !!! YOUR TIME :";TIME ::END  ELSE YY(A)=YY(A)+1  :: IF YY(A)>19 THEN YY(A)=0
8 CALL LOCATE(#A,Y(YY(A)),(A*32)-18) ::  A=A+1 :: IF A>7 THEN A=1  
9 CALL LOCATE(#8,BY,BX):: TIME=TIME+1 :: IF BX<>BXBUF THEN CALL SOUND(1,1950,1):: BXBUF=BX ::GOTO 5 ELSE 5
10 DATA 7,7,5,6,5,5,5,6,5,5,5,6,5,5,5,6,5,5,5,6,5,5,5,6,5,5,5,6,5,5,7,7

bien sympa !!!

LE 10LIGNOPAT - Page 5 Captur51
Anarwax
Anarwax
Interne
Interne

Masculin Nombre de messages : 8813
Age : 45
Localisation : Bretagne
Date d'inscription : 06/09/2012

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par rocky007 Mar 7 Déc 2021 - 21:25

merci :) sacré courage de monter jusqu'au dessus :)
rocky007
rocky007
Infirmier

Masculin Nombre de messages : 3958
Age : 47
Date d'inscription : 29/01/2011

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par freed Mar 7 Déc 2021 - 21:31

@rocky007 a écrit:voilà j'ai rajouté la vidéo...

Bravo c'est super bien réalisé!
Le niveau est super bon, ça met de la pression à ceux qui n'ont pas encore proposé leur création Mr. Green
J'ai bien une autre idée mais je ne sais pas si ça va tenir en 10 lignes... MDR

En tout cas c'est bon pour le forum ça, on va pouvoir sortir la compil gamopat studio cheers
freed
freed
Patient incurable

Autre / Ne pas divulguer Nombre de messages : 1339
Age : 100
Localisation : chezmoi
Date d'inscription : 03/02/2021

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par Monsieur Atari Mar 7 Déc 2021 - 21:50

Une idée de programme pour ceux qui en manquent:

Un personnage qui a plusieurs Amiga sur des tables et qui doit changer les disquettes formatées. Au début, c'est lent puis ça s'accélère et il faut qu'il passe de plus en plus vite devant les tables qui clignotent, signe qu'il faut changer la disquette avant le "guru meditation"...

Bon, en 10 lignes, je sais que c'est pas simple mais vu ce que je viens de voir sur le TI-99 là, c'est faisable et adaptable selon.
Monsieur Atari
Monsieur Atari
Patient incurable

Masculin Nombre de messages : 1231
Age : 49
Localisation : Chez moi
Date d'inscription : 31/08/2021

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par freed Mer 8 Déc 2021 - 7:31

@Monsieur Atari a écrit:Une idée de programme pour ceux qui en manquent:

Un personnage qui a plusieurs Amiga sur des tables et qui doit changer les disquettes formatées. Au début, c'est lent puis ça s'accélère et il faut qu'il passe de plus en plus vite devant les tables qui clignotent, signe qu'il faut changer la disquette avant le "guru meditation"...

Bon, en 10 lignes, je sais que c'est pas simple mais vu ce que je viens de voir sur le TI-99 là, c'est faisable et adaptable selon.

Nan pas possible: on pourra pas jouer un MOD en arrière plan sur un 8 bits stock, du coup on va perdre en réalisme Confused
freed
freed
Patient incurable

Autre / Ne pas divulguer Nombre de messages : 1339
Age : 100
Localisation : chezmoi
Date d'inscription : 03/02/2021

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par YannAros Mer 8 Déc 2021 - 8:36

Voici une dernière version de "16BIT DEATH RACE", j'ai ajouté quelques concurrent:
LE 10LIGNOPAT - Page 5 2021-111

Le code est aussi un peu plus condensé, il ne reste que 8  lignes:
Code:
10 BORDER 0:DIM P(2,2):SYMBOL AFTER 200:SYMBOL 200,0,60,124,227,192,227,124,60:SYMBOL 201,0,56,56,56,124,124,214,214:SYMBOL 202,16,124,254,0,124,124,56,16:SYMBOL 203,32,16,124,248,240,248,124,56
20 DATA 239,60,0,10,239,60,0,10,239,30,0,5,239,30,0,5,201,45,0,5,213,30,0,5,213,30,0,5,239,30,0,5,239,30,0,5,253,30,0,5,239,90:MODE 0:PEN 1:?"  16BIT DEATH RACE  ":?"SELECT YOUR COMPANY":?" ":FOR I=1 TO 4:?I;":";SPC(I);CHR$(199+I):NEXT
30 INPUT C:C=199+C:P(1,1)=40:P(1,2)=20:P(2,1)=68:P(2,2)=16:Y=10:S=0:MODE 1:PEN 3:FOR I=1 TO 40:LOCATE I,20:?CHR$(143):NEXT I:PEN 1:LOCATE 1,25:?" M$-INTEL-IBM-8086-640kB-MS/DOS-WINDOWS"
40 PEN 3:FOR I=1 TO 2:IF P(I,1)<26 THEN LOCATE P(I,1)+15,P(I,2):?" "
50 IF P(I,1)>0 AND P(I,1)<41 THEN LOCATE P(I,1),P(I,2):?CHR$(143) ELSE IF P(I,1)<-13 THEN P(I,1)=41:P(I,2)=16+ROUND(RND*8)
60 P(I,1)=P(I,1)-1:NEXT I:LOCATE 10,Y+1:B$=COPYCHR$(#0):PEN 2:IF INKEY(47)<>-1 THEN J=J+1 ELSE IF J>0 AND B$=CHR$(143) THEN LOCATE 10,Y:?" ":Y=MAX(1,Y-8-J):J=0:SOUND 7,200+5*J,3,15
70 IF Y<24 AND B$<>CHR$(143) THEN LOCATE 10,Y:?" ":Y=Y+1:SOUND 7,Y*8+60,3,5 ELSE S=S+1:IF I<65536 THEN LOCATE 35,1:?S ELSE LOCATE 10,12:?CHR$(C);" WON THE RACE":END
80 IF Y=24 THEN MODE 0:LOCATE 6,10:?"GAME OVER":LOCATE 6,12:?"SCORE ";S:FOR I=1 TO 21:READ NO,DU:SOUND 1,NO,DU,6:NEXT:RESTORE:GOTO 20 ELSE LOCATE 10,Y:?CHR$(C):GOTO 40
YannAros
YannAros
Patient contaminé

Masculin Nombre de messages : 739
Age : 47
Localisation : Liancourt Saint Pierre
Date d'inscription : 24/09/2020

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par Anarwax Mer 8 Déc 2021 - 9:10

16 bits ou 8 ?
Anarwax
Anarwax
Interne
Interne

Masculin Nombre de messages : 8813
Age : 45
Localisation : Bretagne
Date d'inscription : 06/09/2012

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par YannAros Mer 8 Déc 2021 - 9:26

@Anarwax a écrit:16 bits ou 8 ?
Bonne question, peut-être la course vers les 16bits qui a, au final, tué la diversité


Dernière édition par YannAros le Mer 8 Déc 2021 - 10:51, édité 1 fois
YannAros
YannAros
Patient contaminé

Masculin Nombre de messages : 739
Age : 47
Localisation : Liancourt Saint Pierre
Date d'inscription : 24/09/2020

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par rocky007 Mer 8 Déc 2021 - 10:35

@YannAros a écrit:Voici une dernière version de "16BIT DEATH RACE", j'ai ajouté quelques concurrent:

tu connais un emulateur en ligne qui permet un copier/coller du code ?
rocky007
rocky007
Infirmier

Masculin Nombre de messages : 3958
Age : 47
Date d'inscription : 29/01/2011

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par freed Mer 8 Déc 2021 - 10:45

@YannAros a écrit:
@Anarwax a écrit:16 bits ou 8 ?
Bonne question, peut-être la course vers les 16bits qui à, au final, tué la diversité

C'est l'économie de marché qui a tué la diversité... On standardise pour produire plus et moins cher. Ca vaut pour le matériel comme pour le logiciel: les adaptations de hits d'une machine à l'autre ont également tué la diversité parce qu'au final on a posusé le consommateur à avoir "la même chose" quelle que soit la machine, alors que ce n'est pas toujours pertinent car les caractéristiques matérielles sont différentes.

Ce qui était génial avec les 8 bits "au début", c'est qu'il n'y avait pas que des consommateurs (offre logicielle réduite et assez chère), mais aussi des clients qui étaient créateurs (la machine invitait à la création avec son prompt "Ready" ou "OK?" à l'allumage). Pas besoin d'avoir des performances de malades, la différence se faisait ailleurs. Vous n'avez pas l'impression que c'est quand on a la possibilité de tout faire qu'on en fait le moins? (je vous laisse disserter là-dessus pour l'apéro) Mr. Green

On le voit bien avec les quelques 10 lignes qui sont présentés ici: le fait de travailler avec les limitations de chaque architecture amène une certaine forme de créativité. Ton 8 bits ne sait pas faire des sprites? Peu importe: tu fais un truc totalement différent et pourtant super sympa en mode texte sans chercher à adapter un 10 lignes fait par quelqu'un d'autre.

Continuez à proposer des 10 lignes pour vos machines!
freed
freed
Patient incurable

Autre / Ne pas divulguer Nombre de messages : 1339
Age : 100
Localisation : chezmoi
Date d'inscription : 03/02/2021

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par YannAros Mer 8 Déc 2021 - 10:50

J'ai pas trouvé un émulateur en ligne, par contre j'utilise Caprice qui ne nécessite pas d'installation sous Windows et qui permet de copier le contenu du clipboard avec une simple clic droit.
https://www.cpc-power.com/cpcarchives/index.php?page=articles&num=445  
YannAros
YannAros
Patient contaminé

Masculin Nombre de messages : 739
Age : 47
Localisation : Liancourt Saint Pierre
Date d'inscription : 24/09/2020

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par Copper Mer 8 Déc 2021 - 11:05

J'ai toujours trouvé le langage BASIC frustrant sur l'Amstrad CPC (le seul 8 bits où je l'ai vraiment connu pendant 3 ans)... Certes ça permettait de coder des trucs rapidement en peu de ligne mais cette lenteur c'est vraiment épouvantable surtout avec des graphismes tout moches en 2 couleurs...
Copper
Copper
Patient incurable

Masculin Nombre de messages : 1606
Age : 45
Localisation : FRANCE
Date d'inscription : 02/11/2020

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par Anarwax Mer 8 Déc 2021 - 11:18

j'ai pas trop codé sur cpc, mais j'en ai de bons souvenirs quand meme...

si tu veux étoffer tes connaissances Locomotive, plein de liens et livres sympas :

https://cpcrulez.fr/coding_menu-cours_et_initiations.htm

ou

https://www.cpc-power.com/cpcarchives/index.php?page=articles&num=69
Anarwax
Anarwax
Interne
Interne

Masculin Nombre de messages : 8813
Age : 45
Localisation : Bretagne
Date d'inscription : 06/09/2012

Revenir en haut Aller en bas

LE 10LIGNOPAT - Page 5 Empty Re: LE 10LIGNOPAT

Message par freed Mer 8 Déc 2021 - 11:24

@YannAros a écrit:J'ai pas trouvé un émulateur en ligne, par contre j'utilise Caprice qui ne nécessite pas d'installation sous Windows et qui permet de copier le contenu du clipboard avec une simple clic droit.
https://www.cpc-power.com/cpcarchives/index.php?page=articles&num=445  


Moi j'utilise celui-là mais pas de copier-coller non plus et je sais pas si on peut charger des .bas Confused
http://crocods.org/web/

[EDIT]: ah bah si, il sait charger un fichier .bas donc c'est bon pour les 10 lignes on dirait Very Happy

LE 10LIGNOPAT - Page 5 Amstra10
freed
freed
Patient incurable

Autre / Ne pas divulguer Nombre de messages : 1339
Age : 100
Localisation : chezmoi
Date d'inscription : 03/02/2021

Revenir en haut Aller en bas

Page 5 sur 34 Précédent  1, 2, 3, 4, 5, 6 ... 19 ... 34  Suivant

Revenir en haut


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