امر اوتو انفايت
dialog auto.invite {
title "أوتـــــــــو أنفــايت للسكــربت"
size -1 -1 110 55
option dbu
box "Sad4EvEr Script v.3",1,3 5 72 34
radio "On", 2, 55 12 18 10, gruop
radio "Off", 3, 55 25 18 10,
button "تشغيل", 4, 80 11 23 12, ok
button "خروج", 5, 80 24 23 12, cancel
text "",6,7 19 43 10
box "",7,76 5 32 34
text "Sad4EvEr Script v.3", 8, 53 0 52 8 ,disable
}
on *:dialog:auto.invite:init:*: {
if (%invite1 == on) { did -c $dname 2 }
if (%invite == off) { did -c $dname 3 }
}
on *:dialog:auto.invite:sclick:*:{
if ($did == 4) {
if ( $did(2).state ) { .enable #invite | .disable #inviterst | set %invite on | echo 2›7›2›7$active Auto Invite Is 2On
}
elseif ($did(3).state) { .disable #invite | .enable #inviterst | set %invite off | echo 2›7›2›7$active Auto Invite Is 2Off
}
}
}
#invite off
on 1:join:#:/.notice $nick $read $mIRCdirscripting\script.txt
#invite end
dialog connect {
title "Server Connections"
size -1 -1 270 235
button "اغلاق",7, 25 203 85 20, cancel default
text "اكتب اسم السيرفر:", 8, 14 25 110 20
list 2, 130 25 120 200, sort
edit "", 3, 11 45 114 20, autohs
box "السيرفرات",1, 6 3 260 225
button "وضع",4, 25 70 85 20
button "مسح",5, 25 110 85 20
button "مسح الكل",22, 25 130 85 20
button "اضغط لتشبك",6, 25 159 85 35
button "اختار",99, 25 90 85 20
}
on 1:dialog:connect:init:0: {
set %servercount 0
:loopster
inc %servercount 1
if (%server [ $+ [ %servercount ] ] == $null) { goto loop2 }
if (%server [ $+ [ %servercount ] ] != $null) { did -a connect 2 %server [ $+ [ %servercount ] ] }
goto loopster
:loop2
did -f connect 3
}
on 1:dialog:connect:sclick:*: {
if ($did == 4) {
if ($did(3)) { did -a connect 2 $ifmatch | did -r $dname 3 }
else { dialog -m error1 error1 }
}
if ($did == 2) {
did -ra $dname 3 $did(connect,2,$did(connect,2).sel).text
}
if ($did == 22) { unset %server* | did -r connect 2 }
if ($did == 5) {
if ($did(2,$did(2).sel).text) { did -d connect 2 $did(2).sel }
else { dialog -m error2 error2 }
}
if ($did == 99) {
did -d connect 2 $did(2).sel
unset %server [ $+ [ $did($dname,2).sel ] ]
set %server [ $+ [ $did($dname,2).sel ] ] $did(3).text
did -a connect 2 $did(3).text | did -r $dname 3
}
if ($did == 6) {
if ($did(2,$did(2).sel).text) {
.set %temp.server $did(2,$did(2).sel).text | .server %temp.server }
else { dialog -m error2 error2 }
}
if ($did == 7) {
set %server1 $did(connect,2,1)
set %server2 $did(connect,2,2)
set %server3 $did(connect,2,3)
set %server4 $did(connect,2,4)
set %server5 $did(connect,2,5)
set %server6 $did(connect,2,6)
set %server7 $did(connect,2,7)
set %server8 $did(connect,2,8)
set %server9 $did(connect,2,9)
set %server10 $did(connect,2,10)
set %server11 $did(connect,2,11)
set %server12 $did(connect,2,12)
set %server13 $did(connect,2,13)
set %server14 $did(connect,2,14)
set %server15 $did(connect,2,15)
set %server16 $did(connect,2,16)
set %server17 $did(connect,2,17)
set %server18 $did(connect,2,18)
set %server19 $did(connect,2,19)
set %server20 $did(connect,2,20)
}
}
alias connect2 {
if ($dialog(connect) == $null) {
dialog -mn connect connect
}
else {
dialog -c connect connect
}
}
ويعدها تحط هذا في popups السكربت
-
««اوتو انفايت للسكربت»»:/dialog -m auto.invite auto.invite
-
dialog auto.invite {
title "أوتـــــــــو أنفــايت للسكــربت"
size -1 -1 110 55
option dbu
box "Sad4EvEr Script v.3",1,3 5 72 34
radio "On", 2, 55 12 18 10, gruop
radio "Off", 3, 55 25 18 10,
button "تشغيل", 4, 80 11 23 12, ok
button "خروج", 5, 80 24 23 12, cancel
text "",6,7 19 43 10
box "",7,76 5 32 34
text "Sad4EvEr Script v.3", 8, 53 0 52 8 ,disable
}
on *:dialog:auto.invite:init:*: {
if (%invite1 == on) { did -c $dname 2 }
if (%invite == off) { did -c $dname 3 }
}
on *:dialog:auto.invite:sclick:*:{
if ($did == 4) {
if ( $did(2).state ) { .enable #invite | .disable #inviterst | set %invite on | echo 2›7›2›7$active Auto Invite Is 2On
}
elseif ($did(3).state) { .disable #invite | .enable #inviterst | set %invite off | echo 2›7›2›7$active Auto Invite Is 2Off
}
}
}
#invite off
on 1:join:#:/.notice $nick $read $mIRCdirscripting\script.txt
#invite end
dialog connect {
title "Server Connections"
size -1 -1 270 235
button "اغلاق",7, 25 203 85 20, cancel default
text "اكتب اسم السيرفر:", 8, 14 25 110 20
list 2, 130 25 120 200, sort
edit "", 3, 11 45 114 20, autohs
box "السيرفرات",1, 6 3 260 225
button "وضع",4, 25 70 85 20
button "مسح",5, 25 110 85 20
button "مسح الكل",22, 25 130 85 20
button "اضغط لتشبك",6, 25 159 85 35
button "اختار",99, 25 90 85 20
}
on 1:dialog:connect:init:0: {
set %servercount 0
:loopster
inc %servercount 1
if (%server [ $+ [ %servercount ] ] == $null) { goto loop2 }
if (%server [ $+ [ %servercount ] ] != $null) { did -a connect 2 %server [ $+ [ %servercount ] ] }
goto loopster
:loop2
did -f connect 3
}
on 1:dialog:connect:sclick:*: {
if ($did == 4) {
if ($did(3)) { did -a connect 2 $ifmatch | did -r $dname 3 }
else { dialog -m error1 error1 }
}
if ($did == 2) {
did -ra $dname 3 $did(connect,2,$did(connect,2).sel).text
}
if ($did == 22) { unset %server* | did -r connect 2 }
if ($did == 5) {
if ($did(2,$did(2).sel).text) { did -d connect 2 $did(2).sel }
else { dialog -m error2 error2 }
}
if ($did == 99) {
did -d connect 2 $did(2).sel
unset %server [ $+ [ $did($dname,2).sel ] ]
set %server [ $+ [ $did($dname,2).sel ] ] $did(3).text
did -a connect 2 $did(3).text | did -r $dname 3
}
if ($did == 6) {
if ($did(2,$did(2).sel).text) {
.set %temp.server $did(2,$did(2).sel).text | .server %temp.server }
else { dialog -m error2 error2 }
}
if ($did == 7) {
set %server1 $did(connect,2,1)
set %server2 $did(connect,2,2)
set %server3 $did(connect,2,3)
set %server4 $did(connect,2,4)
set %server5 $did(connect,2,5)
set %server6 $did(connect,2,6)
set %server7 $did(connect,2,7)
set %server8 $did(connect,2,8)
set %server9 $did(connect,2,9)
set %server10 $did(connect,2,10)
set %server11 $did(connect,2,11)
set %server12 $did(connect,2,12)
set %server13 $did(connect,2,13)
set %server14 $did(connect,2,14)
set %server15 $did(connect,2,15)
set %server16 $did(connect,2,16)
set %server17 $did(connect,2,17)
set %server18 $did(connect,2,18)
set %server19 $did(connect,2,19)
set %server20 $did(connect,2,20)
}
}
alias connect2 {
if ($dialog(connect) == $null) {
dialog -mn connect connect
}
else {
dialog -c connect connect
}
}
ويعدها تحط هذا في popups السكربت
-
««اوتو انفايت للسكربت»»:/dialog -m auto.invite auto.invite
-
تعليق