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 / Exemple :
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 ^^ !!!
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.