begin process at 2010 03 13 05:16:56
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

AddOns

 > POST-IT

POST-IT


 Information sur la source

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

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :AddOns Classé sous :postit, postit, notepad Niveau :Débutant Date de création :04/07/2005 Vu :2 387

Auteur : IceTempest

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

 Description

Ben voila c'est un Post-it tout simple. Alt+R et mettre dans les remotes

Source

  • dialog post {
  • title "« Post-It »"
  • size -3 -3 248 217
  • edit "", 10, 10 0 230 180, return, multi, vsbar
  • button "Enregistrer", 18, 10 187 80 25, ok default
  • button "Effacer", 19, 160 187 80 25
  • }
  • on 1:dialog:post:edit:10:{
  • unset %post
  • set %i 0
  • :debut
  • inc %i
  • set %post %post $+ $did(10,%i).text $+ $crlf
  • if (%i >= $did(10).lines) { goto fin }
  • goto debut
  • :fin
  • }
  • alias post {
  • set %dreturn $dialog(post,post,-1)
  • }
  • on 1:dialog:post:init:0: {
  • did -a post 10 %post
  • }
  • on 1:dialog:post:sclick:19: {
  • did -r post 10
  • unset %post
  • }
dialog post {
  title "« Post-It »"
  size -3 -3 248 217
  edit "", 10, 10 0 230 180, return, multi, vsbar
  button "Enregistrer", 18, 10 187 80 25, ok default
  button "Effacer", 19, 160 187 80 25
}

on 1:dialog:post:edit:10:{
  unset %post
  set %i 0
  :debut
  inc %i
  set %post %post $+ $did(10,%i).text $+ $crlf

  if (%i >= $did(10).lines) { goto fin }
  goto debut
  :fin
}
alias post {
  set %dreturn $dialog(post,post,-1)
}
on 1:dialog:post:init:0: {
  did -a post 10 %post
}
on 1:dialog:post:sclick:19: { 
  did -r post 10
  unset %post
}

 Conclusion

Voila et bon Scripting à vous


 Sources du même auteur

Source avec une capture "RESIZE" SANS DLL
DES EFFETS D'OUVERTURE DE DIALOG
LECTEUR MP3, WAV ET WMA
MENU DE CONNECTION
AUTO VOICE ET AUTO MESSAGE À LA CONNECTION

 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

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture POST-IT PICWIN V1.0 par fjxokt

Commentaires et avis

Commentaire de MaX_62 le 04/07/2005 17:47:54

Bof, bof, très basique et mal codé... quelques idée d'optimisations :
L'alias /post est très "bizarre", mets plutot ça :
alias post dialog -m post post
car la tu /set une variable inutilement

Je pense pas qu'une variable ait une très grande capacité, je pense qu'il vaut mieux tout stocker dans un fichier.txt (et après le recopier éventuellement avec le file handling)

Regroupe tes évènements de dialog :
on *:DIALOG:post:*:*:{
  if ($devent == init) { ... }
  elseif ($devent == sclick) {
    if ($did == 1) { ... }
    elseif ($did == 2) { ... }
  }
}

Les boucles avec /goto, beurk :( utilises les /while et les variables locales !

Je trouve que le dialog est pas très beau :s

Améliores tout ça car c'est vraiment pas terrible... bonne continuation

Commentaire de tofu le 04/07/2005 19:37:32

je rejoins totalement le pt de vue de MaX_62

Commentaire de KiNdErMaXi le 04/07/2005 21:26:08

si je veux mettre plusieurs post it ? :(
pourquoi tu sa un bouton 18 alors que tu ne le fais pas réagir au sclick ???

bonne continuation

Commentaire de Mc_AbBeR le 05/07/2005 11:41:26

Met plutot sa:

on *:dialog:post:*:*:{
  if $devent == edit {
    if $did == 10 {
      unset %post
      set %i 0
      :debut
      inc %i
      set %post %post $+ $did(10,%i).text $+ $crlf
      if (%i >= $did(10).lines) { goto fin }
      goto debut
      :fin
    }
  }
  if $devent == init {
    if $did == 0 {
      did -a post 10 %post
    }
  }
  if $devent == sclick {
    if $did == 19 {
      did -r post 10
      unset %post
    }
  }
}
alias post { set %dreturn $dialog(post,post,-1) }

Commentaire de tofu le 05/07/2005 14:26:36

quitte à vouloir optimiser, optimise vrment là les changements que tu as fais changent queud à part la lisibilité..

Commentaire de wims le 05/07/2005 14:27:37

if $devent == init {
    if $did == 0 {

mdr ?

Commentaire de tofu le 05/07/2005 14:32:32

oui, desfois qu'il y ait un $did == 1 dans le init... :P HaHa ..

Commentaire de IceTempest le 05/07/2005 15:08:58

Merci de votre franchise. Mais de la à vous foutre de ma gueule j'apprécie pas trop.
Alors si c'est pour faire ça, autant ne rien mettre.
Merci

Commentaire de tofu le 05/07/2005 19:17:34

on parlait de la "pseudo optimisation" de mc_abber pas de ton code tkt.

Commentaire de sky_175 le 08/07/2005 02:55:36

Heu, j'viens de voir un truc là. C'est exactement le même post-it que dans le Blizzard v.3 ...

A part la variable %post qui est nommé %post.it dans le script.

Donc pourquoi posté une source si on n'en est pas l'auteur ?
Bye

Commentaire de COOLMAN002 le 08/07/2005 23:01:29

Mise à part enlever les "/splay" et renommer les variables, et le dialog, c'est EXACTEMENT le même que celui de Blizzard Script 3 (par Epsilon) ...

Commentaire de Asphere le 12/07/2005 02:55:19

Mon avis diffère du votre, ca marche, et j'en suis très content.

Bravo à toi ;)

Commentaire de Asphere le 12/07/2005 03:09:39

Après mûre réflexion c'est vrai qu'il ressemble très étrangement à celui du Blizzard...

Commentaire de hisoka2501 le 24/11/2006 15:49:34

#  unset %post
#   set %i 0
#   :debut
#   inc %i
#   set %post %post $+ $did(10,%i).text $+ $crlf
#  
#   if (%i >= $did(10).lines) { goto fin }
#   goto debut
#   :fin

les goto :/
les /set ....

bon reprenons:

  unset %post
   var %i 1 , %n = $did(10).lines
   while (%i <= %n) {
   set %post $+(%post,$did(10,%i).text,$crlf)
   inc %i
}
je declare %n pour évite de revoir rappeler l'identifieur à chaque iteration de la boucle, donc gain de vitesse
c'est plus lisibile, plus rapide et plus optimisé :)
pour ce genre de code utilise plutot un ini:
/help /writeini
/help $readini

 Ajouter un commentaire




Nos sponsors


Appels d'offres

Sondage...

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

 
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 : 0,733 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales