Away / repondeur

Description

Ce code est un system d away rien de plus basic
mais jai rajouter de message away preenregister ( dodo / travail /... )
de plus a cette away jai fait un repondeur pv qui a 2 message diferent ( disponible ou oquper )

Source / Exemple :


[script]
n0=
n1=dialog Away {
n2=  size -1 -1 230 250
n3=  title "B.B.-Away v1.0 By B.B. [Beau Brius]"
n4=  text "Message away :",1, 30 20 100 20
n5=  edit "pola",2, 20 40 180 20,autohs
n6=  text "Nick away :",5, 20 120 60 20
n7=  edit "pola",6, 100 120 80 20,autohs
n8=  text "Nick normale :",7, 20 160 80 20
n9=  edit "pola",8, 100 160 80 20,autohs
n10=  button "Partir",10, 55 200 60 20
n11=  button "exit",12, 55 220 120 20,cancel
n12=  box "",13, 10 10 200 100
n13=  box "",14, 10 110 200 80
n14=} 
n15=
n16=on 1:dialog:away:init:0: {
n17=  did -ra away 2 %mesa
n18=  did -ra away 6 %na
n19=  did -ra away 8 %nr
n20=}
n21=on 1:dialog:away:sclick:10: {
n22=  set %mesa $did(2)
n23=  set %na $did(6)
n24=  set %nr $did(8)
n25=  set %T $time
n26=  /ame 11,1 Est partie en Away [Raison ==  $did(2)  ] [  Il est  $time   ] B.B.-Away par B.B. [Beau Brius]
n27=  /nick $did(6)
n28=}
n29=
n30=dialog configuration {
n31=  size -1 -1 220 260
n32=  title "B.B.-Away(configuration) v1.0 By B.B. [Beau Brius]"
n33=  text "Nick dodo :",1, 20 20 100 20
n34=  edit "pola",2, 20 40 180 20,autohs
n35=  text "Nick ecole :",3, 20 60 100 20
n36=  edit "pola",4, 20 80 180 20,autohs
n37=  text "Nick travail :",5, 20 100 100 20
n38=  edit "pola",6, 20 120 180 20,autohs
n39=  text "Nick douche :",7, 20 140 100 20
n40=  edit "pola",8, 20 160 180 20,autohs
n41=  text "Nick mange :",9, 20 180 100 20
n42=  edit "pola",10, 20 200 180 20,autohs
n43=  button "Ok",11, 20 220 180 20,cancel
n44=}
n45=on 1:dialog:configuration:init:0: {
n46=  did -ra configuration 2 %dodo
n47=  did -ra configuration 4 %ecole
n48=  did -ra configuration 6 %travail
n49=  did -ra configuration 8 %douche
n50=  did -ra configuration 10 %mange
n51=}
n52=on 1:dialog:configuration:sclick:11: {
n53=  set %dodo $did(2)
n54=  set %ecole $did(4)
n55=  set %travail $did(6)
n56=  set %douche $did(8)
n57=  set %mange $did(10)
n58=}
n59=dialog PV {
n60=  size -1 -1 160 140
n61=  title "B.B.-PV v1.0 By B.B. [Beau Bruis]"
n62=  text "Message Normal :",1, 20 20 100 20
n63=  edit "pola",2, 20 40 120 20,autohs
n64=  text "Message Away :",3, 20 60 100 20
n65=  edit "pola",4, 20 80 120 20,autohs
n66=  button "Ok",5, 20 100 120 20,cancel
n67=}
n68=on 1:dialog:pv:init:0: {
n69=  did -ra pv 2 %pvn
n70=  did -ra pv 4 %pva
n71=}
n72=on 1:dialog:pv:sclick:5: {
n73=  set %pvn $did(2)
n74=  set %pva $did(4)
n75=}
n76=on *:text:*:?: {
n77=  if $me == %nr /msg $nick 11,1  %pvn  B.B.-Pv par B.B. [Beau Bruis]
n78=  if £me != %nr /msg $nick 11,1  %pva  [Raison == %mesa ] B.B.-Pv par B.B. [Beau Bruis]
n79=}
n80=menu channel,status,menubar,chat {
n81=  Away
n82=  .Away:/dialog -m away away
n83=  .Configuration:/dialog -m configuration configuration
n84=  .Away predefinits
n85=  ..Dodo:/set %mesa Je suis aller dormir |   set %T $time | /set %nr $me | /ame 11,1 Est partie en Away [ Raison ==  %mesa  ] [  Il est  %t   ] B.B.-Away par B.B. [Beau Brius] | /nick %dodo 
n86=  ..Ecole:/set %mesa Je suis aller a l'ecole |   set %T $time | /set %nr $me | /ame 11,1 Est partie en Away [ Raison ==  %mesa  ] [ Il est  %t  ] B.B.-away par B.B. [Beau Brius] | /nick %ecole
n87=  ..Travail:/set %mesa Je suis aller travailler |   set %T $time | /set %nr $me | /ame 11,1 Est partie en Away [ Raison ==  %mesa  ] [ Il est  %t  ] B.B.-away par B.B. [Beau Bruis] | /nick %travail
n88=  ..Douche:/set %mesa Je suis aller me laver |   set %T $time | /set %nr $me | /ame 11,1 Est partie en Away [ Raison ==  %mesa  ] [ Il est  %t  ] B.B.-Away par B.B. [Beau Brius] | /nick %douche
n89=  ..Mange:/set %mesa Je suis aller me renplire le ventre |   set %T $time | /set %nr $me |/ame 11,1 Est partie en Away [Raison ==  %mesa  ] [ Il est  %t  ] B.B.-Away par B.B. [Beau Brius] | /nick %mange
n90=  .Revenir: if $me == %nr /notice $me 11,1 Tu n'est pas en Away !! | if $me != %nr /ame 11,1 Est  revenus de sont Away [Raison ==  %mesa  ]  [ Il est partie depuis  %t  ] B.B.-Away par B.B. [Beau Brius] | /nick %nr | /unset %mesa | /unset %na | /unset %t
n91=  Pv:/dialog -m pv pv
n92=}

Conclusion :


copier se fichier dans vos remote ou mete le ficher .ini dans le repertoir /mIRC
et charger le grace a /load -rs away-pv.ini
plz je debut dans le scripting et dite moi se que je doi amelioer ........
MERCI

Codes Sources

A voir également

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.