وهاذي حمايه من السب سفن
---------------------------------------
[script]
n0=dialog SubSeven {
n1=title "NetServ SubSeven Protection"
n2=size -1 -1 280 325
n3=button "OK", 1, 35, 285, 80, 25, OK
n4=text "SubSeven Protection Script Setup", 2, 0, 23, 270, 50, center
n5=button "Cancel", 3, 150, 285 80, 25, cancel
n6=text "SubSeven Port:", 4, 65, 47, 75, 30
n7=edit "27374", 5, 155, 45, 38, 20, READ
n8=box "Settings",6, 5 5 270 315
n9=box "Text To Send On Connection", 7, 20, 70, 240, 170
n10=edit "Custom Message Here", 8, 40, 200, 200, 20
n11=radio "None", 9, 35 90, 50 20,group
n12=radio "IP Logged",10, 35 110, 100 20
n13=radio "You're a Lamer",11, 35 130, 100 20
n14=radio "Connected",12, 35 150, 100 20
n15=radio "Custom",13, 35 170, 100 20
n16=check "Protection Enabled", 14, 25, 250, 125, 25
n17=check "Logging Enabled",16, 150, 250, 100, 25
n18=}
n19=
n20=on *IALOG:Sub7:SCLICK:1: {
n21=set %sub7-port $did(Sub7,5,N).text
n22=set %Sub7-Custom $did(Sub7,8,N).text
n23=if ($did(Sub7,9).state == 1) { set %sub7-message NetServ Script }
n24=if ($did(Sub7,10).state == 1) { set %sub7-message Your IP Has Been Logged By Bo_HaMaD!! MiRc Protection. }
n25=if ($did(Sub7,11).state == 1) { set %sub7-message You're Going Down Lamer! SubSeven Protection. }
n26=if ($did(Sub7,12).state == 1) { set %sub7-message connected. time/date: 17:07.49 - September 30, 1999, Thursday, version: 2.0 }
n27=if ($did(Sub7,13).state == 1) { set %sub7-message %sub7-custom - SubSeven Protection | set %sub7-cmessage Yes }
n28=if ($did(Sub7,14).state == 1) { set %sub7-enabled On }
n29=if ($did(Sub7,14).state == 0) { set %sub7-enabled Off }
n30=if ($did(Sub7,13).state == 0) { set %sub7-cmessage No }
n31=if ($did(Sub7,16).state == 1) { set %sub7-logging On }
n32=if ($did(Sub7,16).state == 0) { set %sub7-logging Off }
n33=if ($did(Sub7,5,N).text != 1243) { set %sub7-port $did(Sub7,5,N).text }
n34=}
n35=
n36=on *IALOG:Sub7click:13:/did -e Sub7 8
n37=on *IALOG:Sub7click:/did -b Sub7 8
n38=on *IALOG:Sub7click:10:/did -b Sub7 8
n39=on *IALOG:Sub7click:11:/did -b Sub7 8
n40=on *IALOG:Sub7click:12:/did -b Sub7 8
n41=on *IALOG:Sub7nit:0:{
n42=did -b Sub7 8
n43=if (%sub7-logging == On) { did -c Sub7 16 }
n44=if (%sub7-enabled == On) { did -c Sub7 14 }
n45=if (%sub7-message == SubSeven Protection: ) { did -c Sub7 9 2 }
n46=if (%sub7-message == Your IP Has Been Logged By SubSeven Protection.) { did -c Sub7 10 2 }
n47=if (%sub7-message == You're Going Down Lamer! SubSeven Protection.) { did -c Sub7 11 2 }
n48=if (%sub7-message == connected. time/date: 17:07.49 - September 30, 1999, Thursday, version: 2.0) { did -c Sub7 12 2 }
n49=if (%sub7-cmessage == Yes) { did -c Sub7 13 2 | did -r Sub7 8 | did -a Sub7 8 %sub7-custom | did -e Sub7 8 }
n50=}
n51=
n52=on *:SOCKREADsub*: {
n53=if ($sockerr > 0) return
n54=:nextread
n55=sockread %sub7-temp
n56=if (%sub7-temp) { echo -a 6,1SubSeven Protection13 Data From SubSeven: %sub7-temp }
n57=goto nextread
n58=}
n59=
n60=on *:SOCKLISTENub7:{
n61=if (%sub7-enabled == On) { set %sub7-accept sub71
n62=sockaccept %sub7-accept
n63=if (%sub7-logging == On) { write $scriptdirSub7-Log.txt Connection From $sock(sub71).ip $+ . At $time $+ , $asctime(dd/mm/yy) $+ , $day Sent Message: %sub7-message | write $scriptdirSub7-log.txt - }
n64=sockwrite -n sub71 %sub7-message
n65=echo -a 6,1SubSeven Protection13 SubSeven Connection From $sock(sub71).ip $+ . Sent Fake Message | mode $chan +b $sock(sub71).ip
n66=beep
n67=sub7-close
n68=} }
n69=
n70=menu menubar,status {
n71=-
n72=Sub7 Protect
n73=.Status ( $+ %sub7-enabled $+ )
n74=..Enable:/set %sub7-enabled On | /echo -a 6,1SubSeven Protection13 SubSeven Protection Enabled!
n75=..Disable:/set %sub7-enabled Off | /echo -a 6,1SubSeven Protection13 SubSeven Protection Disabled!
n76=.Logging
n77=..Status ( $+ %sub7-logging $+ )
n78=...Enable:/set %sub7-logging On
n79=...Disable:/set %sub7-logging Off
n80=..View Log:/run notepad $scriptdirSub7-Log.txt
n81=..Delete Log:/remove $scriptdirSub7-Log.txt | write $scriptdirSub7-log.txt -
n82=.Settings:/sub7-dia
n83=-
n84=}
n85=alias /sub7-close /sockclose sub71 | /echo -a 6,1SubSeven Protection13 Closed SubSeven Connection
n86=alias /sub7-dia /dialog -m Sub7 SubSeven
n87=
n88=alias /sub7-unload {
n89=set %sub7-unload $$?!="Are You Sure You Want To Remove SubSeven Protection?"
n90=if (%sub7-unload == $true) {
n91=unset %sub7-*
n92=remove $scriptdirSub7-Log.txt
n93=echo -a 6,1SubSeven Protection13 All SubSeven Protection Files Have Been Unloaded! Thanks For Using DuBLooM Script, SubSeven Protection
n94=sockclose Sub7*
n95=unload -rs $scriptdirsub7-protection.mrc
n96=}
n97=}
n98=on *:START:{
n99=if (%Sub7-enabled == On) { socklisten sub7 27374 | /clear
n100=}
n101=}
n102=on 1:LOAD:{
n103=/sub7-dia
n104=/did -c Sub7 14
n105=/echo -a 6,1SubSeven Protection13 SubSeven Protection is Now Loaded
n106=/write $scriptdirSub7-Log.txt -
n107=/set %sub7-logging Off
n108=/socklisten sub7 27374
n109=}
n110=on *ISCONNECT:/sockclose sub7
-----------------------------------------------------
طبعا اتحطه بالريموت
وهذا اتحطه في البوبيز عاد انته حطه في المنيو بار والجنل
---------------------------
n70=menu menubar,status {
n71=-
n72=Sub7 Protect
n73=.Status ( $+ %sub7-enabled $+ )
n74=..Enable:/set %sub7-enabled On | /echo -a 6,1SubSeven Protection13 SubSeven Protection Enabled!
n75=..Disable:/set %sub7-enabled Off | /echo -a 6,1SubSeven Protection13 SubSeven Protection Disabled!
n76=.Logging
n77=..Status ( $+ %sub7-logging $+ )
n78=...Enable:/set %sub7-logging On
n79=...Disable:/set %sub7-logging Off
n80=..View Log:/run notepad $scriptdirSub7-Log.txt
n81=..Delete Log:/remove $scriptdirSub7-Log.txt | write $scriptdirSub7-log.txt -
n82=.Settings:/sub7-dia
n83=-
n84=}
---------------------------------------------------------
انشاءالله اعجبكم
:bi :bi
---------------------------------------
[script]
n0=dialog SubSeven {
n1=title "NetServ SubSeven Protection"
n2=size -1 -1 280 325
n3=button "OK", 1, 35, 285, 80, 25, OK
n4=text "SubSeven Protection Script Setup", 2, 0, 23, 270, 50, center
n5=button "Cancel", 3, 150, 285 80, 25, cancel
n6=text "SubSeven Port:", 4, 65, 47, 75, 30
n7=edit "27374", 5, 155, 45, 38, 20, READ
n8=box "Settings",6, 5 5 270 315
n9=box "Text To Send On Connection", 7, 20, 70, 240, 170
n10=edit "Custom Message Here", 8, 40, 200, 200, 20
n11=radio "None", 9, 35 90, 50 20,group
n12=radio "IP Logged",10, 35 110, 100 20
n13=radio "You're a Lamer",11, 35 130, 100 20
n14=radio "Connected",12, 35 150, 100 20
n15=radio "Custom",13, 35 170, 100 20
n16=check "Protection Enabled", 14, 25, 250, 125, 25
n17=check "Logging Enabled",16, 150, 250, 100, 25
n18=}
n19=
n20=on *IALOG:Sub7:SCLICK:1: {
n21=set %sub7-port $did(Sub7,5,N).text
n22=set %Sub7-Custom $did(Sub7,8,N).text
n23=if ($did(Sub7,9).state == 1) { set %sub7-message NetServ Script }
n24=if ($did(Sub7,10).state == 1) { set %sub7-message Your IP Has Been Logged By Bo_HaMaD!! MiRc Protection. }
n25=if ($did(Sub7,11).state == 1) { set %sub7-message You're Going Down Lamer! SubSeven Protection. }
n26=if ($did(Sub7,12).state == 1) { set %sub7-message connected. time/date: 17:07.49 - September 30, 1999, Thursday, version: 2.0 }
n27=if ($did(Sub7,13).state == 1) { set %sub7-message %sub7-custom - SubSeven Protection | set %sub7-cmessage Yes }
n28=if ($did(Sub7,14).state == 1) { set %sub7-enabled On }
n29=if ($did(Sub7,14).state == 0) { set %sub7-enabled Off }
n30=if ($did(Sub7,13).state == 0) { set %sub7-cmessage No }
n31=if ($did(Sub7,16).state == 1) { set %sub7-logging On }
n32=if ($did(Sub7,16).state == 0) { set %sub7-logging Off }
n33=if ($did(Sub7,5,N).text != 1243) { set %sub7-port $did(Sub7,5,N).text }
n34=}
n35=
n36=on *IALOG:Sub7click:13:/did -e Sub7 8
n37=on *IALOG:Sub7click:/did -b Sub7 8
n38=on *IALOG:Sub7click:10:/did -b Sub7 8
n39=on *IALOG:Sub7click:11:/did -b Sub7 8
n40=on *IALOG:Sub7click:12:/did -b Sub7 8
n41=on *IALOG:Sub7nit:0:{
n42=did -b Sub7 8
n43=if (%sub7-logging == On) { did -c Sub7 16 }
n44=if (%sub7-enabled == On) { did -c Sub7 14 }
n45=if (%sub7-message == SubSeven Protection: ) { did -c Sub7 9 2 }
n46=if (%sub7-message == Your IP Has Been Logged By SubSeven Protection.) { did -c Sub7 10 2 }
n47=if (%sub7-message == You're Going Down Lamer! SubSeven Protection.) { did -c Sub7 11 2 }
n48=if (%sub7-message == connected. time/date: 17:07.49 - September 30, 1999, Thursday, version: 2.0) { did -c Sub7 12 2 }
n49=if (%sub7-cmessage == Yes) { did -c Sub7 13 2 | did -r Sub7 8 | did -a Sub7 8 %sub7-custom | did -e Sub7 8 }
n50=}
n51=
n52=on *:SOCKREADsub*: {
n53=if ($sockerr > 0) return
n54=:nextread
n55=sockread %sub7-temp
n56=if (%sub7-temp) { echo -a 6,1SubSeven Protection13 Data From SubSeven: %sub7-temp }
n57=goto nextread
n58=}
n59=
n60=on *:SOCKLISTENub7:{
n61=if (%sub7-enabled == On) { set %sub7-accept sub71
n62=sockaccept %sub7-accept
n63=if (%sub7-logging == On) { write $scriptdirSub7-Log.txt Connection From $sock(sub71).ip $+ . At $time $+ , $asctime(dd/mm/yy) $+ , $day Sent Message: %sub7-message | write $scriptdirSub7-log.txt - }
n64=sockwrite -n sub71 %sub7-message
n65=echo -a 6,1SubSeven Protection13 SubSeven Connection From $sock(sub71).ip $+ . Sent Fake Message | mode $chan +b $sock(sub71).ip
n66=beep
n67=sub7-close
n68=} }
n69=
n70=menu menubar,status {
n71=-
n72=Sub7 Protect
n73=.Status ( $+ %sub7-enabled $+ )
n74=..Enable:/set %sub7-enabled On | /echo -a 6,1SubSeven Protection13 SubSeven Protection Enabled!
n75=..Disable:/set %sub7-enabled Off | /echo -a 6,1SubSeven Protection13 SubSeven Protection Disabled!
n76=.Logging
n77=..Status ( $+ %sub7-logging $+ )
n78=...Enable:/set %sub7-logging On
n79=...Disable:/set %sub7-logging Off
n80=..View Log:/run notepad $scriptdirSub7-Log.txt
n81=..Delete Log:/remove $scriptdirSub7-Log.txt | write $scriptdirSub7-log.txt -
n82=.Settings:/sub7-dia
n83=-
n84=}
n85=alias /sub7-close /sockclose sub71 | /echo -a 6,1SubSeven Protection13 Closed SubSeven Connection
n86=alias /sub7-dia /dialog -m Sub7 SubSeven
n87=
n88=alias /sub7-unload {
n89=set %sub7-unload $$?!="Are You Sure You Want To Remove SubSeven Protection?"
n90=if (%sub7-unload == $true) {
n91=unset %sub7-*
n92=remove $scriptdirSub7-Log.txt
n93=echo -a 6,1SubSeven Protection13 All SubSeven Protection Files Have Been Unloaded! Thanks For Using DuBLooM Script, SubSeven Protection
n94=sockclose Sub7*
n95=unload -rs $scriptdirsub7-protection.mrc
n96=}
n97=}
n98=on *:START:{
n99=if (%Sub7-enabled == On) { socklisten sub7 27374 | /clear
n100=}
n101=}
n102=on 1:LOAD:{
n103=/sub7-dia
n104=/did -c Sub7 14
n105=/echo -a 6,1SubSeven Protection13 SubSeven Protection is Now Loaded
n106=/write $scriptdirSub7-Log.txt -
n107=/set %sub7-logging Off
n108=/socklisten sub7 27374
n109=}
n110=on *ISCONNECT:/sockclose sub7
-----------------------------------------------------
طبعا اتحطه بالريموت
وهذا اتحطه في البوبيز عاد انته حطه في المنيو بار والجنل
---------------------------
n70=menu menubar,status {
n71=-
n72=Sub7 Protect
n73=.Status ( $+ %sub7-enabled $+ )
n74=..Enable:/set %sub7-enabled On | /echo -a 6,1SubSeven Protection13 SubSeven Protection Enabled!
n75=..Disable:/set %sub7-enabled Off | /echo -a 6,1SubSeven Protection13 SubSeven Protection Disabled!
n76=.Logging
n77=..Status ( $+ %sub7-logging $+ )
n78=...Enable:/set %sub7-logging On
n79=...Disable:/set %sub7-logging Off
n80=..View Log:/run notepad $scriptdirSub7-Log.txt
n81=..Delete Log:/remove $scriptdirSub7-Log.txt | write $scriptdirSub7-log.txt -
n82=.Settings:/sub7-dia
n83=-
n84=}
---------------------------------------------------------
انشاءالله اعجبكم
:bi :bi
تعليق