FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Dessin 2D: largeur de trait
par papydall Hier à 23:31

» Projet de planétarium virtuel.
par Jean Claude Hier à 21:59

» PanExpress : l'éditeur Panoramic avec création d'objet
par Jean Claude Hier à 20:32

» Animation: Feux de signalisation
par Minibug Hier à 20:28

» Quantité de mémoire utilisée par un exe
par Jack Mar 19 Juin 2018 - 16:39

» Problème avec 'file_load'.
par Pedro Alvarez Lun 18 Juin 2018 - 8:12

» Version instantanée V 0.9.28i20 du 13/06/2018
par jjn4 Sam 16 Juin 2018 - 14:25

» string$(0,chr$(32)) sans erreur
par silverman Ven 15 Juin 2018 - 19:56

» Version instantanée V 0.9.28i19 du 13/06/2018
par Minibug Ven 15 Juin 2018 - 19:14

» Mes souhaits d'amélioration de Panoramic.
par Pedro Alvarez Jeu 14 Juin 2018 - 20:17

» [RÉSOLU] Message d'erreur impossible à indentifier
par Minibug Mer 13 Juin 2018 - 20:52

» Cadre pour image
par Jean Claude Mar 12 Juin 2018 - 16:31

» Créateur d'objets Panoramic
par Minibug Mar 12 Juin 2018 - 14:02

» Planétarium gratuit.
par Jean Claude Sam 9 Juin 2018 - 18:50

» Comment afficher une image sans fond.
par JL35 Sam 9 Juin 2018 - 14:16

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Juin 2018
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
252627282930 
CalendrierCalendrier

Partagez | 
 

 Jeu Code Barre

Aller en bas 
AuteurMessage
lodchjo

avatar

Nombre de messages : 162
Age : 47
Localisation : Anvers
Date d'inscription : 26/12/2011

MessageSujet: Jeu Code Barre   Mer 1 Aoû 2012 - 0:07

Coucou, mes amis!

Hier, j'ai eu une idée de jeu tout nouveau, et je vous jure, c'est pas diabolique (mais infernal), et puis, voilà, je l'ai fait aujourd'hui. (En plus, le jeu est très bien pour votre physique, car il va vous faire courir partout dans la maison!)



Alors, je voulais faire un jeu autour de ces codes barre qu'on trouve sur tous les produits, livres, DVD's, bref, quasi toutes les articles qu'on peut acheter dans les magasins, sauf les fraises en vrac.

COMMENT Y JOUER?
Histoire: C'est l'annéé 2100. A cause d'un erreur système, vous êtes enfermé chez vous dans le MatriX. Il y as un code quelque part, mais vous devez la trouver. Les codes sont écrits sous les codes barre de produits, livres, DVD, etc. Entrez ces codes pour voir si ça vous aide a sortir. Puis bougez dans le MatriX avec les flèches. Bonne chance!"

1. Il faut rentrer un code barre (donc, le numéro sous les barres) dans la case et puis appuyer sur START.
2. Une matrice sera dessiné. A gauche en haut, se trouve votre unité.
3. Il faut aller entre les cases noires pour atteindre le coté droite de l'écran.
4. Si le code n'est pas bien, appuyez STOP et vous pouvez insérer un autre code.

Bonne chance!!

Lode

Code:

dim a, x, y, z, out$, al
dim g(50)
label 2bin, init, move, stp
on_error_goto stp

left 0,223
top 0,200
width 0,550
height 0,492
caption 0,"Bar Code Game (Programmed by Lodchjo)"
on_key_up 0, move

alpha 1
left 1,10
top 1,10
width 1,133
height 1,21
caption 1,"Entrez un code barre"

edit 2
left 2,150
top 2,10

button 3
left 3,280
top 3,10
width 3,167
caption 3,"START!"
on_click 3, 2bin
picture 4
left 4,100
top 4,127
width 4,268
height 4,185
2d_target_is 4
2d_pen_width 2
2d_RECTANGLE 1,1,267,185
button 5
left 5,100
top 5,130
width 5,29
height 5,29
caption 5,chr$(35)
hide 5
button 6
left 6,280
top 6,10
width 6,167
caption 6,"STOP"
on_click 6, stp
hide 6
message "C'est l'annéé 2100. A cause d'un erreur système, vous êtes enfermé chez vous dans le MatriX. Il y as une code quelque part, mais vous devez la trouver. Les codes sont écrits sous les codes barre de produits, livres, DVD, etc. Entrez ces codes pour voir si ça vous aide a sortir. Bougez dans le MatriX avec les flèches. Bonne chance!"
end

