begin process at 2010 03 19 16:14:30
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
Accueil > 

Code

 > 

AddOns

 > CALCULATRICE EN PICWIN

CALCULATRICE EN PICWIN


 Information sur la source

Note :
6 / 10 - par 1 personne
6,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :AddOns Classé sous :calc, calcul, calculatrice, picwin, atlantisfr Niveau :Débutant Date de création :22/08/2006 Date de mise à jour :23/08/2006 01:03:38 Vu :1 933
Auteur : atlantisfr

Ecrire un message privé
Site perso
Commentaire sur cette source (6)
Ajouter un commentaire et/ou une note

 Description

Cliquez pour voir la capture en taille normale
Une calculatice en PicWin pour changer :)
Pour l'ouvrir tapez : /calc

Source

  • alias calc {
  • unset %calc
  • unset %calc2
  • window -BCdg0k0pRz +dl @Calc 0 0 327 134
  • drawfill -r @calc $rgb(218,240,252) 1 10 10
  • drawrect -f @calc 2 2 0 0 327 15
  • drawtext -roc @calc $rgb(250,250,250) Tahoma 10 5 3 200 20 Calculatrice par atlantisfr
  • drawrect @calc 2 2 0 15 327 119
  • drawrect @calc 2 2 0 15 337 129
  • drawrect -f @calc 4 2 314 3 11 11
  • drawrect @calc 0 1 314 3 11 11
  • drawrect -f @calc 3 2 301 3 11 11
  • drawrect @calc 0 1 301 3 11 11
  • drawrect -f @calc 15 2 5 20 156 17
  • drawrect @calc 2 2 5 20 156 17
  • drawrect -f @calc 15 2 5 40 156 17
  • drawrect @calc 2 2 5 40 156 17
  • drawrect -f @calc 15 2 5 60 50 15
  • drawrect @calc 2 2 5 60 50 15
  • drawtext -oc @calc 2 Tahoma 10 27 61 60 20 9
  • drawrect -f @calc 15 2 58 60 50 15
  • drawrect @calc 2 2 58 60 50 15
  • drawtext -oc @calc 2 Tahoma 10 80 61 60 20 8
  • drawrect -f @calc 15 2 111 60 50 15
  • drawrect @calc 2 2 111 60 50 15
  • drawtext -oc @calc 2 Tahoma 10 133 61 60 20 7
  • drawrect -f @calc 15 2 5 78 50 15
  • drawrect @calc 2 2 5 78 50 15
  • drawtext -oc @calc 2 Tahoma 10 27 79 60 20 6
  • drawrect -f @calc 15 2 58 78 50 15
  • drawrect @calc 2 2 58 78 50 15
  • drawtext -oc @calc 2 Tahoma 10 80 79 60 20 5
  • drawrect -f @calc 15 2 111 78 50 15
  • drawrect @calc 2 2 111 78 50 15
  • drawtext -oc @calc 2 Tahoma 10 133 79 60 20 4
  • drawrect -f @calc 15 2 5 96 50 15
  • drawrect @calc 2 2 5 96 50 15
  • drawtext -oc @calc 2 Tahoma 10 27 97 60 20 3
  • drawrect -f @calc 15 2 58 96 50 15
  • drawrect @calc 2 2 58 96 50 15
  • drawtext -oc @calc 2 Tahoma 10 80 97 60 20 2
  • drawrect -f @calc 15 2 111 96 50 15
  • drawrect @calc 2 2 111 96 50 15
  • drawtext -oc @calc 2 Tahoma 10 133 97 60 20 1
  • drawrect -f @calc 15 2 5 114 50 15
  • drawrect @calc 2 2 5 114 50 15
  • drawtext -oc @calc 2 Tahoma 10 27 115 60 20 0
  • drawrect -f @calc 15 2 58 114 50 15
  • drawrect @calc 2 2 58 114 50 15
  • drawtext -oc @calc 2 Tahoma 10 77 115 60 20 00
  • drawrect -f @calc 15 2 111 114 50 15
  • drawrect @calc 2 2 111 114 50 15
  • drawtext -oc @calc 2 Tahoma 10 135 112 60 20 ,
  • drawline @calc 2 2 165 20 165 128
  • drawrect -f @calc 15 2 169 20 75 15
  • drawrect @calc 2 2 169 20 75 15
  • drawtext -oc @calc 2 Tahoma 10 203 21 60 20 +
  • drawrect -f @calc 15 2 247 20 75 15
  • drawrect @calc 2 2 247 20 75 15
  • drawtext -oc @calc 2 Tahoma 10 282 21 60 20 -
  • drawrect -f @calc 15 2 169 38 75 15
  • drawrect @calc 2 2 169 38 75 15
  • drawtext -oc @calc 2 Tahoma 10 204 39 60 20 x
  • drawrect -f @calc 15 2 247 38 75 15
  • drawrect @calc 2 2 247 38 75 15
  • drawtext -oc @calc 2 Tahoma 10 280 39 60 20 ÷
  • drawrect -f @calc 15 2 169 56 36 15
  • drawrect @calc 2 2 169 56 36 15
  • drawtext -oc @calc 2 Tahoma 9 185 58 60 20 (
  • drawrect -f @calc 15 2 208 56 36 15
  • drawrect @calc 2 2 208 56 36 15
  • drawtext -oc @calc 2 Tahoma 9 224 58 60 20 )
  • drawrect -f @calc 15 2 247 56 75 15
  • drawrect @calc 2 2 247 56 75 15
  • drawtext -oc @calc 2 Tahoma 10 280 57 60 20 %
  • drawrect -f @calc 15 2 169 74 75 15
  • drawrect @calc 2 2 169 74 75 15
  • drawtext -oc @calc 2 Tahoma 10 185 75 60 20 Au carré
  • drawrect -f @calc 15 2 247 74 76 15
  • drawrect @calc 2 2 247 74 75 15
  • drawtext -oc @calc 2 Tahoma 10 280 75 60 20 Pi
  • drawrect -f @calc 15 2 169 92 76 15
  • drawrect @calc 2 2 169 92 76 15
  • drawtext -oc @calc 2 Tahoma 10 202 93 60 20 =
  • drawrect -f @calc 15 2 247 92 76 15
  • drawrect @calc 2 2 247 92 75 15
  • drawtext -oc @calc 2 Tahoma 10 267 93 60 20 Effacer
  • drawline @calc 2 2 169 111 321 111
  • drawrect -f @calc 15 2 169 114 153 15
  • drawrect @calc 2 2 169 114 153 15
  • drawtext -oc @calc 2 Tahoma 10 228 115 60 20 Fermer
  • }
  • alias -l calc.move {
  • if ($window(@calc)) window @calc $calc($mouse.dx - $1) $calc($mouse.dy - $2)
  • if ($mouse.key & 1) .timer $+ $ticks -m 1 0 calc.move $1-
  • }
  • menu @calc {
  • sclick {
  • if ($mouse.y < 15) { calc.move $calc($mouse.dx - $window($active).x) $calc($mouse.dy - $window($active).y) }
  • if $inrect($mouse.x,$mouse.y,314,3,11,11) { window -c @calc }
  • if $inrect($mouse.x,$mouse.y,301,3,11,11) { window -n @calc }
  • if ($inrect($mouse.x,$mouse.y,5,60,50,15)) { set %calc %calc $+ 9 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,58,60,50,15)) { set %calc %calc $+ 8 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,111,60,50,15)) { set %calc %calc $+ 7 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,5,78,50,15)) { set %calc %calc $+ 6 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,58,78,50,15)) { set %calc %calc $+ 5 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,111,78,50,15)) { set %calc %calc $+ 4 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,5,96,50,15)) { set %calc %calc $+ 3 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,58,96,50,15)) { set %calc %calc $+ 2 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,111,96,50,15)) { set %calc %calc $+ 1 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,5,114,50,15)) { set %calc %calc $+ 0 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,58,114,50,15)) { set %calc %calc $+ 00 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,111,114,50,15)) { set %calc %calc $+ . | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,169,20,75,15)) { set %calc %calc $+ + | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,247,20,75,15)) { set %calc %calc $+ - | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,169,38,75,15)) { set %calc %calc $+ * | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,247,38,75,15)) { set %calc %calc $+ / | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,169,56,36,15)) { set %calc %calc $+ ( | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,208,56,36,15)) { set %calc %calc $+ ) | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,247,56,75,15)) { set %calc %calc $+ *10/100 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) }
  • if ($inrect($mouse.x,$mouse.y,169,74,75,15)) { set %calc2 %calc | set %calc2 $sqrt(%calc2) | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 %calc | drawrect -f @calc 15 2 5 40 156 17 | drawrect @calc 2 2 5 40 156 17 | drawtext -oc @calc 2 Tahoma 10 10 42 60 20 %calc2 }
  • if ($inrect($mouse.x,$mouse.y,169,92,76,15)) { set %calc2 %calc | set %calc2 $calc(%calc2) | drawrect -f @calc 15 2 5 40 156 17 | drawrect @calc 2 2 5 40 156 17 | drawtext -oc @calc 2 Tahoma 10 10 42 60 20 %calc2 }
  • if ($inrect($mouse.x,$mouse.y,247,92,76,15)) { drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawrect -f @calc 15 2 5 40 156 17 | drawrect @calc 2 2 5 40 156 17 | unset %calc | unset %calc2 }
  • if ($inrect($mouse.x,$mouse.y,169,114,153,15)) { window -c @calc }
  • }
  • mouse {
  • if $inrect($mouse.x,$mouse.y,301,3,11,11) { drawdot -f @calc 0 4 308 10 | drawrect @calc 0 1 301 3 11 11 }
  • else { drawrect -f @calc 3 2 301 3 11 11 | drawrect @calc 0 1 301 3 11 11 }
  • if $inrect($mouse.x,$mouse.y,314,3,11,11) { drawdot -f @calc 0 4 321 10 | drawrect @calc 0 1 314 3 11 11 }
  • else { drawrect -f @calc 4 2 314 3 11 11 | drawrect @calc 0 1 314 3 11 11 }
  • if ($inrect($mouse.x,$mouse.y,5,60,50,15)) { drawtext -oc @calc 14 Tahoma 10 27 61 60 20 9 }
  • else { drawtext -oc @calc 2 Tahoma 10 27 61 60 20 9 }
  • if ($inrect($mouse.x,$mouse.y,58,60,50,15)) { drawtext -oc @calc 14 Tahoma 10 80 61 60 20 8 }
  • else { drawtext -oc @calc 2 Tahoma 10 80 61 60 20 8 }
  • if ($inrect($mouse.x,$mouse.y,111,60,50,15)) { drawtext -oc @calc 14 Tahoma 10 133 61 60 20 7 }
  • else { drawtext -oc @calc 2 Tahoma 10 133 61 60 20 7 }
  • if ($inrect($mouse.x,$mouse.y,5,78,50,15)) { drawtext -oc @calc 14 Tahoma 10 27 79 60 20 6 }
  • else { drawtext -oc @calc 2 Tahoma 10 27 79 60 20 6 }
  • if ($inrect($mouse.x,$mouse.y,58,78,50,15)) { drawtext -oc @calc 14 Tahoma 10 80 79 60 20 5 }
  • else { drawtext -oc @calc 2 Tahoma 10 80 79 60 20 5 }
  • if ($inrect($mouse.x,$mouse.y,111,78,50,15)) { drawtext -oc @calc 14 Tahoma 10 133 79 60 20 4 }
  • else { drawtext -oc @calc 2 Tahoma 10 133 79 60 20 4 }
  • if ($inrect($mouse.x,$mouse.y,5,96,50,15)) { drawtext -oc @calc 14 Tahoma 10 27 97 60 20 3 }
  • else { drawtext -oc @calc 2 Tahoma 10 27 97 60 20 3 }
  • if ($inrect($mouse.x,$mouse.y,58,96,50,15)) { drawtext -oc @calc 14 Tahoma 10 80 97 60 20 2 }
  • else { drawtext -oc @calc 2 Tahoma 10 80 97 60 20 2 }
  • if ($inrect($mouse.x,$mouse.y,111,96,50,15)) { drawtext -oc @calc 14 Tahoma 10 133 97 60 20 1 }
  • else { drawtext -oc @calc 2 Tahoma 10 133 97 60 20 1 }
  • if ($inrect($mouse.x,$mouse.y,5,114,50,15)) { drawtext -oc @calc 14 Tahoma 10 27 115 60 20 0 }
  • else { drawtext -oc @calc 2 Tahoma 10 27 115 60 20 0 }
  • if ($inrect($mouse.x,$mouse.y,58,114,50,15)) { drawtext -oc @calc 14 Tahoma 10 77 115 60 20 00 }
  • else { drawtext -oc @calc 2 Tahoma 10 77 115 60 20 00 }
  • if ($inrect($mouse.x,$mouse.y,111,114,50,15)) { drawtext -oc @calc 14 Tahoma 10 135 112 60 20 , }
  • else { drawtext -oc @calc 2 Tahoma 10 135 112 60 20 , }
  • if ($inrect($mouse.x,$mouse.y,169,20,75,15)) { drawtext -oc @calc 14 Tahoma 10 203 21 60 20 + }
  • else { drawtext -oc @calc 2 Tahoma 10 203 21 60 20 + }
  • if ($inrect($mouse.x,$mouse.y,247,20,75,15)) { drawtext -oc @calc 14 Tahoma 10 282 21 60 20 - }
  • else { drawtext -oc @calc 2 Tahoma 10 282 21 60 20 - }
  • if ($inrect($mouse.x,$mouse.y,169,38,75,15)) { drawtext -oc @calc 14 Tahoma 10 204 39 60 20 x }
  • else { drawtext -oc @calc 2 Tahoma 10 204 39 60 20 x }
  • if ($inrect($mouse.x,$mouse.y,247,38,75,15)) { drawtext -oc @calc 14 Tahoma 10 280 39 60 20 ÷ }
  • else { drawtext -oc @calc 2 Tahoma 10 280 39 60 20 ÷ }
  • if ($inrect($mouse.x,$mouse.y,169,56,36,15)) { drawtext -oc @calc 14 Tahoma 9 185 58 60 20 ( }
  • else { drawtext -oc @calc 2 Tahoma 9 185 58 60 20 ( }
  • if ($inrect($mouse.x,$mouse.y,208,56,36,15)) { drawtext -oc @calc 14 Tahoma 9 224 58 60 20 ) }
  • else { drawtext -oc @calc 2 Tahoma 9 224 58 60 20 ) }
  • if ($inrect($mouse.x,$mouse.y,247,56,75,15)) { drawtext -oc @calc 14 Tahoma 10 280 57 60 20 % }
  • else { drawtext -oc @calc 2 Tahoma 10 280 57 60 20 % }
  • if ($inrect($mouse.x,$mouse.y,169,74,75,15)) { drawtext -oc @calc 14 Tahoma 10 185 75 60 20 Au carré }
  • else { drawtext -oc @calc 2 Tahoma 10 185 75 60 20 Au carré }
  • if ($inrect($mouse.x,$mouse.y,247,74,76,15)) { drawtext -oc @calc 14 Tahoma 10 280 75 60 20 Pi }
  • else { drawtext -oc @calc 2 Tahoma 10 280 75 60 20 Pi }
  • if ($inrect($mouse.x,$mouse.y,169,92,76,15)) { drawtext -oc @calc 14 Tahoma 10 202 93 60 20 = }
  • else { drawtext -oc @calc 2 Tahoma 10 202 93 60 20 = }
  • if ($inrect($mouse.x,$mouse.y,247,92,76,15)) { drawtext -oc @calc 14 Tahoma 10 267 93 60 20 Effacer }
  • else { drawtext -oc @calc 2 Tahoma 10 267 93 60 20 Effacer }
  • if ($inrect($mouse.x,$mouse.y,169,114,153,15)) { drawtext -oc @calc 14 Tahoma 10 228 115 60 20 Fermer }
  • else { drawtext -oc @calc 2 Tahoma 10 228 115 60 20 Fermer }
  • }
  • Fermer la fenêtre:window -c @calc
  • Minimiser la fenêtre:window -n @calc
  • } 
alias calc { 
  unset %calc 
  unset %calc2 
  window -BCdg0k0pRz +dl @Calc 0 0 327 134 
  drawfill -r @calc $rgb(218,240,252) 1 10 10 
  drawrect -f @calc 2 2 0 0 327 15 
  drawtext -roc @calc $rgb(250,250,250) Tahoma 10 5 3 200 20 Calculatrice par atlantisfr 
  drawrect @calc 2 2 0 15 327 119 
  drawrect @calc 2 2 0 15 337 129 
  drawrect -f @calc 4 2 314 3 11 11 
  drawrect @calc 0 1 314 3 11 11 
  drawrect -f @calc 3 2 301 3 11 11 
  drawrect @calc 0 1 301 3 11 11 
  drawrect -f @calc 15 2 5 20 156 17 
  drawrect @calc 2 2 5 20 156 17 
  drawrect -f @calc 15 2 5 40 156 17 
  drawrect @calc 2 2 5 40 156 17 
  drawrect -f @calc 15 2 5 60 50 15 
  drawrect @calc 2 2 5 60 50 15 
  drawtext -oc @calc 2 Tahoma 10 27 61 60 20 9 
  drawrect -f @calc 15 2 58 60 50 15 
  drawrect @calc 2 2 58 60 50 15 
  drawtext -oc @calc 2 Tahoma 10 80 61 60 20 8 
  drawrect -f @calc 15 2 111 60 50 15 
  drawrect @calc 2 2 111 60 50 15 
  drawtext -oc @calc 2 Tahoma 10 133 61 60 20 7 
  drawrect -f @calc 15 2 5 78 50 15 
  drawrect @calc 2 2 5 78 50 15 
  drawtext -oc @calc 2 Tahoma 10 27 79 60 20 6 
  drawrect -f @calc 15 2 58 78 50 15 
  drawrect @calc 2 2 58 78 50 15 
  drawtext -oc @calc 2 Tahoma 10 80 79 60 20 5 
  drawrect -f @calc 15 2 111 78 50 15 
  drawrect @calc 2 2 111 78 50 15 
  drawtext -oc @calc 2 Tahoma 10 133 79 60 20 4 
  drawrect -f @calc 15 2 5 96 50 15 
  drawrect @calc 2 2 5 96 50 15 
  drawtext -oc @calc 2 Tahoma 10 27 97 60 20 3 
  drawrect -f @calc 15 2 58 96 50 15 
  drawrect @calc 2 2 58 96 50 15 
  drawtext -oc @calc 2 Tahoma 10 80 97 60 20 2 
  drawrect -f @calc 15 2 111 96 50 15 
  drawrect @calc 2 2 111 96 50 15 
  drawtext -oc @calc 2 Tahoma 10 133 97 60 20 1 
  drawrect -f @calc 15 2 5 114 50 15 
  drawrect @calc 2 2 5 114 50 15 
  drawtext -oc @calc 2 Tahoma 10 27 115 60 20 0 
  drawrect -f @calc 15 2 58 114 50 15 
  drawrect @calc 2 2 58 114 50 15 
  drawtext -oc @calc 2 Tahoma 10 77 115 60 20 00 
  drawrect -f @calc 15 2 111 114 50 15 
  drawrect @calc 2 2 111 114 50 15 
  drawtext -oc @calc 2 Tahoma 10 135 112 60 20 , 
  drawline @calc 2 2 165 20 165 128 
  drawrect -f @calc 15 2 169 20 75 15 
  drawrect @calc 2 2 169 20 75 15 
  drawtext -oc @calc 2 Tahoma 10 203 21 60 20 + 
  drawrect -f @calc 15 2 247 20 75 15 
  drawrect @calc 2 2 247 20 75 15 
  drawtext -oc @calc 2 Tahoma 10 282 21 60 20 - 
  drawrect -f @calc 15 2 169 38 75 15 
  drawrect @calc 2 2 169 38 75 15 
  drawtext -oc @calc 2 Tahoma 10 204 39 60 20 x 
  drawrect -f @calc 15 2 247 38 75 15 
  drawrect @calc 2 2 247 38 75 15 
  drawtext -oc @calc 2 Tahoma 10 280 39 60 20 ÷ 
  drawrect -f @calc 15 2 169 56 36 15 
  drawrect @calc 2 2 169 56 36 15 
  drawtext -oc @calc 2 Tahoma 9 185 58 60 20 ( 
  drawrect -f @calc 15 2 208 56 36 15 
  drawrect @calc 2 2 208 56 36 15 
  drawtext -oc @calc 2 Tahoma 9 224 58 60 20 ) 
  drawrect -f @calc 15 2 247 56 75 15 
  drawrect @calc 2 2 247 56 75 15 
  drawtext -oc @calc 2 Tahoma 10 280 57 60 20 % 
  drawrect -f @calc 15 2 169 74 75 15 
  drawrect @calc 2 2 169 74 75 15 
  drawtext -oc @calc 2 Tahoma 10 185 75 60 20 Au carré 
  drawrect -f @calc 15 2 247 74 76 15 
  drawrect @calc 2 2 247 74 75 15 
  drawtext -oc @calc 2 Tahoma 10 280 75 60 20 Pi 
  drawrect -f @calc 15 2 169 92 76 15 
  drawrect @calc 2 2 169 92 76 15 
  drawtext -oc @calc 2 Tahoma 10 202 93 60 20 = 
  drawrect -f @calc 15 2 247 92 76 15 
  drawrect @calc 2 2 247 92 75 15 
  drawtext -oc @calc 2 Tahoma 10 267 93 60 20 Effacer 
  drawline @calc 2 2 169 111 321 111 
  drawrect -f @calc 15 2 169 114 153 15 
  drawrect @calc 2 2 169 114 153 15 
  drawtext -oc @calc 2 Tahoma 10 228 115 60 20 Fermer 
} 

alias -l calc.move { 
  if ($window(@calc)) window @calc $calc($mouse.dx - $1) $calc($mouse.dy - $2) 
  if ($mouse.key & 1) .timer $+ $ticks -m 1 0 calc.move $1- 
} 

menu @calc { 
  sclick { 
    if ($mouse.y < 15) { calc.move $calc($mouse.dx - $window($active).x) $calc($mouse.dy - $window($active).y) } 
    if $inrect($mouse.x,$mouse.y,314,3,11,11) { window -c @calc } 
    if $inrect($mouse.x,$mouse.y,301,3,11,11) { window -n @calc } 
    if ($inrect($mouse.x,$mouse.y,5,60,50,15)) { set %calc %calc $+ 9 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,58,60,50,15)) { set %calc %calc $+ 8 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,111,60,50,15)) { set %calc %calc $+ 7 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,5,78,50,15)) { set %calc %calc $+ 6 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,58,78,50,15)) { set %calc %calc $+ 5 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,111,78,50,15)) { set %calc %calc $+ 4 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,5,96,50,15)) { set %calc %calc $+ 3 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,58,96,50,15)) { set %calc %calc $+ 2 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,111,96,50,15)) { set %calc %calc $+ 1 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,5,114,50,15)) { set %calc %calc $+ 0 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,58,114,50,15)) { set %calc %calc $+ 00 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,111,114,50,15)) { set %calc %calc $+ . | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,169,20,75,15)) { set %calc %calc $+ + | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,247,20,75,15)) { set %calc %calc $+ - | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,169,38,75,15)) { set %calc %calc $+ * | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,247,38,75,15)) { set %calc %calc $+ / | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,169,56,36,15)) { set %calc %calc $+ ( | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,208,56,36,15)) { set %calc %calc $+ ) | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,247,56,75,15)) { set %calc %calc $+ *10/100 | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 $replace(%calc,*,x,/,÷) } 
    if ($inrect($mouse.x,$mouse.y,169,74,75,15)) { set %calc2 %calc | set %calc2 $sqrt(%calc2) | drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawtext -oc @calc 2 Tahoma 10 10 22 150 20 %calc | drawrect -f @calc 15 2 5 40 156 17 | drawrect @calc 2 2 5 40 156 17 | drawtext -oc @calc 2 Tahoma 10 10 42 60 20 %calc2 } 
    if ($inrect($mouse.x,$mouse.y,169,92,76,15)) { set %calc2 %calc | set %calc2 $calc(%calc2) | drawrect -f @calc 15 2 5 40 156 17 | drawrect @calc 2 2 5 40 156 17 | drawtext -oc @calc 2 Tahoma 10 10 42 60 20 %calc2 } 
    if ($inrect($mouse.x,$mouse.y,247,92,76,15)) { drawrect -f @calc 15 2 5 20 156 17 | drawrect @calc 2 2 5 20 156 17 | drawrect -f @calc 15 2 5 40 156 17 | drawrect @calc 2 2 5 40 156 17 | unset %calc | unset %calc2 } 
    if ($inrect($mouse.x,$mouse.y,169,114,153,15)) { window -c @calc } 
  } 
  mouse { 
    if $inrect($mouse.x,$mouse.y,301,3,11,11) { drawdot -f @calc 0 4 308 10 | drawrect @calc 0 1 301 3 11 11 } 
    else { drawrect -f @calc 3 2 301 3 11 11 | drawrect @calc 0 1 301 3 11 11 } 
    if $inrect($mouse.x,$mouse.y,314,3,11,11) { drawdot -f @calc 0 4 321 10 | drawrect @calc 0 1 314 3 11 11 } 
    else { drawrect -f @calc 4 2 314 3 11 11 | drawrect @calc 0 1 314 3 11 11 } 
    if ($inrect($mouse.x,$mouse.y,5,60,50,15)) { drawtext -oc @calc 14 Tahoma 10 27 61 60 20 9 } 
    else { drawtext -oc @calc 2 Tahoma 10 27 61 60 20 9 } 
    if ($inrect($mouse.x,$mouse.y,58,60,50,15)) { drawtext -oc @calc 14 Tahoma 10 80 61 60 20 8 } 
    else { drawtext -oc @calc 2 Tahoma 10 80 61 60 20 8 } 
    if ($inrect($mouse.x,$mouse.y,111,60,50,15)) { drawtext -oc @calc 14 Tahoma 10 133 61 60 20 7 } 
    else { drawtext -oc @calc 2 Tahoma 10 133 61 60 20 7 } 
    if ($inrect($mouse.x,$mouse.y,5,78,50,15)) { drawtext -oc @calc 14 Tahoma 10 27 79 60 20 6 } 
    else { drawtext -oc @calc 2 Tahoma 10 27 79 60 20 6 } 
    if ($inrect($mouse.x,$mouse.y,58,78,50,15)) { drawtext -oc @calc 14 Tahoma 10 80 79 60 20 5 } 
    else { drawtext -oc @calc 2 Tahoma 10 80 79 60 20 5 } 
    if ($inrect($mouse.x,$mouse.y,111,78,50,15)) { drawtext -oc @calc 14 Tahoma 10 133 79 60 20 4 } 
    else { drawtext -oc @calc 2 Tahoma 10 133 79 60 20 4 } 
    if ($inrect($mouse.x,$mouse.y,5,96,50,15)) { drawtext -oc @calc 14 Tahoma 10 27 97 60 20 3 } 
    else { drawtext -oc @calc 2 Tahoma 10 27 97 60 20 3 } 
    if ($inrect($mouse.x,$mouse.y,58,96,50,15)) { drawtext -oc @calc 14 Tahoma 10 80 97 60 20 2 } 
    else { drawtext -oc @calc 2 Tahoma 10 80 97 60 20 2 } 
    if ($inrect($mouse.x,$mouse.y,111,96,50,15)) { drawtext -oc @calc 14 Tahoma 10 133 97 60 20 1 } 
    else { drawtext -oc @calc 2 Tahoma 10 133 97 60 20 1 } 
    if ($inrect($mouse.x,$mouse.y,5,114,50,15)) { drawtext -oc @calc 14 Tahoma 10 27 115 60 20 0 } 
    else { drawtext -oc @calc 2 Tahoma 10 27 115 60 20 0 } 
    if ($inrect($mouse.x,$mouse.y,58,114,50,15)) { drawtext -oc @calc 14 Tahoma 10 77 115 60 20 00 } 
    else { drawtext -oc @calc 2 Tahoma 10 77 115 60 20 00 } 
    if ($inrect($mouse.x,$mouse.y,111,114,50,15)) { drawtext -oc @calc 14 Tahoma 10 135 112 60 20 , } 
    else { drawtext -oc @calc 2 Tahoma 10 135 112 60 20 , } 
    if ($inrect($mouse.x,$mouse.y,169,20,75,15)) { drawtext -oc @calc 14 Tahoma 10 203 21 60 20 + } 
    else { drawtext -oc @calc 2 Tahoma 10 203 21 60 20 + } 
    if ($inrect($mouse.x,$mouse.y,247,20,75,15)) { drawtext -oc @calc 14 Tahoma 10 282 21 60 20 - } 
    else { drawtext -oc @calc 2 Tahoma 10 282 21 60 20 - } 
    if ($inrect($mouse.x,$mouse.y,169,38,75,15)) { drawtext -oc @calc 14 Tahoma 10 204 39 60 20 x } 
    else { drawtext -oc @calc 2 Tahoma 10 204 39 60 20 x } 
    if ($inrect($mouse.x,$mouse.y,247,38,75,15)) { drawtext -oc @calc 14 Tahoma 10 280 39 60 20 ÷ } 
    else { drawtext -oc @calc 2 Tahoma 10 280 39 60 20 ÷ } 
    if ($inrect($mouse.x,$mouse.y,169,56,36,15)) { drawtext -oc @calc 14 Tahoma 9 185 58 60 20 ( } 
    else { drawtext -oc @calc 2 Tahoma 9 185 58 60 20 ( } 
    if ($inrect($mouse.x,$mouse.y,208,56,36,15)) { drawtext -oc @calc 14 Tahoma 9 224 58 60 20 ) } 
    else { drawtext -oc @calc 2 Tahoma 9 224 58 60 20 ) } 
    if ($inrect($mouse.x,$mouse.y,247,56,75,15)) { drawtext -oc @calc 14 Tahoma 10 280 57 60 20 % } 
    else { drawtext -oc @calc 2 Tahoma 10 280 57 60 20 % } 
    if ($inrect($mouse.x,$mouse.y,169,74,75,15)) { drawtext -oc @calc 14 Tahoma 10 185 75 60 20 Au carré } 
    else { drawtext -oc @calc 2 Tahoma 10 185 75 60 20 Au carré } 
    if ($inrect($mouse.x,$mouse.y,247,74,76,15)) { drawtext -oc @calc 14 Tahoma 10 280 75 60 20 Pi } 
    else { drawtext -oc @calc 2 Tahoma 10 280 75 60 20 Pi } 
    if ($inrect($mouse.x,$mouse.y,169,92,76,15)) { drawtext -oc @calc 14 Tahoma 10 202 93 60 20 = } 
    else { drawtext -oc @calc 2 Tahoma 10 202 93 60 20 = } 
    if ($inrect($mouse.x,$mouse.y,247,92,76,15)) { drawtext -oc @calc 14 Tahoma 10 267 93 60 20 Effacer } 
    else { drawtext -oc @calc 2 Tahoma 10 267 93 60 20 Effacer } 
    if ($inrect($mouse.x,$mouse.y,169,114,153,15)) { drawtext -oc @calc 14 Tahoma 10 228 115 60 20 Fermer } 
    else { drawtext -oc @calc 2 Tahoma 10 228 115 60 20 Fermer } 
  } 
  Fermer la fenêtre:window -c @calc 
  Minimiser la fenêtre:window -n @calc 
}



 Historique

23 août 2006 01:03:38 :
Correction du bug de la touche "Au carré"

 Sources du même auteur

Source avec une capture SPEED (JEU EN PICWIN)
Source avec une capture COULEUR D'ÉCRITURE EN PICWIN
AUTO CONNEXION
Toutes les sources de atlantisfr

 Sources de la même categorie

TCL - AJOUT SUPPRESSION DE LOGS par Atok
BLACKLIST PSEUDOS/MASKS par usurpateur
Source avec une capture [XCHAT] ANTI KICK / AWAY C++ par GeroXXXX
JEU DU CODE par alanpersonproject
SERVEUR FTP par hisoka2501
Toutes les sources de la catégorie AddOns

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture LAZER (JEU EN PICWIN) par Zova
Source avec Zip Source avec une capture [DLL] DESSINER COMME LES PICWINS SUR UNE DIALOGBOX (BONUS: J... par uaip
Source avec Zip Source avec une capture PACMAN ONLINE - 4 JOUEURS par wims
SINUSOÏDALE par wims
Source avec une capture SPEED (JEU EN PICWIN) par atlantisfr

Commentaires et avis

Commentaire de RCA ArKanis le 22/08/2006 19:45:17

Le code et le résultat (la piciwn) sont tous deux assez moches
Dans ton code il y a plein de passages qui se ressemblent
De grosses optimisations sont à faire !
Le calcul peut sortir de l'editbox, et on voit pas ce qu'on écrit. Pareil avec le résultat.

Le bouton "au carré" met un drawrect -f dans l'editbox et retourne une erreur * /drawtext: insufficient parameters

Tu n'as pas de gestion de variables/mémoire

Corrige déjà ça, et essaye d'optimiser !
Je n'ai fait que survoler le code, j'ai pas regardé les erreurs (pour une fois, ça sera les autres qui le feront :p)

Commentaire de Panthouffle le 26/08/2006 18:50:00

"(pour une fois, ça sera les autres qui le feront :p)"
Hum j'ai l'impression que si j'le fais pas personne le fera ^^

Commencons par le début, coté afffichage avec quelques tests:

On peut pas travailler avec des nombres de 10 chiffres ou plus à cause d'un problème d'affichage (même le 9ème chiffre est couper en 2 chez moi)

Le bouton "Pi" ne fonctionne pas, et "%" c'est pas censé être modulo et pas "pourcentage" ?

4-2x4 me retourne -4 , faut écrire (4-2)x4 pour que ça donne 8, mais ça devient vite saoulant de mettre des paranthèse partout :( (si tu effecturais les opérations au fur et à mesure ce bug n'existerait pas)

4 Au carré me retourne 2 alors qu'il devrait me retourner 16, tu dois avoir confondu avec la racine carrée...

Les couleurs sont pas fameuses j'trouve (bleu rouge vert) ça le fait pas :(
J'aime pas trop le style de tes boutons, je te conseil de rajouter un peu de relief

Coté codage:

En regardant le code, la première chose que j'me dit c'est "répétitions" ...
J'énumèrerai pas tous les cas de répétitions mais tu peux sauver quelques lignes si tu suis mes conseils:

Premièrement, pour les rectangles ayant la même couleur et la même taille, au lieu de faire comme ça:

drawrect @calc 2 2 0 15 327 119
drawrect @calc 2 2 0 15 337 129
drawrect @calc ...

Tu peux "abouter" tes coordonnées comme ceci:

drawrect @calc 2 2 0 15 327 119 0 15 337 129 ...

Ensuite, dans le menu @calc sclick, utilises elseif (sinon si)

if $inrect(...) { ... }
elseif $inrect(...) { ... }
elseif $inrect(...) { ... }
...

Dernier détail (vraiment pas gros mais tu sauve une ligne ;))

unset %calc
unset %calc2

Tu mets: unset %calc*

Voila j'avais du temps à perdre et j'ai décidé de trouver des bugs dans ta source étant donné que personne n'avait l'air à vouloir le faire o_O (si jamais j'ai oublier des trucs que je voit personne me le reprocher ^^, et de toute manière, y'aura toujours de l'optimisations à faire dans n'importe quel source que ce soit)

Donc en gros, si tu améliores rien de tout ce que j'ai dit ou si tu ne compte pas faire d'autre version, je crois que ça aurait été beaucoup mieu dans un dialog.

Commentaire de RCA ArKanis le 26/08/2006 19:31:35

"4-2x4 me retourne -4 , faut écrire (4-2)x4 pour que ça donne 8, mais ça devient vite saoulant de mettre des paranthèse partout :( (si tu effecturais les opérations au fur et à mesure ce bug n'existerait pas)"

la multiplication est prioritaire, c'est juste comme il a fait
ce sont les calculatrices bon marché (mais nulles) qui retournent 8
1+2*3 = 7, et non 9

sinon en général, les picwins sont plus jolies, mais ce n'est pas toujours le cas

Commentaire de Panthouffle le 26/08/2006 19:56:22

"c'est juste comme il a fait", bof il a tout simplement utiliser $calc

"(si tu effecturais les opérations au fur et à mesure ce bug n'existerait pas)", je parlais de la méthode dont la calculatrice de windows fonctionne, mais je me suis rendu compte seulement après avoir valider mon message que cette calculatrice utilisais 2 lignes ...

"sinon en général, les picwins sont plus jolies, mais ce n'est pas toujours le cas", dans ce cas ci, je crois qu'il aurait été préférable de la faire en dialog c'est tout, c'est qu'un avis personnel faut pas en faire tout un plat non plus..

Commentaire de Panthouffle le 26/08/2006 19:58:28

Finallement je me suis planté pour la calculatrice de windows, elle fonctionne correctement elle aussi, c'est surement moi qui est trop bête

Commentaire de Benjamin37 le 27/08/2006 01:20:32

c'est beau .

Mais la calculatrice de windows  le fait déjà

après chacun son avis

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Aide: Picwin et Calculatrice [ par Mc_AbBeR ] Bonjour,Je cherche comment faire une zone de texte (disable) en picwin, et un bouton. Puis comment calculer (calculatrice).Merci d'Avance Combo picwin ? [ par Lestat_2070 ] Bonjour &#224; tous, Voil&#224; j'ai enfin d&#233;cid&#233; de me lancer dans les picwins , j'ai d'ailleurs lut attentivement les deux tutos de Kinder Aider Moi!!!! [ par Bencall ] Bonjour, Je programme normalement en vb, mais mon probleme est que la seule formule que j'ai trouvé pour mon prog ce trouve en IRC: >if ($prop == len Variable Long -> int [ par S333 ] Voil&#224;, c'est &#224; mon tour de poser une question ^^ Alors, je suis en train de refaire, et am&#233;liorer HLirc, mais je suis devant un probl&# Aide: PicWin !!! (mouse.x mouse.y) [ par Mc_AbBeR ] Voila mon code:alias -l apw.text drawtext @A-PICWIN 1 Tahoma 11 $1-alias -l apw.rect drawrect @A-PICWIN $1-alias apicwin {&nbsp; window -adpBCf +d @A- PicWin: List et Réduction [ par Mc_AbBeR ] Bon, je suis en train de faire une petite source&nbsp;en picwin &nbsp;mais j'ai besoin d'une list (comme en dialog). J'ai fait un rectangle mais euh a PicWin: list en picwin [ par Mc_AbBeR ] Bon j'voudrais bien faire une liste en picwin&nbsp;(comme sur un dialog) avec les scroll pis tout... PicWin: supprimer un drawdot [ par Mc_AbBeR ] Bon j'ai r&#233;ussi a faire ma list, mais ya juste un petit probl&#232;me: comment fait-on pour supprimer le drawdot?Quand je fait le mouse ya 100000 Pour ceux qui aiment écouter la musique en tchattant [ par Bestdoud ] Cela fait quelque temps que je réalise un lecteur mp3 en picwin. venez le découvrir à l'adresse suivante: http://amigagaamp.free.fr voici ces caract PicWin Multi-Fonctions : Un p'tit coup de pub [ par RCA ArKanis ] J'osais pas cr&#233;er une nouvelle source pour &#231;a, &#233;tant donn&#233; que le remote pour lequel je pubbe a d&#233;j&#224; &#233;t&#233; envoy


Nos sponsors


Sondage...

Comparez les prix


Archos 5 Internet Tablette 500 Go
Entre 396€ et 444€

Visiter le guide achat

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Photothèque

Photo hvar - 2Photo store scarecrow
  

Visiter la photothèque
 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,045 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)