Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #Warn
- #NoEnv
- #SingleInstance Force
- #MaxHotkeysPerInterval 200
- #Warn
- #NoEnv
- global WM_USER := 0x00000400
- global PBM_SETMARQUEE := WM_USER + 10
- global PBM_SETSTATE := WM_USER + 16
- global PBS_MARQUEE := 0x00000008
- global PBS_SMOOTH := 0x00000001
- global PBS_VERTICAL := 0x00000004
- global PBST_NORMAL := 0x00000001
- global PBST_ERROR := 0x00000002
- global PBST_PAUSE := 0x00000002
- global STAP_ALLOW_NONCLIENT := 0x00000001
- global STAP_ALLOW_CONTROLS := 0x00000002
- global STAP_ALLOW_WEBCONTENT := 0x00000004
- global WM_THEMECHANGED := 0x0000031A
- ;PAUSE DEFAULT = 0x00000003
- ;colume 1 colume 2 colume 3 for x only [For y just add 20]
- ;0 160 290
- ;35 170 300
- Gui, Show, h190 w400, Button Press Data
- Gui, Add, Text, x0 y0 w1 ,Space ;Space
- Gui, Add, Progress, x35 y0 w100 h15 hwndPROY -%PBS_SMOOTH% vSpace1, 0 ;Space
- DllCall("User32.dll\SendMessage", "Ptr", PROY, "Int", PBM_SETSTATE, "Ptr", PBST_PAUSE, "Ptr", 0)
- Gui, Add, Text, x160 y0 w1 ,A
- Gui, Add, Progress, x170 y0 w100 h15 -%PBS_SMOOTH% vA1, 0 ;A
- Gui, Add, Text, x290 y0 w1 ,B
- Gui, Add, Progress, x300 y0 w100 h15 -%PBS_SMOOTH% vB1, 0 ;B
- Gui, Add, Text, x0 y20 w1 ,C
- Gui, Add, Progress, x35 y20 w100 h15 -%PBS_SMOOTH% vC1, 0 ;C
- Gui, Add, Text, x160 y20 w1 ,D
- Gui, Add, Progress, x170 y20 w100 h15 -%PBS_SMOOTH% vD1, 0 ;D
- Gui, Add, Text, x290 y20 w1 ,E
- Gui, Add, Progress, x300 y20 w100 h15 -%PBS_SMOOTH% vE1, 0 ;E
- Gui, Add, Text, x0 y40 w1 ,F
- Gui, Add, Progress, x35 y40 w100 h15 -%PBS_SMOOTH% vF1, 0 ;F
- Gui, Add, Text, x160 y40 w1 ,G
- Gui, Add, Progress, x170 y40 w100 h15 -%PBS_SMOOTH% vG1, 0 ;G
- Gui, Add, Text, x290 y40 w1 ,H
- Gui, Add, Progress, x300 y40 w100 h15 -%PBS_SMOOTH% vH1, 0 ;H
- Gui, Add, Text, x0 y60 w1 ,I
- Gui, Add, Progress, x35 y60 w100 h15 -%PBS_SMOOTH% vI1, 0 ;I
- Gui, Add, Text, x160 y60 w1 ,J
- Gui, Add, Progress, x170 y60 w100 h15 -%PBS_SMOOTH% vJ1, 0 ;J
- Gui, Add, Text, x290 y60 w1 ,K
- Gui, Add, Progress, x300 y60 w100 h15 -%PBS_SMOOTH% vK1, 0 ;K
- Gui, Add, Text, x0 y80 w1 ,L
- Gui, Add, Progress, x35 y80 w100 h15 -%PBS_SMOOTH% vL1, 0 ;L
- Gui, Add, Text, x160 y80 w1 ,M
- Gui, Add, Progress, x170 y80 w100 h15 -%PBS_SMOOTH% vM1, 0 ;M
- Gui, Add, Text, x290 y80 w1 ,N
- Gui, Add, Progress, x300 y80 w100 h15 -%PBS_SMOOTH% vN1, 0 ;N
- Gui, Add, Text, x0 y100 w1 ,O
- Gui, Add, Progress, x35 y100 w100 h15 -%PBS_SMOOTH% vO1, 0 ;O
- Gui, Add, Text, x160 y100 w1 ,P
- Gui, Add, Progress, x170 y100 w100 h15 -%PBS_SMOOTH% vP1, 0 ;P
- Gui, Add, Text, x290 y100 w1 ,Q
- Gui, Add, Progress, x300 y100 w100 h15 -%PBS_SMOOTH% vQ1, 0 ;Q
- Gui, Add, Text, x0 y120 w1 ,R
- Gui, Add, Progress, x35 y120 w100 h15 -%PBS_SMOOTH% vR1, 0 ;R
- Gui, Add, Text, x160 y120 w1 ,S
- Gui, Add, Progress, x170 y120 w100 h15 -%PBS_SMOOTH% vS1, 0 ;S
- Gui, Add, Text, x290 y120 w1 ,T
- Gui, Add, Progress, x300 y120 w100 h15 -%PBS_SMOOTH% vT1, 0 ;T
- Gui, Add, Text, x0 y140 w1 ,U
- Gui, Add, Progress, x35 y140 w100 h15 -%PBS_SMOOTH% vU1, 0 ;U
- Gui, Add, Text, x160 y140 w1 ,V
- Gui, Add, Progress, x170 y140 w100 h15 -%PBS_SMOOTH% vV1, 0 ;V
- Gui, Add, Text, x288 y140 w1 ,W
- Gui, Add, Progress, x300 y140 w100 h15 -%PBS_SMOOTH% vW1, 0 ;W
- Gui, Add, Text, x0 y160 w1 ,X
- Gui, Add, Progress, x35 y160 w100 h15 -%PBS_SMOOTH% vX1, 0 ;X
- Gui, Add, Text, x160 y160 w1 ,Y
- Gui, Add, Progress, x170 y160 w100 h15 -%PBS_SMOOTH% vY1, 0 ;Z
- Gui, Add, Text, x290 y160 w1 ,Z
- Gui, Add, Progress, x300 y160 w100 h15 -%PBS_SMOOTH% vZ1 Range0-100 , 0
- Gui, Add, Button,w2 h2 x398 y188 vdbmp gpwshow , .
- Gui, pw:Add, Edit, vpw1 w100, Password
- Gui, pw:Add, Button, vpw11 gpwe ,Enter
- Gui, debug:Add, Button,y8 x10 vrl grel ,Reload
- Gui, debug:Add, Button,y8 x60 vsp gsus ,Suspend
- Gui, debug:Add, Button,y8 x118 vps gpau ,Pause
- Gui, debug:Add, Button,y8 x164 vinfo ginf ,Info
- Gui, debug:Add, Button,y8 x198 vrese gresets ,Reset
- Gui, debug:Add, Edit, vcontrol w100, Cotrol Panel
- Gui, debug:Add, Button,y20 x198 vcontrolsend gcontrolsetting ,Send
- return
- ;colume 1 colume 2 colume 3 for x only [For y just add 20]
- ;0 160 290
- ;35 170 300
- pwshow:
- Gui, pw:show,, Password
- Suspend, Toggle
- return
- Home::
- Gui, pw:show,, Password
- Suspend, Toggle
- return
- pwe:
- Gui, pw:submit, hide
- if(pw1 = "Kryston")
- {
- Gui, debug:show,, Debug Menu
- SoundPlay, C:\Windows\Media\Windows Hardware Insert.wav
- Suspend, Toggle
- GuiControl, Disable, dbmp
- }
- else
- {
- SoundPlay, *16
- Suspend, Toggle
- GuiControl, Disable, dbmp
- }
- return
- rel:
- reload
- return
- sus:
- Suspend, Toggle
- return
- pau:
- Pause, Toggle
- return
- inf:
- SoundPlay, *16
- MsgBox , 16, Message, Sorry but your script is already compiled and isnt able to debug much
- return
- 1::
- GuiControl,, Space1, +1 ; Increase the current position by 1.
- return
- control := Gui, Show
- controlsetting:
- Gui, debug:Submit, NoHide
- Gui, %control%
- return
- ^!AppsKey::
- {
- Reload
- }
- ~Space::
- {
- GuiControl,, Space1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~A::
- {
- GuiControl,, A1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~B::
- {
- GuiControl,, B1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~C::
- {
- GuiControl,, C1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~D::
- {
- GuiControl,, D1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~E::
- {
- GuiControl,, E1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~F::
- {
- GuiControl,, F1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~G::
- {
- GuiControl,, G1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~H::
- {
- GuiControl,, H1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~I::
- {
- GuiControl,, I1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~J::
- {
- GuiControl,, J1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~K::
- {
- GuiControl,, K1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~L::
- {
- GuiControl,, L1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~M::
- {
- GuiControl,, M1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~N::
- {
- GuiControl,, N1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~O::
- {
- GuiControl,, O1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~P::
- {
- GuiControl,, P1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~Q::
- {
- GuiControl,, Q1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~R::
- {
- GuiControl,, R1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~S::
- {
- GuiControl,, S1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~T::
- {
- GuiControl,, T1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~U::
- {
- GuiControl,, U1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~V::
- {
- GuiControl,, V1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~W::
- {
- GuiControl,, W1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~X::
- {
- GuiControl,, X1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~Y::
- {
- GuiControl,, Y1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~Z::
- {
- GuiControl,, Z1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- ~LButton::
- {
- GuiControl,, Lclick1, +1 ; Increase the current position by 1.
- sleep 1
- return
- }
- GuiClose:
- MsgBox, 4,Exit ,Are you sure you want to exit?
- IfMsgBox, Yes, ExitApp
- Return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement