Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

AGENDA - RAPPEL


Information sur la source

Catégorie :Divers Classé sous : agenda, rappel, taches Niveau : Débutant Date de création : 20/10/2007 Date de mise à jour : 20/10/2007 16:43:27 Vu : 2 192

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

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (5)
Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale
Voici ma premiere source , c'est un petit agenda qui rappel a l'ouverture de mirc les taches ou evenements qui se passe sur le jour définit du genre : l'anniversaire d'un proche etc... :) !!!!
 

Source

  • dialog rappel {
  • title "Gestion des Rappel"
  • size -1 -1 180 110
  • option dbu
  • box "( Gestion des Rappel )" 1, 5 4 170 100
  • list 2,15 16 150 10
  • list 3,15 24 150 10
  • list 4,15 32 150 10
  • list 5,15 40 150 10
  • list 6,15 48 150 10
  • list 7,15 56 150 10
  • list 8,15 64 150 10
  • list 9,15 72 150 10
  • list 10,15 80 150 10
  • button "Modifier" 11,68 92 50 10
  • }
  • on *:dialog:rappel:init:*:{
  • did -a rappel 2 %rappel1
  • did -a rappel 3 %rappel2
  • did -a rappel 4 %rappel3
  • did -a rappel 5 %rappel4
  • did -a rappel 6 %rappel5
  • did -a rappel 7 %rappel6
  • did -a rappel 8 %rappel7
  • did -a rappel 9 %rappel8
  • did -a rappel 10 %rappel9
  • }
  • on *:dialog:rappel:sclick:11:{
  • dialog -m modifrappel modifrappel
  • }
  • dialog modifrappel {
  • title "Modification des rappel"
  • size -1 -1 245 46
  • option dbu
  • text "Rappel N°" 1, 5 5 40 10
  • combo 2, 35 3 18 10,drop
  • combo 3, 60 3 50 10,drop
  • text "Le :" 4, 115 5 40 10
  • edit "1" 5,130 3 10 10
  • combo 6,145 3 40 10,drop
  • edit "" 7,192 3 40 10
  • text "Info :" 8, 5 23 20 10
  • edit "" 9,25 23 120 10
  • button "Ok" 10,150 23 50 10
  • }
  • on *:dialog:modifrappel:init:*:{
  • did -a modifrappel 2 1
  • did -a modifrappel 2 2
  • did -a modifrappel 2 3
  • did -a modifrappel 2 4
  • did -a modifrappel 2 5
  • did -a modifrappel 2 6
  • did -a modifrappel 2 7
  • did -a modifrappel 2 8
  • did -a modifrappel 2 9
  • did -a modifrappel 3 Anniversaire
  • did -a modifrappel 3 Reunion
  • did -a modifrappel 3 Rendez-vous
  • did -a modifrappel 3 Autres
  • did -a modifrappel 6 1
  • did -a modifrappel 6 2
  • did -a modifrappel 6 3
  • did -a modifrappel 6 4
  • did -a modifrappel 6 5
  • did -a modifrappel 6 6
  • did -a modifrappel 6 7
  • did -a modifrappel 6 8
  • did -a modifrappel 6 9
  • did -a modifrappel 6 10
  • did -a modifrappel 6 11
  • did -a modifrappel 6 12
  • did -a modifrappel 7 2007
  • }
  • on *:dialog:modifrappel:sclick:10:{
  • set %rappel $+ $did(2) $did(2) $+ . $did(3) le $did(5) $+ / $+ $did(6) $+ / $+ $did(7) $did(9)
  • set %date $+ $did(2) $did(5) $+ : $+ $did(6) $+ : $+ $did(7)
  • dialog -x modifrappel modifrappel
  • }
  • on *:start:{
  • if ($asctime(d:m:yyyy) == %date1) dialog -m alertrappel alertrappel
  • if ($asctime(d:m:yyyy) == %date1) dialog -m alertrappel alertrappel
  • if ($asctime(d:m:yyyy) == %date2) dialog -m alertrappel alertrappel
  • if ($asctime(d:m:yyyy) == %date3) dialog -m alertrappel alertrappel
  • if ($asctime(d:m:yyyy) == %date4) dialog -m alertrappel alertrappel
  • if ($asctime(d:m:yyyy) == %date5) dialog -m alertrappel alertrappel
  • if ($asctime(d:m:yyyy) == %date6) dialog -m alertrappel alertrappel
  • if ($asctime(d:m:yyyy) == %date7) dialog -m alertrappel alertrappel
  • if ($asctime(d:m:yyyy) == %date8) dialog -m alertrappel alertrappel
  • if ($asctime(d:m:yyyy) == %date9) dialog -m alertrappel alertrappel
  • }
  • dialog alertrappel {
  • title "Alert - Rappel"
  • size -1 -1 170 20
  • option dbu
  • text "" 2,18 5 150 10
  • }
  • on *:dialog:alertrappel:init:*:{
  • beep 1
  • if ($asctime(d:m:yyyy) == %date1) did -a alertrappel 2 Rappel : %rappel1
  • if ($asctime(d:m:yyyy) == %date2) did -a alertrappel 2 Rappel : %rappel2
  • if ($asctime(d:m:yyyy) == %date3) did -a alertrappel 2 Rappel : %rappel3
  • if ($asctime(d:m:yyyy) == %date4) did -a alertrappel 2 Rappel : %rappel4
  • if ($asctime(d:m:yyyy) == %date5) did -a alertrappel 2 Rappel : %rappel5
  • if ($asctime(d:m:yyyy) == %date6) did -a alertrappel 2 Rappel : %rappel6
  • if ($asctime(d:m:yyyy) == %date7) did -a alertrappel 2 Rappel : %rappel7
  • if ($asctime(d:m:yyyy) == %date8) did -a alertrappel 2 Rappel : %rappel8
  • if ($asctime(d:m:yyyy) == %date9) did -a alertrappel 2 Rappel : %rappel9
  • }
