Fixed 3 bugs
1. the editboxs were not working
2. reset buttin
3 added the if (O isincs $usermode) { credit _Teen_
menu popups,channel {
[-]Pm Blocker[-]:/dialog -m pm_Blocker pm_blocker
}
dialog PM_Blocker {
title "PM Blocker"
size -1 -1 173 60
option dbu
text " H3x-iRc p2p clicker and p2p killer", 1, 8 3 142 8
button "on", 2, 17 27 18 12
button "Off", 3, 17 41 18 12
box "p2p blocker", 4, 4 18 47 38
button "on", 5, 66 27 20 12
button "Off", 6, 66 41 20 12
box "p2p kill", 7, 54 18 45 38
edit "", 8, 152 20 19 10
text " Pm Blocked", 9, 114 21 35 8
edit "", 10, 152 32 19 10
text " People Killed", 11, 114 32 36 8
button "Reset Stats", 12, 108 44 38 12
box "Stats and Reset", 13, 107 11 66 46
button "Ok", 14, 150 44 20 12, ok
}
on *:dialog:pm_blocker:init:*: {
did -ra $dname 8 %pm.blocker
did -ra $dname 10 %pm.kill
}
on *:Dialog:PM_Blocker:Sclick:2: {
.enable #p2pblocker
$did 8 %pm.blocked
amsg 7,1I 7,1A 15,1m 7,1N 15,1ow 7,1B 15,1locking 7,1A 15,1ll 7,1P 15,1M 7,1' 15,1s 7,1.
}
on *:Dialog:PM_Blocker:Sclick:3: {
.disable #p2pblocker
amsg 7,1I 7,1A 15,1m 7,1N 15,1ow 7,1A 15,1ccepting 7,1P 15,1M 7,1' 15,1s 7,1.
}
on *:Dialog:PM_Blocker:Sclick:5: {
.enable #p2pkill
amsg 7,1P 15,1M 7,1K 15,1iller 7,1I 15,1s 7,1N 15,1ow 7,1O 15,1n 7,1.
}
on *:Dialog:PM_Blocker:Sclick:6: {
.disable #p2pkill
amsg 7,1P 15,1M 7,1K 15,1iller 7,1I 15,1s 7,1N 15,1ow 7,1O 15,1ff 7,1.
}
on *:Dialog:PM_Blocker:Sclick:12: {
Set %pm.kill 0
Set %pm.blocker 0
did -ra $dname 8 %pm.blocker
did -ra $dname 10 %pm.kill
}
#p2pblocker on
on *:text:*:?:{
inc %pm.blocker 1
closemsg $nick
msg $nick 7,1Sorry $nick im not Accepting pms at this time.
}
#p2pblocker end
#p2pkill off
on *:text:*:?:{
if (O isincs $usermode) {
inc %pm.kill 1
closemsg $nick
kill $nick 7,1P 15,1m 7,1K 15,1ill 7,1I 15,1s 7,1O 15,1o
}
}
#p2pkill end
No comments:
Post a Comment