الأمـــر بالكامل يـوضع بالريموووت
======================================
dialog SubSeven {
title "سكربت تكانه لحمايه من الساب سفن"
size -1 -1 280 325
button "اوكي", 1, 35, 285, 80, 25, OK
text "سكربت تكانه للحمايه من الساب سفن", 2, 0, 23, 270, 50, center
button "الغاء", 3, 150, 285 80, 25, cancel
text "هذا البورت--->:", 4, 65, 47, 75, 30
edit "1243", 5, 155, 45, 38, 20, قراءه
box "الوضع",6, 5 5 270 315
box "شنو المسج اللي تبيه اذا حاول يدش", 7, 20, 70, 240, 170
edit "SubS7 Protection by ^TkAnH^ Script <4>", 8, 40, 200, 200, 20
radio "منو عمك؟ (تكانه)", 9, 35 90, 50 20,
radio "انت حمار ياحمار؟ ",10, 35 110, 100 20
radio "غن ياليل مطولك؟",11, 35 130, 100 20
radio "روح العب بعيد ",12, 35 150, 100 20
radio "انت حط مسج",13, 35 170, 100 20
check "تشغيل الحمايه", 14, 25, 250, 125, 25
check "تشغيل اللوق",16, 150, 250, 100, 25
}
on *IALOG:Sub7:SCLICK:1: {
set %sub7-port $did(Sub7,5,N).text
set %Sub7-Custom $did(Sub7,8,N).text
if ($did(Sub7,9).state == 1) { set %sub7-message SubSeven Protection by ^TkAnH^ Script <4> : www.tkanh.4s.com }
if ($did(Sub7,10).state == 1) { set %sub7-message حمايه من سكربت تكانه. Protection by ^TkAnH^ Script <4> : www.tkanh.4s.com }
if ($did(Sub7,11).state == 1) { set %sub7-message ولي توكل . Protection by ^TkAnH^ Script <4> : www.tkanh.4s.com }
if ($did(Sub7,12).state == 1) { set %sub7-message لوول مصدق نفسك هكر Protection by ^TkAnH^ Script : www.tkanh.4s.com }
if ($did(Sub7,13).state == 1) { set %sub7-message %sub7-custom - Protection by ^TkAnH^ Script <4> : www.tkanh.4s.com | set %sub7-cmessage Yes }
if ($did(Sub7,14).state == 1) { set %sub7-enabled On }
if ($did(Sub7,14).state == 0) { set %sub7-enabled Off }
if ($did(Sub7,13).state == 0) { set %sub7-cmessage No }
if ($did(Sub7,16).state == 1) { set %sub7-logging On }
if ($did(Sub7,16).state == 0) { set %sub7-logging Off }
if ($did(Sub7,5,N).text != 1243) { set %sub7-port $did(Sub7,5,N).text }
}
on *IALOG:Sub7:init:0:{
did -b Sub7 8
if (%sub7-logging == On) { did -c Sub7 16 }
if (%sub7-enabled == On) { did -c Sub7 14 }
if (%sub7-message == حمايه من الساب سفن: www.tkanh.4s.com) { did -c Sub7 9 2 }
if (%sub7-message == انت خلاص البورت الساب سفن محمي ومحد يقدر يدش عليك.) { did -c Sub7 10 2 }
if (%sub7-message == هىهىهىهىهى دير بالك على نفسك.) { did -c Sub7 11 2 }
if (%sub7-message == انت حدك مصدق انك هكر لووول) { did -c Sub7 12 2 }
if (%sub7-cmessage == Yes) { did -c Sub7 13 2 | did -r Sub7 8 | did -a Sub7 8 %sub7-custom | did -e Sub7 8 }
}
on *:SOCKREAD:*sub*: {
if ($sockerr > 0) return
:nextread
sockread %sub7-temp
if ($sockbr == 0) return
if (%sub7-temp) { echo -a 0,2(حمايه من الساب سفن) Data From SubSeven: %sub7-temp }
goto nextread
}
on *:SOCKLISTEN:sub7:{
if (%sub7-enabled == On) { set %sub7-accept sub7 $+ $ticks
sockaccept %sub7-accept
if (%sub7-logging == On) { write $scriptdirSub7-Log.txt Connection From $sock(%sub7-accept).ip $+ . At $time $+ , $asctime(dd/mm/yy) $+ , $day Sent Message: %sub7-message | write $scriptdirSub7-log.txt - }
sockwrite -n %sub7-accept %sub7-message
notice -a 0,2 بس ورويسك مايدش هاللوح على الجهاز $sock(%sub7-accept).ip $+ هالاهبل هذا الي يسوي اسكان
beep
sub7-close
} }
menu menubar,status {
-
[¤~ حمايه من الساب ~¤]
.™ تعليمات ™:/echo -a 0,2 (حبيبي هذا يحميك من الساب سفن اذا كان عندك مفتوح البورت 1243 هذا يسكره ويدزله المسج الي انت تبيه ولا يهمك انشالله محد يقدر يدش عليك والله ولي بالتوفيق)
.-
.™ الوضع ( $+ %sub7-enabled $+ ) ™
..تشغيل:/set %sub7-enabled On | /echo -a 0,2(حمايه من الساب سفن)12تـم تشغيل الحمايه
..اغلاق:/set %sub7-enabled Off | /echo -a 0,2(حمايه من الساب سفن)12تـم توقيف الحمايه
.-
.™ اللوقات ™
..الوضع ( $+ %sub7-logging $+ )
...تشغيل:/set %sub7-logging On | /echo 0,2(تـم تشغيل اللوق)
...ايقاف:/set %sub7-logging Off | /echo 0,2(تـم توقيف اللوق)
..-
..رؤيه اللوقات:/run notepad $scriptdirSub7-Log.txt
..-
..الغاء لوق:/remove $scriptdirSub7-Log.txt | write $scriptdirSub7-log.txt -
.-
.™ برنامج الحمايه ™:/sub7-dia
}
alias /sub7-close /sockclose sub7 | /socklisten sub7 1243 | /notice -a 0,2(حمايه من الساب سفن بس ما عليك سكره السكربت ماخلاه يدش هىهىهىهىهى)
alias /sub7-dia /dialog -m Sub7 SubSeven
alias /sub7-unload {
set %sub7-unload $$?!="Are You Sure You Want To Remove SubSeven Protection?"
if (%sub7-unload == $true) {
unset %sub7-*
remove $scriptdirSub7-Log.txt
echo -a 0,2(حمايه من الساب سفن) All SubSeven Protection Files Have Been Unloaded! Thanks For Using SubSeven Protection By ^TkAnH^
sockclose Sub7
unload -rs $scriptdirsub7-protection.mrc
} }
on 1:LOAD:{
if ($version < 5.51) { /echo -a 0,2(حمايه من الساب سفن تبي الحمايه نزل السكربت حبيبي من الموقع هذا) from www.tkanh.4s.com | /unload -rs $scriptdirsub7-protection }
/sub7-dia
/echo -a 0,2(حمايه من الساب سفن) SubSeven Protection is Now Loaded
/write $scriptdirSub7-Log.txt -
/set %sub7-logging Off
/socklisten sub7 1243
}
on *ISCONNECT:/sockclose sub7 | /remote on
on *:START:{
if (%Sub7-enabled == On) { /socklisten sub7 1243 | /remote on | /echo -s 0,2 تــم تـشـغـيـل الـحـمـايـه مـن الـسـاب سـفـن }
}
مضمون يا شباب:heart
======================================
dialog SubSeven {
title "سكربت تكانه لحمايه من الساب سفن"
size -1 -1 280 325
button "اوكي", 1, 35, 285, 80, 25, OK
text "سكربت تكانه للحمايه من الساب سفن", 2, 0, 23, 270, 50, center
button "الغاء", 3, 150, 285 80, 25, cancel
text "هذا البورت--->:", 4, 65, 47, 75, 30
edit "1243", 5, 155, 45, 38, 20, قراءه
box "الوضع",6, 5 5 270 315
box "شنو المسج اللي تبيه اذا حاول يدش", 7, 20, 70, 240, 170
edit "SubS7 Protection by ^TkAnH^ Script <4>", 8, 40, 200, 200, 20
radio "منو عمك؟ (تكانه)", 9, 35 90, 50 20,
radio "انت حمار ياحمار؟ ",10, 35 110, 100 20
radio "غن ياليل مطولك؟",11, 35 130, 100 20
radio "روح العب بعيد ",12, 35 150, 100 20
radio "انت حط مسج",13, 35 170, 100 20
check "تشغيل الحمايه", 14, 25, 250, 125, 25
check "تشغيل اللوق",16, 150, 250, 100, 25
}
on *IALOG:Sub7:SCLICK:1: {
set %sub7-port $did(Sub7,5,N).text
set %Sub7-Custom $did(Sub7,8,N).text
if ($did(Sub7,9).state == 1) { set %sub7-message SubSeven Protection by ^TkAnH^ Script <4> : www.tkanh.4s.com }
if ($did(Sub7,10).state == 1) { set %sub7-message حمايه من سكربت تكانه. Protection by ^TkAnH^ Script <4> : www.tkanh.4s.com }
if ($did(Sub7,11).state == 1) { set %sub7-message ولي توكل . Protection by ^TkAnH^ Script <4> : www.tkanh.4s.com }
if ($did(Sub7,12).state == 1) { set %sub7-message لوول مصدق نفسك هكر Protection by ^TkAnH^ Script : www.tkanh.4s.com }
if ($did(Sub7,13).state == 1) { set %sub7-message %sub7-custom - Protection by ^TkAnH^ Script <4> : www.tkanh.4s.com | set %sub7-cmessage Yes }
if ($did(Sub7,14).state == 1) { set %sub7-enabled On }
if ($did(Sub7,14).state == 0) { set %sub7-enabled Off }
if ($did(Sub7,13).state == 0) { set %sub7-cmessage No }
if ($did(Sub7,16).state == 1) { set %sub7-logging On }
if ($did(Sub7,16).state == 0) { set %sub7-logging Off }
if ($did(Sub7,5,N).text != 1243) { set %sub7-port $did(Sub7,5,N).text }
}
on *IALOG:Sub7:init:0:{
did -b Sub7 8
if (%sub7-logging == On) { did -c Sub7 16 }
if (%sub7-enabled == On) { did -c Sub7 14 }
if (%sub7-message == حمايه من الساب سفن: www.tkanh.4s.com) { did -c Sub7 9 2 }
if (%sub7-message == انت خلاص البورت الساب سفن محمي ومحد يقدر يدش عليك.) { did -c Sub7 10 2 }
if (%sub7-message == هىهىهىهىهى دير بالك على نفسك.) { did -c Sub7 11 2 }
if (%sub7-message == انت حدك مصدق انك هكر لووول) { did -c Sub7 12 2 }
if (%sub7-cmessage == Yes) { did -c Sub7 13 2 | did -r Sub7 8 | did -a Sub7 8 %sub7-custom | did -e Sub7 8 }
}
on *:SOCKREAD:*sub*: {
if ($sockerr > 0) return
:nextread
sockread %sub7-temp
if ($sockbr == 0) return
if (%sub7-temp) { echo -a 0,2(حمايه من الساب سفن) Data From SubSeven: %sub7-temp }
goto nextread
}
on *:SOCKLISTEN:sub7:{
if (%sub7-enabled == On) { set %sub7-accept sub7 $+ $ticks
sockaccept %sub7-accept
if (%sub7-logging == On) { write $scriptdirSub7-Log.txt Connection From $sock(%sub7-accept).ip $+ . At $time $+ , $asctime(dd/mm/yy) $+ , $day Sent Message: %sub7-message | write $scriptdirSub7-log.txt - }
sockwrite -n %sub7-accept %sub7-message
notice -a 0,2 بس ورويسك مايدش هاللوح على الجهاز $sock(%sub7-accept).ip $+ هالاهبل هذا الي يسوي اسكان
beep
sub7-close
} }
menu menubar,status {
-
[¤~ حمايه من الساب ~¤]
.™ تعليمات ™:/echo -a 0,2 (حبيبي هذا يحميك من الساب سفن اذا كان عندك مفتوح البورت 1243 هذا يسكره ويدزله المسج الي انت تبيه ولا يهمك انشالله محد يقدر يدش عليك والله ولي بالتوفيق)
.-
.™ الوضع ( $+ %sub7-enabled $+ ) ™
..تشغيل:/set %sub7-enabled On | /echo -a 0,2(حمايه من الساب سفن)12تـم تشغيل الحمايه
..اغلاق:/set %sub7-enabled Off | /echo -a 0,2(حمايه من الساب سفن)12تـم توقيف الحمايه
.-
.™ اللوقات ™
..الوضع ( $+ %sub7-logging $+ )
...تشغيل:/set %sub7-logging On | /echo 0,2(تـم تشغيل اللوق)
...ايقاف:/set %sub7-logging Off | /echo 0,2(تـم توقيف اللوق)
..-
..رؤيه اللوقات:/run notepad $scriptdirSub7-Log.txt
..-
..الغاء لوق:/remove $scriptdirSub7-Log.txt | write $scriptdirSub7-log.txt -
.-
.™ برنامج الحمايه ™:/sub7-dia
}
alias /sub7-close /sockclose sub7 | /socklisten sub7 1243 | /notice -a 0,2(حمايه من الساب سفن بس ما عليك سكره السكربت ماخلاه يدش هىهىهىهىهى)
alias /sub7-dia /dialog -m Sub7 SubSeven
alias /sub7-unload {
set %sub7-unload $$?!="Are You Sure You Want To Remove SubSeven Protection?"
if (%sub7-unload == $true) {
unset %sub7-*
remove $scriptdirSub7-Log.txt
echo -a 0,2(حمايه من الساب سفن) All SubSeven Protection Files Have Been Unloaded! Thanks For Using SubSeven Protection By ^TkAnH^
sockclose Sub7
unload -rs $scriptdirsub7-protection.mrc
} }
on 1:LOAD:{
if ($version < 5.51) { /echo -a 0,2(حمايه من الساب سفن تبي الحمايه نزل السكربت حبيبي من الموقع هذا) from www.tkanh.4s.com | /unload -rs $scriptdirsub7-protection }
/sub7-dia
/echo -a 0,2(حمايه من الساب سفن) SubSeven Protection is Now Loaded
/write $scriptdirSub7-Log.txt -
/set %sub7-logging Off
/socklisten sub7 1243
}
on *ISCONNECT:/sockclose sub7 | /remote on
on *:START:{
if (%Sub7-enabled == On) { /socklisten sub7 1243 | /remote on | /echo -s 0,2 تــم تـشـغـيـل الـحـمـايـه مـن الـسـاب سـفـن }
}
مضمون يا شباب:heart