dialog rappel {
  title "Gestion des Rappel"
  size -1 -1 180 110
  option dbu
  box "( Gestion des Rappel )" 1, 5 4 170 100
  list 2,15 16 150 10
  list 3,15 24 150 10
  list 4,15 32 150 10
  list 5,15 40 150 10
  list 6,15 48 150 10
  list 7,15 56 150 10
  list 8,15 64 150 10
  list 9,15 72 150 10
  list 10,15 80 150 10
  button "Modifier" 11,68 92 50 10
}

on *:dialog:rappel:init:*:{

  did -a rappel 2 %rappel1
  did -a rappel 3 %rappel2
  did -a rappel 4 %rappel3
  did -a rappel 5 %rappel4
  did -a rappel 6 %rappel5
  did -a rappel 7 %rappel6
  did -a rappel 8 %rappel7
  did -a rappel 9 %rappel8
  did -a rappel 10 %rappel9

}

on *:dialog:rappel:sclick:11:{

  dialog -m modifrappel modifrappel

} 


dialog modifrappel {
  title "Modification des rappel"
  size -1 -1 245 46
  option dbu
  text "Rappel N°" 1, 5 5 40 10
  combo 2, 35 3 18 10,drop
  combo 3, 60 3 50 10,drop
  text "Le :" 4, 115 5 40 10
  edit "1" 5,130 3 10 10
  combo 6,145 3 40 10,drop
  edit "" 7,192 3 40 10
  text "Info :" 8, 5 23 20 10
  edit "" 9,25 23 120 10
  button "Ok" 10,150 23 50 10
}

