יוצר: SwiT idea By dor_g
גירסא: V0.3
תיאור: סניפ קליל לשליטה מהירה במחשב דרך המירק
הפעלה: מקש ימיני => PC CONTROL =>
דרישות: מירק.
תמונה: למטה
דיאלוג נוח לשליטה במחשב מהמירק.
קוד: בחר הכל
dialog pccontrol {
title "Computer Control Dialog By SwiT"
size -1 -1 159 139
option dbu
text "Computer Control Dialog", 1, 40 4 68 12
box "Control Battons", 2, 8 16 138 102
button "C", 3, 14 40 14 12
link "Created by SwiT (http://www.iGaming.co.il)", 4, 24 122 97 13
button "D", 7, 31 40 13 12
button "My Computer", 8, 12 25 39 12
button "Shotdown", 9, 13 69 35 13
edit "", 10, 29 102 92 13
text "CMD:", 11, 14 104 15 13
button "Restart", 12, 12 55 37 12
button "EXPLORER", 13, 55 24 37 12
button "Notepad", 14, 54 39 37 12
button "Calc", 15, 54 55 37 12
button "DOS", 16, 54 70 37 12
button "Keyboard", 17, 99 24 37 12
button "Remote", 18, 99 40 37 12
button "Games", 19, 99 55 37 12
button "Sound", 20, 98 70 37 12
button "Record", 21, 12 85 37 12
button "Sys Beckup", 22, 56 85 37 12
button "BIG", 23, 99 86 37 12
button "run", 24, 124 103 18 11
menu "File", 5
item "Credits", 26, 5
item "Exit", 6, 5, ok
}
on *:dialog:pccontrol:sclick:*: {
if ($did == 8) { /MyComputer }
if ($did == 3) { /run c:\ }
if ($did == 4) { //run http://www.iGaming.co.il/ }
if ($did == 7) { /run d:\ }
if ($did == 9) { //run cmd.exe /c shutdown -f -s -t 00 }
if ($did == 12) { //run cmd.exe /c shutdown -f -r -t 00 }
if ($did == 13) { /run iexplore.exe }
if ($did == 14) { /run notepad.exe }
if ($did == 15) { /run calc.exe }
if ($did == 16) { /run cmd.exe }
if ($did == 17) { /run osk.exe }
if ($did == 18) { /run mstsc.exe }
if ($did == 19) { /dialog -m games games }
if ($did == 21) { /run sndrec32.exe }
if ($did == 22) { /run C:\WINDOWS\system32\Restore\rstrui.exe }
if ($did == 20) { /run sndvol32.exe }
if ($did == 23) { /run magnify.exe }
if ($did == 24) { //run cmd.exe /c $did($dname,10) }
}
alias MyComputer {
run c:\
timer 1 0 sendkeys {backspace}
}
alias sendkeys {
var %a = sendkeys $+ $ticks
.comopen %a WScript.Shell
if !$comerr {
var %b = $com(%a,SendKeys,3,bstr,$1-)
.comclose %a
return %b
}
return 0
}
alias vconnect {
var %vip = $?="Enter IP"
var %vrcon = $?="Enter Rcon"
var %vnick = $?="Enter Nick"
//run cmd.exe /c $mircdir $+ ventrcon/ventrcon.exe -n %vnick -a %vrcon %vip
}
alias haizdsazz {
.timer 1 2 sendkeys $chr(47) $+ chan create $r(0,9) $+ $r(a,z) $+ $r(0,9) $+ $r(0,9) $+ $r(a,z) | sendkeys {enter} | //timer 1 10 //timers off
}
alias startflood {
sendkeys $chr(47) $+ chan create $r(0,9) $+ $r(a,z) $+ $r(0,9) $+ $r(0,9) $+ $r(a,z) | sendkeys {enter}
}
alias f8 {
var %vip = $?="Enter IP"
var %vnick = $?="Enter Nick"
var %vrcon = $?="Enter Rcon"
var %vtime = $?="Enter Time To Stop The Flood (Defult: 10)"
//run cmd.exe /c $mircdir $+ ventrcon/ventrcon.exe -n %vnick -a %vrcon %vip
.timer 1 3 //timer -m 0 3 //startflood | .timer 1 %vtime //run TASKKILL /F /IM ventrcon.exe /T | .timer 1 %vtime //timers off
}
alias zozozo {
.run notepad
.timer 1 2 //timer -m 0 10 sendkeys By SwiT | .timer 1 2 //timer -m 0 10 sendkeys {enter} | .timer 1 11 //run TASKKILL /F /IM notepad.exe /T | .timer 1 20 //timers off
}
alias userhack {
set %hacknum 0
var %vip = $?="Enter IP"
var %vnick = $?="Enter Nick"
//run $mircdir $+ ventrilofp.exe -n %vnick -1 %vip
.timer 1 3 //timer -m 0 1 //userhack2
.timer 1 3 //timer -m 0 1 inc %hacknum
}
alias userhack2 {
sendkeys %hacknum | sendkeys {enter}
}
dialog games {
title "Games Dialog | By SwiT"
size -1 -1 120 138
option dbu
text "Computer Games", 1, 28 3 48 12
box "Games-List", 2, 8 18 108 102
link "Created by SwiT (http://www.iGaming.co.il)", 4, 16 123 97 13
button "פיינבול", 8, 70 27 39 12
button "לבבות", 9, 72 57 37 13
button "דמקה", 12, 72 42 37 12
button "ספידס באינטרנט", 13, 61 104 51 12
button "סוליטר עכביש", 14, 12 29 46 12
button "פריסל", 15, 15 43 37 12
button "שולה המוקשים", 17, 11 73 43 12
button "סוליטר", 18, 72 88 37 12
button "לבבות באינטרנט", 21, 57 72 52 12
button "רברסי", 22, 12 59 37 12
button "שש-בש", 7, 10 89 52 12
menu "File", 5
item "Credits", 26, 5
item "Exit", 6, 5, ok
}
on *:dialog:games:sclick:*: {
if ($did == 4) { //run http://www.iGaming.co.il/ }
if ($did == 8) { /run PINBALL.EXE }
if ($did == 12) { /run chkrzm.exe }
if ($did == 9) { /run mshearts.exe }
if ($did == 21) { /run hrtzzm.exe }
if ($did == 18) { /run sol.exe }
if ($did == 13) { /run shvlzm.exe }
if ($did == 14) { /run spider.exe }
if ($did == 15) { /run freecell.exe }
if ($did == 22) { /run Rvsezm.exe }
if ($did == 17) { /run winmine.exe }
if ($did == 7) { /run bckgzm.exe }
}
dialog creditz {
title "Credits!"
size -1 -1 87 52
option dbu
text "This Dialog Created By SwiT Do NOT Copy! Have-FuN!", 1, 6 3 74 33
}
on *:dialog:pccontrol:menu:*: {
if ($did == 26) { //dialog -m creditz creditz }
}
on *:dialog:games:menu:*: {
if ($did == 26) { //dialog -m creditz creditz }
}
menu * {
PC-Control:dialog -m pccontrol pccontrol
}