this aop list working on VXSScripT V1.0 Classic Version
now i working on VXS Version 2
anyway. i fixed this list to work on buzzen i made this code b4 in 2005 and after msn closed worked with myfhn chat myfhn closed fixed to work on buzzen chat with help from mr err0r thnx man,
now this list some times work some times not working
if can coders give me way and help me To issue a new script VXS2
THNX
#portlist off on *:KICK:#:{ if ($nick($chan,$me,' .)) { if ($nick == $me) halt if ($nick == %botnick) halt if ($readini(data\gaop.ini,global,$ial($nick).addr) != $null) halt if ($readini(data\gaop.ini,#,$ial($nick).addr) != $null) halt if ($readini(data\gaop.ini,#,$ial($knick).addr) != $null) && ($nick($chan,$me,' .)) && ($ial($nick).addr != SND) { sockwrite -n $sockfind($chan) access # clear | sockwrite -n $sockfind($chan) access # add deny $address($nick,1) 0 : kicked protected user $knick | sockwrite -n $sockfind($chan) kick $chan $nick 1,12Protected-user-in-my-GlObaL $+ $knick | sockwrite -n $sockfind($chan) PROP # OWNERKEY $randgen | sockwrite -n $sockfind($chan) PROP # HOSTKEY $randgen | sockwrite -n $sockfind($chan) mode # +q $me } if ($readini(data\gaop.ini,global,$ial($knick).addr) != $null) && ($nick($chan,$me,' .)) && ($ial($nick).addr != SND) { sockwrite -n $sockfind($chan) access # clear | sockwrite -n $sockfind($chan) access # add deny $address($nick,1) 0 : kicked protected user $knick | sockwrite -n $sockfind($chan) kick $chan $nick 1,12Protected-user-in-my-GlObaL $+ $knick | sockwrite -n $sockfind($chan) PROP # OWNERKEY $randgen | sockwrite -n $sockfind($chan) PROP # HOSTKEY $randgen | sockwrite -n $sockfind($chan) mode # +q $me } } } #portlist end #safelist off on *:owner:*: { if ($nick != $me) && ($nick($chan,$me,' .)) && ($ial($opnick).addr != SND) && ($data\readini(antiaop.txt,noq,#) == Active) && ($opnick != $me) && ($opnick != %botnick) { if ($readini(data\gaop.ini,global,$ial($opnick).addr) != $null) || ($readini(data\gaop.ini,#,$ial($opnick).addr) != $null) { if (!%nickflood+q. [ $+ [ # ] ]) { msg $chan $ial($opnick) 1,12Allowed Gate for Access 8+q inc -u5 %nickflood+q. [ $+ [ # ] ] } } else { if (!%nickflood+q. [ $+ [ # ] ]) { sockwrite -n $sockfind($chan) access # clear owner sockwrite -n $sockfind($chan) kick # $opnick : 1,12Gate Not Allowed For Access +q sockwrite -n $sockfind($chan) access # add deny $address($opnick,1) sockwrite -n $sockfind($chan) access # add owner $gettok($ial($me),2,33) : %tag sockwrite -n $sockfind($chan) prop # ownerkey $randgen sockwrite -n $sockfind($chan) PROP # HOSTKEY $randgen msg $chan $ial($opnick) 1,12Gate NOT Allowed For Access +q inc -u5 %nickflood+q. [ $+ [ # ] ] } } } } #safelist end #global off ;global q unhalted on *:text:+q:*:{ $iif($me ison #, (!$readini(data\gaop.ini,ghalted,$chan)) { if ($nick($chan,$nick,' .)) { goto end | msg # 1,12 $+ $nick Ur Aready +Q } $iif($me ison #,($nick($chan,$me,' .)) && (!%qtxtfp) && ($readini(data\gaop.ini,global,$ial($nick).addr) != $null) { mode $chan +q+v $nick $nick | .set -u2 %qtxtfp 1 } } ;global q halted if ($readini(data\gaop.ini,ghalted,$chan)) { if ($nick($chan,$me,' .)) && (!%qtxtfp) && ($readini(data\gaop.ini,global,$ial($nick).addr) != $null) { /msg # 4G12l4O12b4a12L4 8+Q $nick $+ 12F4o12U4n12D4 12A4s : $+ 12 $readini(gaop.ini,global,$ial($nick).addr) 8 :12Halted | access # add voice $ial($nick).addr | mode # +v $nick | .set -u2 %qtxtfp 1 | halt } } ;local q unhalted if (!$readini(data\gaop.ini,lhalted,#)) { if ($nick($chan,$nick,' .)) { goto end | msg # 1,12 $+ $nick Ur Aready +Q } if ($nick($chan,$me,' .)) && (!%qtxtfp) && ($readini(data\gaop.ini,#,$ial($nick).addr) != $null) { mode # +qv $nick $nick | .set -u2 %qtxtfp 1 | halt } } ;local q halted if ($readini(data\gaop.ini,lhalted,#)) { if ($nick($chan,$me,' .)) && (!%qtxtfp) && ($readini(data\gaop.ini,#,$ial($nick).addr) != $null) { /msg # 12L4o12C4a12L4 8+Q ( $+ $nick $+ ) 12F4o12U4n12D4 12A4s $readini(data\gaop.ini,#,$ial($nick).addr) 8 :1Halted | access # add voice $ial($nick).addr | mode # +v $nick | .set -u2 %qtxtfp 1 | halt } } :end } ;global o unhalted on *:text:+o:*:{ if (!$readini(data\haop.ini,ghalted,#)) { if ($nick isop #) { goto end | msg # 14,5 $+ $nick Ur Aready +o } if ($nick($chan,$me,' .)) && (!%otxtfp) && ($readini(data\haop.ini,global,$ial($nick).addr) != $null) { mode # +ov $nick $nick | .set -u2 %otxtfp 1 | halt } } ;global o halted if ($readini(data\haop.ini,ghalted,#)) { if ($nick($chan,$me,' .)) && (!%otxtfp) && ($readini(haop.ini,global,$ial($nick).addr) != $null) { /msg # 4G12l4O12b4a12L4 5+o $nick $+ 12F4o12U4n12D4 12A4s : $+ 12 $readini(haop.ini,global,$ial($nick).addr) 8 :12Halted | access # add voice $ial($nick).addr | mode # +v $nick | .set -u2 %qtxtfp 1 | halt } } ;local o unhalted if (!$readini(data\haop.ini,lhalted,#)) { if ($nick isop #) { goto end | msg # 14,5 $+ $nick Ur Aready +o } if ($nick($chan,$me,' .)) && (!%qtxtfp) && ($readini(data\haop.ini,#,$ial($nick).addr) != $null) { mode # +ov $nick $nick | .set -u2 %qtxtfp 1 | halt } } ;local o halted if ($readini(data\gaop.ini,lhalted,#)) { if ($nick($chan,$me,' .)) && (!%qtxtfp) && ($readini(data\haop.ini,#,$ial($nick).addr) != $null) { /msg # 4G12l4O12b4a12L4 5+o $nick $+ 12F4o12U4n12D4 12A4s : $+ 12 $readini(haop.ini,global,$ial($nick).addr) 8 :12Halted | access # add voice $ial($nick).addr | mode # +v $nick | .set -u2 %qtxtfp 1 | halt } } :end } ;global q unhalted on *:join:#:{ if ($nick != $me) && (!$readini(data\gaop.ini,ghalted,#)) && ($nick($chan,$me,' .)) && ($readini(data\gaop.ini,global,$ial($nick).addr) != $null) { /msg # 4G12l4O12b4a12L4 8+q 12F4o12U4n12D4 12A4s $buzz.decode($nick)12 $readini(data\gaop.ini,global,$ial.addr) 4«+q 12For 8+q 4,!join (R\bN) 12To 4Join 12Room» mode # +q+v $nick .timeraop 1 2 doaop GO $gettok($readini(data\gaop.ini,global,$ial( $nick ).addr),2,32) $!chr(37) $!+ $right($chan,-1) $iif($me isowner #,+q) $nick } ;global q halted if ($readini(data\gaop.ini,ghalted,#)) && ($nick($chan,$me,' .)) && ($readini(data\gaop.ini,global,$ial($nick).addr) != $null) { /msg # 4G12l4O12b4a12l4 8+q 12F4o12U4n12D4 12A4s $buzz.decode($nick) 12 $readini(data\gaop.ini,global,$ial.addr):12Halted /access # add voice $ial($nick).addr .timer1 1 3 mode $!chr(37) $!+ $right(#,-1) +v $nick } ;local q unhalted if ($nick != $me) && (!$readini(data\gaop.ini,lhalted,#)) && ($nick($chan,$me,' .)) && ($readini(data\gaop.ini,#,$ial($nick).addr) != $null) { /msg # 4L12l4O12c4a12l4 8+q 12F4o12U4n12D4 12A4s $buzz.decode($nick) 12 $readini(data\gaop.ini,global,$ial.addr) 4««+q For 8+q»» mode # +qv $nick .timeraop 1 2 doaop CO $gettok($readini(data\gaop.ini,#,$ial($nick).addr),2,32) $!chr(37) $!+ $right($chan,-1) $iif($me isowner #,+q) $nick } ;local q halted elseif ($readini(gaop.ini,lhalted,#)) && ($nick($chan,$me,' .)) && ($readini(data\gaop.ini,#,$ial($nick).addr) != $null) { /msg # 4L12l4O12l4a12l4 8+q 12F4o12U4n12D4 12A4s $buzz.decode($nick) 12 $readini(data\gaop.ini,global,$ial.addr):12Halted /access # add voice $ial($nick).addr .timer1 1 3 mode $!chr(37) $!+ $right(#,-1) +v $nick } ;global o unhalted if ($nick != $me) && (!$readini(data\data\haop.ini,ghalted,#)) && ($nick($chan,$me,' .)) && ($readini(data\haop.ini,global,$ial($nick).addr) != $null) { /msg # 4G12l4O12b4a12l4 8+o 12F4o12U4n12D4 12A4s $buzz.decode($nick) 12 $readini(data\gaop.ini,global,$ial.addr)4«+oFor 5+o4`join (R\bN) To Join Room »» /access # add voice $ial($nick).addr .timer1 1 3 mode $!chr(37) $!+ $right(#,-1) +o+v $nick } ;global o halted if ($readini(data\haop.ini,ghalted,#)) && ($nick($chan,$me,' .)) && ($readini(data\haop.ini,global,$ial($nick).addr) != $null) { /msg # 4G12l4O12b4a12l4 8+o 12F4o12U4n12D4 12A4s $buzz.decode($nick)12$readini(data\gaop.ini,global,$ial.addr)8:12Halted /access # add voice $ial($nick).addr .timer1 1 3 mode $!chr(37) $!+ $right(#,-1) +v $nick } ;local o unhalted if ($nick != $me) && (!$readini(data\gaop.ini,lhalted,#)) && ($me isop #) && ($readini(data\haop.ini,#,$ial($nick).addr) != $null) { /msg # 4L12l4O12b4a12l4 8+o 12F4o12U4n12D4 12A4s $buzz.decode($nick) 12 $readini(data\gaop.ini,global,$ial.addr) 4«+o For 5+o4» .timer1 1 3 MODE $!chr(37) $!+ $right(#,-1) +o+v $nick $nick } ;local o halted elseif ($readini(data\gaop.ini,lhalted,#)) && ($me isop #) && ($readini(data\haop.ini,#,$ial($nick).addr) != $null) { /msg # 4L12l4O12b4a12l4 8+o 12F4o12U4n12D4 12A4s $buzz.decode($nick) 12 $readini(data\gaop.ini,global,$ial.addr) :12Halted /access # add voice $ial($nick).addr .timer1 1 3 mode $!chr(37) $!+ $right(#,-1) +v $nick } } #global end alias gqmade { var %x $chan, %z 1 msg $chan 12S4c12a4n 12G4l12o4b12a41 8Owner 12W4i12t4h 12m4a12d4e 12m4a12d4e 4S12t4a12r4t12e4d12in $chan while (%z <= $nick(%x,0)) { if ($readini(data\gaop.ini,global,$ial($nick(%x,%z),1).addr) != $null) { msg $chan 4G12lob4al 8+q12F4o12U4n12D4 $nick(%x,%z) $+ $chr(160) $+ $readini(data\gaop.ini,global,$ial($nick(%x,%z).addr)) | mode $chan +q $readini(data\gaop.ini,global,$ial($nick(%x,%z),1).addr) } inc %z } msg $chan 1,12All Who In Global Owner Got +q From Scan Owner Made Scan Complete in $chan } alias gqscan { var %x $1, %d $iif(10 // %x, 1300, 2) if (!%x) { msg $chan 12S4c12a4n 12G4l4o12b4a121 8Owner 4S12t4a12r4t12e4d12in $chan } if (%x >= $nick(#,0)) { msg $chan 1,12+q For +q Global Owner Scan Complete in $chan | return } inc %x if ($readini(data\gaop.ini,global,$ial($nick(%x,%z),1).addr) != $null) { msg $chan 4G12lob4al 8+q12F4o12U4n12D4 $nick(%x,%z) $+ $chr(160) $+ $readini(data\gaop.ini,global,$ial($nick(%x,%z).addr)) } .timer -m 1 %d gqscan %x } alias lqscan { var %x $1, %d $iif(10 // %x, 1300, 2) if (!%x) { msg $chan 12S4c12a4n 12L4o12c4a12l 8Owner 4S12t4a12r4t12e4d 12in $chan } if (%x >= $nick(#,0)) { msg $chan 1,12+q For +q Local Owner Scan Complete in $chan | return } inc %x if ($readini(data\gaop.ini,#,$ial($nick(#,%x)).addr)) { msg # 12L4o12c4a12l 8+q $nick(#,%x) } .timer -m 1 %d lqscan %x } alias ghmade { var %x $chan, %z 1 msg $chan 12S4c12a4n 12G4l12o4b12a4l 5Host 12W4i12t4h 12M4a12d4e 4S12t4a12r4t12e4d 12in $chan while (%z <= $nick(%x,0)) { if ($readini(data\haop.ini,global,$ial($nick(%x,%z),1).addr) != $null) { msg $chan 4G12lob4al 5+o12F4o12U4n12D4 $nick(%x,%z) $+ $chr(160) $+ $readini(data\haop.ini,global,$ial($nick(%x,%z).addr)) | mode $chan +o $readini(data\haop.ini,global,$ial($nick(%x,%z),1).addr) } inc %z } msg $chan 1,12All Who In Global Host Got +o From Scan Host Made Scan Complete in $chan } alias ghscan { var %x $chan, %z 1 msg $chan 12S4c12a4n 12G4L12o4b12a4L 5Host 12S12t4a12r4t12e4d 12in $chan while (%z <= $nick(%x,0)) { if ($readini(data\haop.ini,global,$ial($nick(%x,%z)).addr) != $null) { msg $chan 4G12l4o12b4a12l 5+o 12F4o12U4n12D4 $buzz.decode($nick)(%x,%z) } inc %z } msg $chan 1,12+o For +o Gloabl Host Scan Complete in $chan } alias lhscan { var %x 0 msg $chan 12S4c12a4n 4L12o4c12a4L 5Host 12S12t4a12r4t12e4d 12in $chan while (%x < $nick(#,0)) { inc %x if ($readini(data\haop.ini,#,$ial($nick(#,%x)).addr)) { msg # 4L12o4c12a4L 5+o 12F4o12U4n12D4 $nick(#,%x) } } msg $chan 1,12+o For +o Local Host Scan Complete in $chan } alias doaop { if ($1 == GO) { if ($4 == +q) && (!$nick($3,$5,' .)) { .raw mode $3- } elseif ($4 == +o) && (!$nick($3,$5,@)) { .raw mode $3- } } if ($1 == GH) { if (!$ishost($5,$3)) && (!$nick($3,$5,' .)) { .raw mode $3- } } if ($1 == CO) { if ($4 == +q) && (!$nick($3,$5,' .)) { .raw mode $3- } elseif ($4 == +o) && (!$nick($3,$5,@)) { .raw mode $3- } } if ($1 == CH) && (!$nick($3,$5,' .)) { if (!$nick($3,$5,@)) { .raw mode $3- } } } on *:text:*!join*:#:{ if (!%qtxtfp) && ($readini(data\gaop.ini,global,$ial($nick).addr) != $null) { join $replace($chr(37) $+ #$2-,$chr(32),\ msg # 12find 4 $+ $replace($chr(37) $+ #$2-,$chr(32),\ 12Please Wait0.8.4......Room Found And Is Now Open } } on *:text:*`join*:#:{ if (!%otxtfp) && ($readini(data\haop.ini,global,$ial($nick).addr) != $null) { join $replace($chr(37) $+ #$2-,$chr(32),\ msg # 12find 4 $+ $replace($chr(37) $+ #$2-,$chr(32),\ 12Please Wait0.1.4......Room Found And Is Now Open } }