π
<-
Chat plein-écran
[^]

Un démineur en python pour la NumWorks

Un démineur en python pour la NumWorks

Unread postby cent20 » 26 Feb 2020, 21:50

Article de présentation du démineur : https://nsi.xyz/demine

Publication initiale :



Lien vers le script : https://workshop.numworks.com/python/cent20/demine
Ne fonctionnera que sur l'os Omega pour l'instant. Tout est expliqué dans l'article de présentation.
Vous pouvez commenter / critiquer en utilisant le forum ci-dessous.
Le programme avant optimisation, il pèse alors 3.09 ko :

Code: Select all
from ion import keydown
from kandinsky import *
from random import randint
from time import sleep

# cut
co=color
a,r,t,l,k,s=set_pixel,fill_rect,draw_string,range,keydown,sleep

# couleurs
f,h,n = 255,127,0
c=[co(f,f,f), co(45,125,210), co(151,204,4), co(238,185,2), co(244,93,1), co(215,65,167), co(n,n,n), co(n,n,n), co(n,n,n),
   co(h,h,h),co(192,192,192),co(96,96,96),co(253,236,185)]
nb=[19,0,0]

# init
p=[[6,5],[7,5]]
m = []

def deminage():
  t(str(nb[1]),12,2,c[2]);t("/"+str(150-nb[0]),42,2,c[1]);
  t("Demineur",120,2)
  t("mines:"+str(nb[0]),220,2,c[5])
  if nb[1]+nb[0]>=150:t("Gagné ! ",120,2)

def decouvre(x,y):
  i=1
  while i>0:
    chiffre(x,y)
    for p in l(max(0,x-1),min(15,x+2)):
      for q in l(max(0,y-1),min(10,y+2)):
        if m[p][q]>=100:chiffre(p,q)
        elif m[p][q]==0:m[p][q]+=1
    i=0
    for p in l(15):
      for q in l(10):
        if m[p][q]%100==1:i=1;x=p;y=q;p=14;q=9
 
def terrain():
  r(8,21,300,200,c[9])
  for y in l(21,243,20):
    for x in l(8,309):
      a(x,y,c[10])
  for x in l(8,320,20):
    for y in l(21,222):
      a(x,y,c[10])

def chiffre(x,y):
  cl(x,y)
  nb[1]+=(m[x][y]%100!=42)
  i=m[x][y]-m[x][y]%100
  m[x][y]=i+42
  if i>=100:v=int(i/100);t(str(v),13+20*(x),23+20*(y),c[v],c[0])
  deminage()

def minage(b=nb[0]):
  if nb[2]==0:start()
  nb[2]+=1;terrain();m.clear();t(" "*28,12,2)
  for x in range(15):m.append([0 for y in range(10)])
  nb[1]=0
  while b>0:
    x, y = randint(0,14),randint(0,9)
    if m[x][y]!=999:
      m[x][y]=999;b-=1
      for p in l(max(0,x-1),min(15,x+2)):
        for q in l(max(0,y-1),min(10,y+2)):
          if m[p][q]!=999:m[p][q]+=100
  deminage();drone()

def start():
  t("Demineur",120,42,c[4])
  t("par cent20",110,62,c[1])
  t("https://nsi.xyz/demine",42,82,c[6])
  t("[OK] [Clear] [+] [-] [EXE]",32,122,c[2])
  s(4)

def explose():
  t("perdu ! ",120,2)
  for x in l(15):
    for y in l(10):
      if m[x][y]==999:mine(x,y)

def marche(x,y):
  if m[x][y]>=999:explose()
  elif m[x][y]>=100:chiffre(x,y)
  else:decouvre(x,y)

def survol():
  x, y = p[1][0], p[1][1]
  v = m[x][y]
  gps(x,y)
  # t(str(int(v/100)),20,2)
  x, y = p[0][0], p[0][1]
  v = m[x][y]
  if p[1][0]!=x or p[1][1]!=y:
    if (v-42)%100==0:gps(x,y,0)
    else:gps(x,y,9)
  del p[0]
 
def gps(x,y,i=6):
  r(9+20*x,22+20*y,19,2,c[i]);r(26+20*x,22+20*y,2,19,c[i]);r(9+20*x,22+20*y,2,19,c[i]);r(9+20*x,39+20*y,19,2,c[i])

