Accueil > > > PSEUDO CHOOSER EN DIALOG
PSEUDO CHOOSER EN DIALOG
Information sur la source
Description
possibilité de choisir ses pseudos ,supporte un nombre infini de pseudo ,en dialog,avec un mode away
Source
- ;codé par _NicX_
- menu menubar,channel {
- [Pseudo ManageR](f2):dialog -mr pseudo pseudo
- }
-
- dialog pseudo {
- title "Pseudo Manager"
- size -1 -1 150 227
- option dbu
- box "Pseudo Actuel", 2, 1 2 147 23
- edit "", 3, 4 10 48 10, read center
- list 5, 4 34 69 140, size hsbar vsbar
- box "", 6, 76 32 72 66
- button "Ajouter", 7, 78 37 68 19
- button "Supprimer", 8, 78 57 68 19
- button "Prendre ce pseudo", 12, 78 77 68 19
- box "", 13, 1 24 148 152
- edit %awayraison, 17, 2 196 145 10
- text "Message", 18, 59 186 32 8, center
- box "aWay Mode", 19, 1 179 148 47
- button "Fermer", 20, 118 159 28 14, ok
- button "On", 15, 57 208 17 10
- button "Off", 16, 75 208 17 10
- edit "", 1, 89 10 57 10, read
- text "Network", 4, 62 11 25 8, center
- text "état", 9, 3 216 18 8, center
- edit "", 10, 22 215 21 9
- }
-
-
-
-
- on *:dialog:pseudo:init:0: { /did -r pseudo 3 | /did -a pseudo 3 $me | loadbuf 1-150 -o pseudo 5 Pseudos.jcvd | did -r pseudo 1 | did -a pseudo 1 $network
- if (%awayt == on ) { did -r pseudo 10 | did -a pseudo 10 %awayt }
- if (%awayt == off) { did -r pseudo 10 | did -a pseudo 10 %awayt }
- }
-
- on *:dialog:pseudo:sclick:7: { Pseudajout }
- on *:dialog:pseudo:sclick:8: { PSeudel }
- on *:dialog:pseudo:sclick:12: { PPseudo }
- on *:dialog:pseudo:sclick:15: { set %awayt on | /set %awayraison $did(pseudo,17) | apseudo | did -r pseudo 10 | did -a pseudo 10 %awayt | /set % $+ $network $+ away $network | enable #autopen }
- on *:dialog:pseudo:sclick:16: { set %awayt off | did -r pseudo 10 | did -a pseudo 10 %awayt | bpseudo | /set % $+ $network $+ away $network | disable #autopen }
- on *:dialog:pseudo:dclick:5: { dpseudo }
-
- alias pseudajout {
- set %pseudajout $$?="Entre le Pseudo"
- if (%pseudajout == $null) { echo -a Tu n'as pas entré de pseudo }
- else {
- /did -a pseudo 5 %pseudajout
- /write Pseudos.jcvd %pseudajout
- unset %pseudajout
- }
- }
-
- alias pseudel {
- /set %pseudel $did(5).sel
- if (%pseudel == $null) { echo -a Tu n'as pas séléctionné de texte }
- else {
- /echo -a Le pseudo $did(5,$did(5).sel).text a bien été effacé
- /did -d pseudo 5 %pseudel
- /write -dw"* $+ $did(5,$did(5).sel).text $+ *" pseudos.jcvd
- unset %pseudel
- }
- }
-
- alias ppseudo {
- /set %ppseudo $did(5).seltext
- /nick %ppseudo
- unset %ppseudo
- }
-
- alias dpseudo {
- /set %dpseudo $did(5).seltext
- /nick %dpseudo
- unset %dpseudo
- }
-
- alias pseudow {
- /write pseudos.jcvd %epseudo
- /write pseudos.jcvd %epseudo $+ `[EaT]
- /write pseudos.jcvd %epseudo $+ `[Play]
- /write pseudos.jcvd %epseudo $+ `[DoDo]
- /write pseudos.jcvd %epseudo $+ `[aW]
- /write pseudos.jcvd %epseudo $+ `[AbsenT]
- /write pseudos.jcvd %epseudo $+ `[TV]
- }
-
-
- alias apseudo {
- /ame 7,1 (.AwAy Mode : 4,1Activé 7,1 .) (.Raison : 4,1 %awayraison 7,1 .) (.Heure : 4,1 $time 7,1 .) | /away (.AwAy Mode : 4,1Désactivé 7,1 .) (.Raison : 4,1 %awayraison 7,1 .) (.Heure : 4,1 $time 7,1 .)
-
- }
-
- alias bpseudo {
- /ame 7,1 (.AwAy Mode : 4,1Désactivé 7,1 .) (.Raison : 4,1 %awayraison 7,1 .) (.Heure : 4,1 $time 7,1 .) | away
- }
-
- on *:quit: {
- set %awayt off
- }
-
- #autopen off
-
- on *:open:?:*: { msg $nick 7,1 (.AwAy Mode : 4,1Activé 7,1 .) (.Raison : 4,1 %awayraison 7,1 .) (.Heure : 4,1 $time 7,1 .) | /away (.AwAy Mode : 4,1Désactivé 7,1 .) (.Raison : 4,1 %awayraison 7,1 .) (.Heure : 4,1 $time 7,1 .) }
-
- #autopen end
;codé par _NicX_
menu menubar,channel {
[Pseudo ManageR](f2):dialog -mr pseudo pseudo
}
dialog pseudo {
title "Pseudo Manager"
size -1 -1 150 227
option dbu
box "Pseudo Actuel", 2, 1 2 147 23
edit "", 3, 4 10 48 10, read center
list 5, 4 34 69 140, size hsbar vsbar
box "", 6, 76 32 72 66
button "Ajouter", 7, 78 37 68 19
button "Supprimer", 8, 78 57 68 19
button "Prendre ce pseudo", 12, 78 77 68 19
box "", 13, 1 24 148 152
edit %awayraison, 17, 2 196 145 10
text "Message", 18, 59 186 32 8, center
box "aWay Mode", 19, 1 179 148 47
button "Fermer", 20, 118 159 28 14, ok
button "On", 15, 57 208 17 10
button "Off", 16, 75 208 17 10
edit "", 1, 89 10 57 10, read
text "Network", 4, 62 11 25 8, center
text "état", 9, 3 216 18 8, center
edit "", 10, 22 215 21 9
}
on *:dialog:pseudo:init:0: { /did -r pseudo 3 | /did -a pseudo 3 $me | loadbuf 1-150 -o pseudo 5 Pseudos.jcvd | did -r pseudo 1 | did -a pseudo 1 $network
if (%awayt == on ) { did -r pseudo 10 | did -a pseudo 10 %awayt }
if (%awayt == off) { did -r pseudo 10 | did -a pseudo 10 %awayt }
}
on *:dialog:pseudo:sclick:7: { Pseudajout }
on *:dialog:pseudo:sclick:8: { PSeudel }
on *:dialog:pseudo:sclick:12: { PPseudo }
on *:dialog:pseudo:sclick:15: { set %awayt on | /set %awayraison $did(pseudo,17) | apseudo | did -r pseudo 10 | did -a pseudo 10 %awayt | /set % $+ $network $+ away $network | enable #autopen }
on *:dialog:pseudo:sclick:16: { set %awayt off | did -r pseudo 10 | did -a pseudo 10 %awayt | bpseudo | /set % $+ $network $+ away $network | disable #autopen }
on *:dialog:pseudo:dclick:5: { dpseudo }
alias pseudajout {
set %pseudajout $$?="Entre le Pseudo"
if (%pseudajout == $null) { echo -a Tu n'as pas entré de pseudo }
else {
/did -a pseudo 5 %pseudajout
/write Pseudos.jcvd %pseudajout
unset %pseudajout
}
}
alias pseudel {
/set %pseudel $did(5).sel
if (%pseudel == $null) { echo -a Tu n'as pas séléctionné de texte }
else {
/echo -a Le pseudo $did(5,$did(5).sel).text a bien été effacé
/did -d pseudo 5 %pseudel
/write -dw"* $+ $did(5,$did(5).sel).text $+ *" pseudos.jcvd
unset %pseudel
}
}
alias ppseudo {
/set %ppseudo $did(5).seltext
/nick %ppseudo
unset %ppseudo
}
alias dpseudo {
/set %dpseudo $did(5).seltext
/nick %dpseudo
unset %dpseudo
}
alias pseudow {
/write pseudos.jcvd %epseudo
/write pseudos.jcvd %epseudo $+ `[EaT]
/write pseudos.jcvd %epseudo $+ `[Play]
/write pseudos.jcvd %epseudo $+ `[DoDo]
/write pseudos.jcvd %epseudo $+ `[aW]
/write pseudos.jcvd %epseudo $+ `[AbsenT]
/write pseudos.jcvd %epseudo $+ `[TV]
}
alias apseudo {
/ame 7,1 (.AwAy Mode : 4,1Activé 7,1 .) (.Raison : 4,1 %awayraison 7,1 .) (.Heure : 4,1 $time 7,1 .) | /away (.AwAy Mode : 4,1Désactivé 7,1 .) (.Raison : 4,1 %awayraison 7,1 .) (.Heure : 4,1 $time 7,1 .)
}
alias bpseudo {
/ame 7,1 (.AwAy Mode : 4,1Désactivé 7,1 .) (.Raison : 4,1 %awayraison 7,1 .) (.Heure : 4,1 $time 7,1 .) | away
}
on *:quit: {
set %awayt off
}
#autopen off
on *:open:?:*: { msg $nick 7,1 (.AwAy Mode : 4,1Activé 7,1 .) (.Raison : 4,1 %awayraison 7,1 .) (.Heure : 4,1 $time 7,1 .) | /away (.AwAy Mode : 4,1Désactivé 7,1 .) (.Raison : 4,1 %awayraison 7,1 .) (.Heure : 4,1 $time 7,1 .) }
#autopen end
Sources du même auteur
Sources de la même categorie
Commentaires et avis
|
Derniers Blogs
L'INTERFACE NATURELLE DE WINDOWS PHONE 7 SERIESL'INTERFACE NATURELLE DE WINDOWS PHONE 7 SERIES par odewit
La tendance est aux interfaces naturelles (NUI), et le keynote de Bill Buxton au MIX l'a bien souligné.
La charte graphique et ergonomique de Windows Phone 7 a donc été entièrement repensée en vue d'obtenir un maximum d'efficacité sur ce point. En re...
Cliquez pour lire la suite de l'article par odewit COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE?COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE? par Matthieu MEZIL
Avec EF, les vues doivent être mappées sur des entity types. Le problème c'est que les entity types doivent avoir une clé. Avec EF, nous avons les complex type qui n'ont pas de clé mais les vues ne peuvent pas être mappées dessus. Avec EF4, il est possibl...
Cliquez pour lire la suite de l'article par Matthieu MEZIL [WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL?[WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL? par JeremyJeanson
Certain d'entre vous on peut être vécu cette situation embarrassante après quelques temps passer avec WF4 : Au début avec mon " ActivityDesigner" , tout allait bien. Et puis un jour j'ai au des problèmes de " Binding" . Alors nous sommes allé sur le site ...
Cliquez pour lire la suite de l'article par JeremyJeanson
Logiciels
Academy System (10.9.4.0)ACADEMY SYSTEM (10.9.4.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Xilisoft Convertisseur Vidéo Ultimate (5.1.39.0305)XILISOFT CONVERTISSEUR VIDéO ULTIMATE (5.1.39.0305)Xilisoft Convertisseur Vidéo Ultimate est un outil puissant de conversion vidéo, facile à utilise... Cliquez pour télécharger Xilisoft Convertisseur Vidéo Ultimate Xilisoft DVD Ripper Ultimate (5.0.64.0304)XILISOFT DVD RIPPER ULTIMATE (5.0.64.0304)Xilisoft DVD Ripper Ultimate est un logiciel excellent pour copier et convertir DVD vers presque ... Cliquez pour télécharger Xilisoft DVD Ripper Ultimate Rigs of Rods (63.3)RIGS OF RODS (63.3)c'est un jeu de multi-simulation camions,autobus voitures, avions, bateaux, hélicoptère avec défo... Cliquez pour télécharger Rigs of Rods
|