La Place des Développeurs DEUXLIGNES HEBDOGICIEL
Reprise du message précédent
Voili voilou, j'ai mis l'ensemble des listings sur un dsk que je joins.Par contre, je n'ai pas eu le temps de tout tester, je ne garantis donc pas le bon fonctionnement de tous les listings. Comme tout est bien collé, et que parfois ça pique un peu aux yeux, je ne suis pas à l'abri d'une erreur de DATA ou de POKE !
Voici donc : 2lignes.zip
MSX un jour, MSX toujours !
je poste ici c'est pas du deuxlignes mais du lourd
http://www.hebdogiciel.fr/MSX.htm
c'est aussi multi-machines
http://www.hebdogiciel.fr/MSX.htm
c'est aussi multi-machines
Je suis tombé par hasard sur ce sujet et comme j'avais quelques minutes, j'en ai profiter pour changer d'air en corrigeant le 99.BAS qui était truffé de bogues.
Il reste un bogue connu dans le score qui n'a pas de limite mais je doute que quelqu'un jouera au point de le provoquer. J'ai aussi changé la façon de gagner les points.
Code TEXT :
1 IF C=0THEN SCREEN0:KEYOFF:WIDTH37:C=1:GOTO1 ELSE VPOKE443,45:VPOKE444,62:LOCATE35,23:PRINTCHR$(INT(64+RND(-TIME)*27)):VPOKE403,32:VPOKE404,32:IFSTRIG(0)THENGOSUB2:GOTO1ELSE1 2 B=VPEEK(477):A$="Vous l'avez dans le":A=A+B-64:FORS=1TO32:LOCATES,11:PRINT"->":NEXT:IFB<>81THENLOCATE7,11:PRINTA$;:VPOKE471,B:RETURNELSE T=T+1:A=A-81:LOCATE7,11:PRINTA$+" "+CHR$(67)+CHR$(85)+CHR$(76):IFT<3THEN1ELSE CLS:PRINT"SCORE",A
Il reste un bogue connu dans le score qui n'a pas de limite mais je doute que quelqu'un jouera au point de le provoquer. J'ai aussi changé la façon de gagner les points.
Répondre
Vous n'êtes pas autorisé à écrire dans cette catégorie