Petite calculette pour tous les mirc

Commenter

Contenu du snippet

calculette je m'étais trompé pour tous ceux a qui le code ne marche pas voici le nouveau

Source / Exemple : 


menu * {
  -
  calculatrice:/dialog -m calculatrice calculatrice
}
;##############
;### dialog ###
;##############

dialog calculatrice {
  size 1 1 150 200
  option dbu
  button "ok",600, 600 600 60 60, ok
  title "calculator"
  edit "",1, 10 5 130 10, read autohs
  button "0",2, 10 45 35 20
  button "1",3, 50 45 35 20
  button "2",4, 90 45 35 20
  button "3",5, 10 70 35 20
  button "4",6, 50 70 35 20
  button "5",7, 90 70 35 20
  button "6",8, 10 95 35 20
  button "7",9, 50 95 35 20
  button "8",10, 90 95 35 20
  button "9",11, 10 120 35 20
  box "",12, 5 35 140 115
  button "+",13, 10 155 30 20
  button "-",14, 45 155 30 20
  button "x",15, 80 155 30 20
  button "=",16, 45 180 30 20
  button "Clear", 17,90 120 35 20
  edit "",18, 10 25 130 10, read autohs
  button ".",19, 50 120 35 20
  button "/",20, 10 180 30 20
  button "fermer",21, 80 180 30 20, ok
  text "Calculette",22, 115 160 50 10
  text "Par",23, 120 175 50 10
  text "Tebonb",24, 115 190 50 10
}
;#############
;### event ###
;#############

ON *:DIALOG:calculatrice:sclick:2: { 
  if ($did(18) == $null) { /set %bouton 0 $did(2).text | /did -a calculatrice 1 $calc(%bouton * 10 + 1) }
  elseif ($did(18) != $null) { .did -r calculatrice 1 | .did -r calculatrice 18 | .did -a calculatrice 1 0 }
}
ON *:DIALOG:calculatrice:sclick:3: { 
  if ($did(18) == $null) { /set %bouton 1 $did(3).text | /did -a calculatrice 1 $calc(%bouton * 10 + 1) }
  elseif ($did(18) != $null) { .did -r calculatrice 1 | .did -r calculatrice 18 | .did -a calculatrice 1 1 }
}

ON *:DIALOG:calculatrice:sclick:4: { 
  if ($did(18) == $null) { /set %bouton 2 $did(4).text | /did -a calculatrice 1 $calc(%bouton * 10 + 1) }
  elseif ($did(18) != $null) { .did -r calculatrice 1 | .did -r calculatrice 18 | .did -a calculatrice 1 2 }
}
ON *:DIALOG:calculatrice:sclick:5: { 
  if ($did(18) == $null) { /set %bouton 3 $did(5).text | /did -a calculatrice 1 $calc(%bouton * 10 + 1) }
  elseif ($did(18) != $null) { .did -r calculatrice 1 | .did -r calculatrice 18 | .did -a calculatrice 1 3 }
}
ON *:DIALOG:calculatrice:sclick:6: { 
  if ($did(18) == $null) { /set %bouton 4 $did(6).text | /did -a calculatrice 1 $calc(%bouton * 10 + 1) }
  elseif ($did(18) != $null) { .did -r calculatrice 1 | .did -r calculatrice 18 | .did -a calculatrice 1 4 }
}
ON *:DIALOG:calculatrice:sclick:7: { 
  if ($did(18) == $null) { /set %bouton 5 $did(7).text | /did -a calculatrice 1 $calc(%bouton * 10 + 1) }
  elseif ($did(18) != $null) { .did -r calculatrice 1 | .did -r calculatrice 18 | .did -a calculatrice 1 5 }
}
ON *:DIALOG:calculatrice:sclick:8: { 
  if ($did(18) == $null) { /set %bouton 6 $did(8).text | /did -a calculatrice 1 $calc(%bouton * 10 + 1) }
  elseif ($did(18) != $null) { .did -r calculatrice 1 | .did -r calculatrice 18 | .did -a calculatrice 1 6 }
}
ON *:DIALOG:calculatrice:sclick:9: { 
  if ($did(18) == $null) { /set %bouton 7 $did(9).text | /did -a calculatrice 1 $calc(%bouton * 10 + 1) }
  elseif ($did(18) != $null { .did -r calculatrice 1 | .did -r calculatrice 18 | .did -a calculatrice 1 7 }
}
ON *:DIALOG:calculatrice:sclick:10: { 
  if ($did(18) == $null) { /set %bouton 8 $did(10).text | /did -a calculatrice 1 $calc(%bouton * 10 + 1) }
  elseif ($did(18) != $null) { .did -r calculatrice 1 | .did -r calculatrice 18 | .did -a calculatrice 1 8 }
}
ON *:DIALOG:calculatrice:sclick:11: { 
  if ($did(18) == $null) { /set %bouton 9 $did(11).text | /did -a calculatrice 1 $calc(%bouton * 10 + 1) }
  elseif ($did(18) != $null) { .did -r calculatrice 1 | .did -r calculatrice 18 | .did -a calculatrice 1 9 }
}
ON *:DIALOG:calculatrice:sclick:13: {  .did -a calculatrice 1 + }
ON *:DIALOG:calculatrice:sclick:14: { .did -a calculatrice 1 - }
ON *:DIALOG:calculatrice:sclick:15: { .did -a calculatrice 1 * }
ON *:DIALOG:calculatrice:sclick:16: { .did -a calculatrice 18 $calc($did(1)) }
ON *:DIALOG:calculatrice:sclick:19: { .did -a calculatrice 1 . }
ON *:DIALOG:calculatrice:sclick:17: { var %clear = $did(1,calculatrice) | .did -r calculatrice 1 | .did -a calculatrice 1 $left(%clear,$calc($len(%clear) - 1 )) }
ON *:DIALOG:calculatrice:sclick:20: { .did -a calculatrice 1 / }

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (talking)