def drone():
  while not k(5):
    if k(0):p.append([max(p[0][0]-1,0),p[0][1]])
    if k(3):p.append([min(p[0][0]+1,14),p[0][1]])
    if k(1):p.append([p[0][0],max(p[0][1]-1,0)])
    if k(2):p.append([p[0][0],min(p[0][1]+1,9)])
    if k(4):marche(p[0][0],p[0][1])
    if k(17) or k(16):drapeau(p[0][0],p[0][1])
    if k(52):nb[0]=19;minage(nb[0]);s(1)
    if k(45):nb[0]=min(nb[0]+3,42);minage(nb[0]);s(1)
    if k(46):nb[0]=max(nb[0]-3,11);minage(nb[0]);s(1)
    if len(p)>1:survol();s(0.120)
  print(42)

def drapeau(x,y):
  r(17+20*x,26+20*y,3,9,c[12]);r(17+20*x,36+20*y,3,3,c[12])
 
def mine(x,y):
  cl(x,y);r(12+20*x,36+20*y,13,4,c[9]);r(14+20*x,34+20*y,9,2,c[11]);r(17+20*x,32+20*y,3,2,c[5])

def cl(x,y):
  r(9+20*x,22+20*y,19,19,c[0])

minage()


Multiples mise à jour :



Avec l'aide des membres du forum, une version optimisée tournant sous Epsilon à été publiée.
Un autre membre de tiplanet à lui aussi codé un démineur.

Il y a donc à la date du 07/03 trois démineurs en python compatibles et optimisés pour la NumWorks :

demine.py, script initial compatible uniquement avec la ROM Omega. Lien workshop
deminime2.py script optimisé compatible avec la ROM Epsilon et la ROM Omega. Lien workshop
demineur.py script de Arthur Jacquin, annoncé ici, Lien workshop
Last edited by cent20 on 07 Mar 2020, 21:54, edited 5 times in total.
Bonjour Anonymous !

Intéressé par la spécialité NSI en 1ère
?
Visite donc
https://nsi.xyz !
User avatar
cent20Généreux
Niveau 11: LV (Légende Vivante)
Niveau 11: LV (Légende Vivante)
Level up: 51%
 
Posts: 307
Images: 24
Joined: 17 May 2012, 09:49
Location: Avignon
Gender: Male
Calculator(s):

Re: Un démineur en python pour la NumWorks

Unread postby cent20 » 26 Feb 2020, 22:16

C'est l'histoire d'un script de 3.09 ko qui refuse de s’exécuter dans une mémoire de 16ko ... :troll:
Bonjour Anonymous !

Intéressé par la spécialité NSI en 1ère
?
Visite donc
https://nsi.xyz !
User avatar
cent20Généreux
Niveau 11: LV (Légende Vivante)
Niveau 11: LV (Légende Vivante)
Level up: 51%
 
Posts: 307
Images: 24
Joined: 17 May 2012, 09:49
Location: Avignon
Gender: Male
Calculator(s):

Online

Re: Un démineur en python pour la NumWorks

Unread postby Dogm » 26 Feb 2020, 23:01

Super script :#top#:

Néanmoins un petit problème fort embêtant est la possibilité de perdre en cliquant sur la 1ère case. En effet, dans le démineur premier du nom, les mines sont générées après le 1er appui du joueur sur la grille l'empêchant ainsi de perdre au premier coup.

Un appui sur la touche flèche (KEY_BACK) pour quitter le jeu plus facilement serait également une amélioration fort sympathique. ;)
Afghanistan Simulator Numworks

36%


Omega does what epsilon't
User avatar
DogmEcrivain
Niveau 11: LV (Légende Vivante)
Niveau 11: LV (Légende Vivante)
Level up: 62.6%
 
Posts: 93
Images: 7
Joined: 14 Nov 2019, 18:53
Location: Lyon, France
Gender: Male
Calculator(s):
Class: Lycéen 2nde Sciences de l'ingénieur
GitHub: tim_ats_d

Re: Un démineur en python pour la NumWorks

Unread postby cent20 » 26 Feb 2020, 23:06

Dogm wrote:Super script :#top#:

Néanmoins un petit problème fort embêtant est la possibilité de perdre en cliquant sur la 1ère case. En effet, dans le démineur premier du nom, les mines sont générées après le 1er appui du joueur sur la grille l'empêchant ainsi de perdre au premier coup.

Un appui sur la touche flèche (KEY_BACK) pour quitter le jeu plus facilement serait également une amélioration fort sympathique. ;)


La flèche KEY_BACK a déjà cet usage, elle interrompt le script chez moi.

Je ne connaissais pas cet règle "les mines sont générées après le 1er appui du joueur sur la grille" même si elle me parait évidente. Tu veux que mon script grossisse c'est ça ?
Bonjour Anonymous !

Intéressé par la spécialité NSI en 1ère
?
Visite donc
https://nsi.xyz !
User avatar
cent20Généreux
Niveau 11: LV (Légende Vivante)
Niveau 11: LV (Légende Vivante)
Level up: 51%
 
Posts: 307
Images: 24
Joined: 17 May 2012, 09:49
Location: Avignon
Gender: Male
Calculator(s):

Re: Un démineur en python pour la NumWorks

Unread postby Lionel Debroux » 26 Feb 2020, 23:09

Hmm... j'ai déjà joué à des versions du démineur Windows où l'on peut tout à fait perdre du premier coup ?
Membre de la TI-Chess Team.
Co-mainteneur de GCC4TI (documentation en ligne de GCC4TI), TIEmu et TILP.
User avatar
Lionel DebrouxSuper Modo
Niveau 14: CI (Calculateur de l'Infini)
Niveau 14: CI (Calculateur de l'Infini)
Level up: 5.9%
 
Posts: 6444
Joined: 23 Dec 2009, 00:00
Location: France
Gender: Male
Calculator(s):
Class: -
GitHub: debrouxl

Online

Re: Un démineur en python pour la NumWorks

Unread postby Dogm » 26 Feb 2020, 23:13

Et bien là, pour le coup, il va grossir.


PS : J'ai gagné :troll:

Image

EDIT :
Lionel Debroux wrote:
Hmm... j'ai déjà joué à des versions du démineur Windows où l'on peut tout à fait perdre du premier coup ?


Un démineur où l'on peut perdre dès le premier coup est un mauvais démineur.
Last edited by Dogm on 26 Feb 2020, 23:33, edited 2 times in total.
Afghanistan Simulator Numworks

36%


Omega does what epsilon't
User avatar
DogmEcrivain
Niveau 11: LV (Légende Vivante)
Niveau 11: LV (Légende Vivante)
Level up: 62.6%
 
Posts: 93
Images: 7
Joined: 14 Nov 2019, 18:53
Location: Lyon, France
Gender: Male
Calculator(s):
Class: Lycéen 2nde Sciences de l'ingénieur
GitHub: tim_ats_d

Re: Un démineur en python pour la NumWorks

Unread postby cent20 » 26 Feb 2020, 23:31

Dogm wrote:Et bien là pour le coup il va grossir.

PS : J'ai gagné :troll:

Image


Oui quand on perd on peut continuer à jouer, parce que je suis un prof sympa et que je laisse à mes élèves une seconde chance... :)
Bonjour Anonymous !

Intéressé par la spécialité NSI en 1ère
?
Visite donc
https://nsi.xyz !
User avatar
cent20Généreux
Niveau 11: LV (Légende Vivante)
Niveau 11: LV (Légende Vivante)
Level up: 51%
 
Posts: 307
Images: 24
Joined: 17 May 2012, 09:49
Location: Avignon
Gender: Male
Calculator(s):

Re: Un démineur en python pour la NumWorks

Unread postby Bisam » 27 Feb 2020, 10:40

Quelques commentaires sur le script :
  1. Pourquoi utiliser
    Code: Select all
    int(i/100)
    au lieu de
    Code: Select all
    i//100
    ?
    Le deuxième est plus précis, puisque ne passant pas par les nombres réels et demande probablement moins de mémoire également (car les entiers considérés dans le script sont petits) !
  2. On peut avantageusement remplacer
    Code: Select all
      i = m[x][y] - m[x][y]%100
      m[x][y] = i + 42
      if i >= 100: v = int(i/100); t(str(v),13+20*(x),23+20*(y),c[v],c[0])

    par
    Code: Select all
      v=m[x][y]//100
      m[x][y] = 100*v + 42
      if v: t(str(v),13+20*(x),23+20*(y),c[v],c[0])
  3. Plus loin, on trouve
    Code: Select all
    if (v-42)%100 == 0: gps(x,y,0)
        else: gps(x,y,9)
    . J'aurais plutôt écrit :
    Code: Select all
    gps(x,y, 0 if v%100 == 42 else 9)
    à la place de ces deux lignes.
  4. Tu peux utiliser la fonction d'unpacking de Python pour simplifier certaines lignes. Combiné avec les remarques ci-dessus,
    Code: Select all
    def survol():
      x, y = p[1][0], p[1][1]
      v = m[x][y]
      gps(x,y)
      # t(str(int(v/100)),20,2)
      x, y = p[0][0], p[0][1]
      v = m[x][y]
      if p[1][0]!=x or p[1][1]!=y:
        if (v-42)%100==0:gps(x,y,0)
        else:gps(x,y,9)
      del p[0]

    deviendrait
    Code: Select all
    def survol():
      x, y = p[1]
      v = m[x][y]
      gps(x,y)
      # t(str(v//100),20,2)
      x, y = p[0]
      v = m[x][y]
      if p[1]!=(x,y):
        gps(x,y,0 if v%100==42 else 9)
      del p[0]
  5. On peut certainement remplacer la liste p de positions par deux ou trois couples de nombres : cela prendrait BEAUCOUP moins de place en mémoire.
Voilà, c'est tout pour les remarques qui ne témoignent que du fait que tu ne penses pas à utiliser le "sucre syntaxique" de Python... mais absolument pas de la réflexion et du boulot formidable qu'il y a derrière ce script.
Par ailleurs, l'explication sur ton site est plutôt remarquable et très pédagogique. :bj:
User avatar
BisamAdmin
Niveau 15: CC (Chevalier des Calculatrices)
Niveau 15: CC (Chevalier des Calculatrices)
Level up: 47.8%
 
Posts: 5450
Joined: 11 Mar 2008, 00:00
Location: Lyon
Gender: Male
Calculator(s):

Re: Un démineur en python pour la NumWorks

Unread postby Hamza.S » 27 Feb 2020, 10:45

Vous venez de le briser moralement et psychologiquement :troll:
Image
User avatar
Hamza.SAdmin
Niveau 17: GM (Grand Maître des calculatrices)
Niveau 17: GM (Grand Maître des calculatrices)
Level up: 9.9%
 
Posts: 3787
Images: 18
Joined: 07 Nov 2014, 00:43
Gender: Male
Calculator(s):

Online

Re: Un démineur en python pour la NumWorks

Unread postby critor » 27 Feb 2020, 10:50

J'ai déjà fait je crois toutes les optimisations 1 à 4 ainsi, et ça ne suffit pas à faire passer le script.
Merci quand même d'avoir pris le temps de les expliquer. :)
Image
User avatar
critorAdmin
Niveau 19: CU (Créateur Universel)
Niveau 19: CU (Créateur Universel)
Level up: 3.7%
 
Posts: 34988
Images: 9340
Joined: 25 Oct 2008, 00:00
Location: Montpellier
Gender: Male
Calculator(s):
Class: Lycée
YouTube: critor3000
Twitter: critor2000
Facebook: critor.ti

Next

Return to Programmation Python

Who is online

Users browsing this forum: No registered users and 2 guests

-
Search
-
Featured topics
Omega, le fork étendant les capacités de ta NumWorks, même en mode examen !
Comparaisons des meilleurs prix pour acheter sa calculatrice !
12
-
Donations / Premium
For more contests, prizes, reviews, helping us pay the server and domains...

Discover the the advantages of a donor account !
JoinRejoignez the donors and/or premium!les donateurs et/ou premium !


Partner and ad
Notre partenaire Jarrety 
-
Stats.
436 utilisateurs:
>418 invités
>12 membres
>6 robots
Record simultané (sur 6 mois):
6892 utilisateurs (le 07/06/2017)
-
Other interesting websites
Texas Instruments Education
Global | France
 (English / Français)
Banque de programmes TI
ticalc.org
 (English)
La communauté TI-82
tout82.free.fr
 (Français)