developing a script for virtual keyboard

[ElijaH]

here's my noob script.this script purpose is to toggle keystroke unto your virtual keyboard..

am I doing it right? or there is something im missing?

_____________________________________

Global $UnPaused

HotKeySet("1", "TogglePause")

HotKeySet("{ESC}", "Terminate")

While 1

ToolTip("script off",0,0)

WEnd

Func TogglePause()

$UnPaused = Not $UnPaused

While $UnPaused

WinActive("On-Screen Keyboard")

ControlClick( "On-Screen Keyboard", "@", "N191", "" , "" , "57" , "30" )

Sleep(1000)

ControlClick( "On-Screen Keyboard", "#", "N201", "" , "" , "84" , "30" )

Sleep(1000)

ControlClick( "On-Screen Keyboard", "$", "N211", "" , "" , "111" , "30" )

Sleep(1000)

ControlClick( "On-Screen Keyboard", "%", "N221", "" , "" , "138" , "30" )

Sleep(1000)

ControlClick( "On-Screen Keyboard", "^", "N231", "" , "" , "165" , "30" )

Sleep(1000)

ControlClick( "On-Screen Keyboard", "&", "N241", "" , "" , "192" , "30" )

Sleep(1000)

ControlClick( "On-Screen Keyboard", "*", "N251", "" , "" , "219" , "30" )

Sleep(1000)

WEnd

EndFunc

Func Terminate()

Exit 0

EndFunc

_____________________________________________________

Edited May 7, 2009 by ElijaH

[SmOke_N]

When a Admin/Developer/Admin closes your post (which are the only 3 types of users that can), it's best you heed their advice (if any is given). I told you not to post again until you took the tutorials and read the help file so you had a basic understanding on how to use this language.

Edit:

With your other post, you merely copy and pasted out of the help file, and asked someone to fix it. That's just as much as asking someone to do it for you. I have no issues with people asking questions when they get stuck, however, I personally have no tolerance for being to lazy to learn.

Edited May 7, 2009 by SmOke_N

[youknowwho4eva]

here's my noob script.this script purpose is to toggle keystroke unto your virtual keyboard..

am I doing it right? or there is something im missing?

_____________________________________

Global $UnPaused

HotKeySet("1", "TogglePause")

HotKeySet("{ESC}", "Terminate")

While 1

ToolTip("script off",0,0)

WEnd

Func TogglePause()

$UnPaused = Not $UnPaused

While $UnPaused

WinActive("On-Screen Keyboard")

ControlClick( "On-Screen Keyboard", "@", "N191", "" , "" , "57" , "30" )

Sleep(1000)

ControlClick( "On-Screen Keyboard", "#", "N201", "" , "" , "84" , "30" )

Sleep(1000)

ControlClick( "On-Screen Keyboard", "$", "N211", "" , "" , "111" , "30" )

Sleep(1000)

ControlClick( "On-Screen Keyboard", "%", "N221", "" , "" , "138" , "30" )

Sleep(1000)

ControlClick( "On-Screen Keyboard", "^", "N231", "" , "" , "165" , "30" )

Sleep(1000)

ControlClick( "On-Screen Keyboard", "&", "N241", "" , "" , "192" , "30" )

Sleep(1000)

ControlClick( "On-Screen Keyboard", "*", "N251", "" , "" , "219" , "30" )

Sleep(1000)

WEnd

EndFunc

Func Terminate()

Exit 0

EndFunc

_____________________________________________________

If you're not banned before you read this, what is wrong with the script? have you run it? does it do anything? Does it do what you want it to do? Does it error out? these are all questions you need to have answers for when asking for help. Most wont troubleshoot your program for you for free. Tell us your problem. Don't tell us to see if there is a problem, and if there is fix it for me.