on *:dialog:modifrappel:init:*:{

  did -a modifrappel 2 1
  did -a modifrappel 2 2
  did -a modifrappel 2 3
  did -a modifrappel 2 4
  did -a modifrappel 2 5
  did -a modifrappel 2 6
  did -a modifrappel 2 7
  did -a modifrappel 2 8
  did -a modifrappel 2 9

  did -a modifrappel 3 Anniversaire
  did -a modifrappel 3 Reunion
  did -a modifrappel 3 Rendez-vous
  did -a modifrappel 3 Autres

  did -a modifrappel 6 1
  did -a modifrappel 6 2
  did -a modifrappel 6 3
  did -a modifrappel 6 4
  did -a modifrappel 6 5
  did -a modifrappel 6 6
  did -a modifrappel 6 7
  did -a modifrappel 6 8
  did -a modifrappel 6 9
  did -a modifrappel 6 10
  did -a modifrappel 6 11
  did -a modifrappel 6 12

  did -a modifrappel 7 2007
}

on *:dialog:modifrappel:sclick:10:{

  set %rappel $+ $did(2) $did(2) $+ . $did(3) le $did(5) $+ / $+ $did(6) $+ / $+ $did(7) $did(9)
  set %date $+ $did(2) $did(5) $+ : $+ $did(6) $+ : $+ $did(7)
  dialog -x modifrappel modifrappel

}


on *:start:{ 

  if ($asctime(d:m:yyyy) == %date1) dialog -m alertrappel alertrappel
  if ($asctime(d:m:yyyy) == %date1) dialog -m alertrappel alertrappel
  if ($asctime(d:m:yyyy) == %date2) dialog -m alertrappel alertrappel
  if ($asctime(d:m:yyyy) == %date3) dialog -m alertrappel alertrappel
  if ($asctime(d:m:yyyy) == %date4) dialog -m alertrappel alertrappel 
  if ($asctime(d:m:yyyy) == %date5) dialog -m alertrappel alertrappel 
  if ($asctime(d:m:yyyy) == %date6) dialog -m alertrappel alertrappel
  if ($asctime(d:m:yyyy) == %date7) dialog -m alertrappel alertrappel
  if ($asctime(d:m:yyyy) == %date8) dialog -m alertrappel alertrappel
  if ($asctime(d:m:yyyy) == %date9) dialog -m alertrappel alertrappel


}


dialog alertrappel {
  title "Alert - Rappel"
  size -1 -1 170 20
  option dbu 
  text "" 2,18 5 150 10
}

on *:dialog:alertrappel:init:*:{
  beep 1
  if ($asctime(d:m:yyyy) == %date1) did -a alertrappel 2 Rappel : %rappel1 
  if ($asctime(d:m:yyyy) == %date2) did -a alertrappel 2 Rappel : %rappel2 
  if ($asctime(d:m:yyyy) == %date3) did -a alertrappel 2 Rappel : %rappel3
  if ($asctime(d:m:yyyy) == %date4) did -a alertrappel 2 Rappel : %rappel4 
  if ($asctime(d:m:yyyy) == %date5) did -a alertrappel 2 Rappel : %rappel5 
  if ($asctime(d:m:yyyy) == %date6) did -a alertrappel 2 Rappel : %rappel6 
  if ($asctime(d:m:yyyy) == %date7) did -a alertrappel 2 Rappel : %rappel7 
  if ($asctime(d:m:yyyy) == %date8) did -a alertrappel 2 Rappel : %rappel8 
  if ($asctime(d:m:yyyy) == %date9) did -a alertrappel 2 Rappel : %rappel9 

}

Conclusion

Il y a certe encore de petites ameliorations a faire , je ferais d'ici quelque jour une mise a jour de la source ^^ !!!
 

Historique

20 octobre 2007 16:43:27 :
suppression d'une ligne qui plantai :)

Commentaires et avis

signaler à un administrateur
Commentaire de uaip le 21/10/2007 00:56:48 7/10

mouai, pas bête l'idée.
pense cependant a regrouper certains trucs comme les events dialog
on *:dialog:rappel:*:*:{
  if ($devent == ini) { ... }
  if ($devent == sclick) && ($did == 11) {... }
}
etc...
et puis, je vois pas trop l'utilité des 9 listes, là...
par contre, un truc plus important :
de ca :

did -a modifrappel 2 1
did -a modifrappel 2 2
did -a modifrappel 2 3
did -a modifrappel 2 4
did -a modifrappel 2 5
did -a modifrappel 2 6
did -a modifrappel 2 7
did -a modifrappel 2 8
did -a modifrappel 2 9


did -a modifrappel 6 1
did -a modifrappel 6 2
did -a modifrappel 6 3
did -a modifrappel 6 4
did -a modifrappel 6 5
did -a modifrappel 6 6
did -a modifrappel 6 7
did -a modifrappel 6 8
did -a modifrappel 6 9
did -a modifrappel 6 10
did -a modifrappel 6 11
did -a modifrappel 6 12

tu peux passer a ca :

var %a 1 | while (%a <= 9) { did -a modifrappel 2 %a | inc %a }
var %a 1 | while (%a <= 12) { did -a modifrappel 6 %a | inc %a }

c'est quand même mieux, non ?
voila voila, et pense aussi à corriger les fautes, ca fait mauvaise impression dans un code (tu dis "des rappel" à 2 reprises)

signaler à un administrateur
Commentaire de RCA ArKanis le 21/10/2007 12:11:59

7/10 ? eh ben, t'es généreux je trouve :x

pense à utiliser des boucles ... ton code s'en retrouvera réduit à 15% de sa taille actuelle

au lieu d'utiliser des variables %date, utilise des fichiers .ini, c'est largement mieux pour stocker des infos

Pas très utile en soit, vu que trop limité ... 9 évènements seulement :(

regroupe tes évènements ON DIALOG :
on *:dialog:<le nom de la boîte de dialogue>:*:*:{
  if ($devent == init) {
    ...
  }
  elseif ($devent == sclick) {
    if ($did == 1) { ... }
    ...
  }
}

signaler à un administrateur
Commentaire de uaip le 21/10/2007 12:16:42

Doudis, Arakanis n'ayant [surement :p] pas lu mon post et ayant dit la même chose, ca renforce l'idée que c'est important de changer ces détails...
Arakanis, bah euh.. ué, jai mis 7 pour motiver (c'est plus gréable que de recevoir des 3 ou 4 pour une premiere source) et puis c'est deja mieux ca que la commande ping de minerbe =P

signaler à un administrateur
Commentaire de RCA ArKanis le 21/10/2007 12:21:29

j'avais juste pas vu le truc des dialogues :D

l'histoire des boucles prend tellement de place que je n'ai vu que ça :p

signaler à un administrateur
Commentaire de wims le 22/10/2007 19:40:32

ça n'a aucun interet de donné un 7/10 pour motivé, parce que un type qui fait dla merde et qui débute, si tu lui met des 7/10 tout le temps, forcément il va pas s'amélioré (et donc, il continura a faire des trucs déja vu, pour pas dire nul), t'es pas obligé de mettre une note, tu peux juste lui dire ce qui va pas + ton opignion, ça suffit, parce que là, c'est vrai que c'est pas original, mal codé, et surtout très "peu".
En ce moment, il y a une tel volonté de posté chez les nouveaux scripteurs, il faut pas poster pour poster, ce que vous posté doit avoir un interet quelconque.Il y en a ici qui post des trucs déja vu assez "merdique", et qui font la une du site a chaque fois pdt une semaine alors que ya des codes qui sont "mortel" comparé a ceux là et dont personne ne parle.

Vous ne faites pas les codes pour les autres, donc ne venez pas posté un auto-join juste pour dire c'est moi qui l'est fait..

Si j'écris plus ça va faire coup de geule (:

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Comment Mettre mIRC en un petit icone dans la barre des taches ? [ par Yann1213 ] Bonsoir,J'avais une petite quesion a vous poser, est-ce possible de mettre la fenetre mIRC en un petit icone en bas a droite au lieu que sa soit au mi Faire clignoter icone dans barre des taches [ par ranny ] Salut,existe t-il une commande qui permet de faire clignoter l'icone dans la barre des taches lors d'une remote ? agenda de groupe distribué en RMI [ par imenetrabelsi ] je cherche un code source en rmi d'une agenda de groupe distribué sur internet


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version

Photothèque Nouveau !



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
Temps d'éxécution de la page : 0,390 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.