i made this script in about 45 mins. tested it all. works great and as far as i know it is bug free.
paste into remotes, right click then Invite or type /dialog -m ind ind
FEATURES
you can invite people faster.
a join greet.
optional invite reason.
optional channel rules.
if you have any ideas tell me.
dialog IND {
title "Invite Dialog"
size -1 -1 93 79
option dbu
button "Invite", 1, 2 2 37 10
edit "", 2, 41 2 50 10
edit "", 3, 41 16 49 10, read
button "Set Room", 4, 2 16 37 10
box "Reason For Invite", 5, 1 28 91 21
edit "", 6, 3 36 87 10, autohs
box "Channel Rules", 7, 1 49 91 29
edit "", 8, 4 57 85 10, autohs
text "Please Seperate By Commas", 9, 5 68 83 8, center
}
on *:dialog:ind:init:*:{
did -ra ind 3 %iroom
did -ra ind 8 %irules
}
on *:dialog:ind:sclick:1:{
if (did == 1) {
if (!$did(2).text || set %inick $did(2).text)
}
else {
set %inick $did(2).text
did -ra ind 2 %inick
}
if (did == 1) {
if (!$did(6).text || set %ireason $did(6).text)
}
else {
set %ireason $did(6).text
notice %inick %ireason
invite %inick %iroom
}
if (did == 1) {
if (!$did(8).text || set %irules $did(8).text)
}
else {
set %irules $did(8).text
notice %inick The Rules Of $chan: %irules
}
}
on *:dialog:ind:sclick:4:{
set %iroom $$?="Set the invite room to?"
did -ra ind 3 %iroom
}
on *:join:%iroom:{
msg %iroom Hello %inick . Thanks for joining %iroom
}
menu * {
.Invite: dialog -m ind ind
}