Zika023- Super Admin
- Number of posts : 1456
Age : 29
Локација : Melenci
Registration date : 2008-09-20
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 }
}
}