2bin:
caption 1,text$(2)
hide 2
hide 3
out$=""
a = val (right$("000000000000"+text$(2),13))+1
for x = 50 to 0 step -1
g(x)=0
if a >= power (2,x) then g(x)=1:a=a-power (2,x)
next x
for x = 50 to 0 step -1
out$=out$+str$(g(x))
next x
gosub init
return

init:
show 5
show 6
2d_pen_width 1
for x = 1 to 7
for y = 1 to 6
z = 30+(x-1)*7+y
if al=0 then picture z
top z, 100+y*30
left z, 100+x*30
width z,29
height z,29
color z,0,0,0
if g((x-1)*6+y-1)=0 then show z
if g((x-1)*6+y-1)=1 then hide z
next y
next x
al=1
wait 10
set_focus 0
return

move:
if key_up_code=37 and left(5)>=130 and color_pixel_blue(0,left(5)-15,top(5)+15)>0 then left 5, left(5)-30
if key_up_code=38 and top(5)>=132 and color_pixel_blue(0,left(5)+15,top(5)-15)>0 then top 5, top(5)-30
if key_up_code=39 and left(5)<=338 and color_pixel_blue(0,left(5)+45,top(5)+15)>0 then left 5, left(5)+30
if key_up_code=40 and top(5)<=255 and color_pixel_blue(0,left(5)+15,top(5)+45)>0 then top 5, top(5)+30
if left(5)>338 then message "Félicitations! Vous avez réussi!!":goto stp
return

stp:
hide 5
hide 6
show 2
show 3
left 5,100
top 5,130
return
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://lode.weebly.com
papydall

avatar

Nombre de messages : 5952
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Jeu Code Barre   Mer 1 Aoû 2012 - 1:55

Salut lodchjo.

Ton jeu n’est pas si infernal que ça ! Mais il est bien pensé.
Voilà une idée très originale!

J’ai eu droit à des félicitations puisque j’ai réussi dès le 2eme essai.
Je pense que notre ami Jean Claude serait très content à se confronter à ce jeu.
lol! lol!
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Jean Claude

avatar

Nombre de messages : 5487
Age : 64
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: Jeu Code Barre   Mer 1 Aoû 2012 - 9:47

10 bonnes minutes pour sortir le code, mais j'y suis arrivé cheers

Bravo Lod, beaucoup d'imagination pour nous trouver des nouveaux casse tête.

Je suis entrain de vous en préparer un (de jeu) et c'est déjà un casse-tête de le coder lol!

A+
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5952
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Jeu Code Barre   Mer 1 Aoû 2012 - 15:29

Je suis impatient de me casser la tête avec ton casse-tête.
Alors, s’il te plait, ne me casse pas la tête à trop attendre ton casse-tête !.

Fais vite, ma patience a des limites!
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Jean Claude

avatar

Nombre de messages : 5487
Age : 64
Localisation : 83 Var
Date d'inscription : 07/05/2009

MessageSujet: Re: Jeu Code Barre   Mer 1 Aoû 2012 - 18:02

Te casses pas la tête, çà va venir...

Mais j'ai de la famille à la maison, donc je limite le codage en fonction....

J'espère avant lundi soir, sinon çà sera reporter au 24 août (cause vacances et mariage de ma fille)

A+
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5952
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Jeu Code Barre   Mer 1 Aoû 2012 - 18:46

Alors bonne fête.
Le mariage de ta fille est infiniment plus important que n’importe quel casse-tête à coder pour nous casser la tête.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Yannick

avatar

Nombre de messages : 8077
Age : 47
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Jeu 2 Aoû 2012 - 15:07

le code bar insoluble ,


3086121601026 , code de stylo BIC...
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: Jeu Code Barre   

Revenir en haut Aller en bas
 
Jeu Code Barre
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» 100€ remboursé sur Zumo 660
» intégration code barre dans draft
» Problème de taille pour la barre de navigation [Résolu]
» code pour inséré les anime (Fond transparent)
» manuel de code e-anim

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Les jeux faits avec Panoramic-
Sauter vers: