BalkanIRC

Would you like to react to this message? Create an account in a few clicks or log in to continue.

Srecne Novogodisnje i Bozicne praznike zeli Vam BalkanIRC Forum :)


    Away System v.2 by $me and Dark-Master

    Zika023
    Zika023
    Super Admin
    Super Admin


    Number of posts : 1456
    Age : 29
    Локација : Melenci
    Registration date : 2008-09-20

    Away System v.2 by $me and Dark-Master Empty Away System v.2 by $me and Dark-Master

    Post by Zika023 Sat Sep 27, 2008 9:25 pm

    Code:
    alias awaysystem2 { dialog -m away away }
    dialog away {
      title "Away System"
      size -1 -1 149 47
      option dbu
      box "", 1, 2 -1 145 34
      edit "", 2, 38 18 107 10
      edit "", 3, 38 6 107 10
      text "Away nick:", 4, 4 7 34 8, center
      text "Away reason:", 5, 4 19 34 8, center
      button "Away", 6, 2 34 37 12
      button "Back", 7, 110 34 37 12
      text "Web-Master", 8, 39 36 71 8, disable center
    }
    on 1:dialog:away:init:0:{
      if ($away == $true) { did -b $dname 2,3,6 }
      else { did -b $dname 7 }
      did -a $dname 2 %away.re
      did -a $dname 3 %away.ni
    }
    on 1:DIALOG:away:edit:2:{
      .set %away.re $did(away,2).text
    }
    on 1:DIALOG:away:edit:3:{
      .set %away.ni $did(away,3).text
    }
    on 1:dialog:away:sclick:*:{
    if ($did == 6) { .away %away.re | .set %away.old.ni $me | .nick %away.ni | did -b $dname 2,3,6 | did -e $dname 7 }
    if ($did == 7) { .away | .nick %away.old.ni | did -e $dname 2,3,6 | .did -b $dname 7 }
    }
    }

      Current date/time is Fri Apr 19, 2024 4:16 pm