nid help in save

Gerald · September 28, 2009

can some one help me

i made my program i want to save the drop down menu in .inf

my text box is save properly but in my drop menu i can save it plss help me

her is my code

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****

#AutoIt3Wrapper_icon=star-wars\Dart Wader.ico

#AutoIt3Wrapper_Res_Comment=Cat-Hotkey Final 0.1

#AutoIt3Wrapper_Res_Description=Cat-Hotkey Final 0.1

#AutoIt3Wrapper_Res_Fileversion=0.1.0.0

#AutoIt3Wrapper_Res_LegalCopyright=Gerald Catague

#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=d:\project code\project dota\layout pic\form13.kxf

$sIniFile = @WindowsDir & "\Cat-Hotkey Config.ini"

$spm = IniRead($sIniFile, "Cat-Hotkey Final 0.1", "spam msg 1", "Walng Hero d2")

$spm2 = IniRead($sIniFile, "Cat-Hotkey Final 0.1", "spam msg 2", "nc dude")

$spm3 = IniRead($sIniFile, "Cat-Hotkey Final 0.1", "spam msg 3", "back n sir")

$spm4 = IniRead($sIniFile, "Cat-Hotkey Final 0.1", "spam msg 4", "-apso")

$mainbody = GUICreate("Cat-Hotkey Final 0.1", 356, 306, 356, 217)

$PageControl1 = GUICtrlCreateTab(8, 8, 340, 256)

GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)

$TabSheet1 = GUICtrlCreateTabItem("Msg Set")

$Checkbox1 = GUICtrlCreateCheckbox("Enemy Hp", 248, 227, 81, 17)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

$Checkbox2 = GUICtrlCreateCheckbox("Allies Hp", 168, 227, 73, 17)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

$Button4 = GUICtrlCreateButton("Save Setting", 96, 163, 163, 25)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

$Input1 = GUICtrlCreateInput($spm, 48, 83, 121, 24)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

$Input2 = GUICtrlCreateInput($spm2, 48, 123, 121, 24)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

$Input3 = GUICtrlCreateInput($spm3, 208, 83, 121, 24)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

$Input4 = GUICtrlCreateInput($spm4, 208, 123, 121, 24)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

$Label1 = GUICtrlCreateLabel("F6 =", 16, 83, 31, 20)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

$Label2 = GUICtrlCreateLabel("F7 =", 16, 123, 31, 20)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

$Label3 = GUICtrlCreateLabel("F8 =", 176, 83, 31, 20)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

$Label4 = GUICtrlCreateLabel("F9 =", 176, 123, 27, 20)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

$Group1 = GUICtrlCreateGroup("HP bar view", 160, 203, 177, 57)

GUICtrlSetFont(-1, 10, 400, 0, "Arial")

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Label14 = GUICtrlCreateLabel("Press F5 to on/off Send Msg", 104, 51, 158, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Arial")

$Label16 = GUICtrlCreateLabel("Click Help for more info", 16, 242, 132, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Arial")

$TabSheet2 = GUICtrlCreateTabItem("Inventory key set")

$C9 = GUICtrlCreateCombo("NumPad 9", 56, 75, 105, 25)

GUICtrlSetFont(-1, 8, 400, 0, "Arial")

$C8 = GUICtrlCreateCombo("NumPad 8", 56, 107, 105, 25)

GUICtrlSetFont(-1, 8, 400, 0, "Arial")

$C7 = GUICtrlCreateCombo("NumPad 7", 56, 139, 105, 25)

GUICtrlSetFont(-1, 8, 400, 0, "Arial")

$C6 = GUICtrlCreateCombo("NumPad 6", 56, 171, 105, 25)

GUICtrlSetFont(-1, 8, 400, 0, "Arial")

$C5 = GUICtrlCreateCombo("NumPad 5", 56, 203, 105, 25)

GUICtrlSetFont(-1, 8, 400, 0, "Arial")

$C4 = GUICtrlCreateCombo("NumPad 4", 216, 75, 113, 25)

GUICtrlSetFont(-1, 8, 400, 0, "Arial")

$C3 = GUICtrlCreateCombo("NumPad 3", 216, 107, 113, 25)

GUICtrlSetFont(-1, 8, 400, 0, "Arial")

$C2 = GUICtrlCreateCombo("NumPad 2", 216, 139, 113, 25)

GUICtrlSetFont(-1, 8, 400, 0, "Arial")

$C1 = GUICtrlCreateCombo("NumPad 1", 216, 171, 113, 25)

GUICtrlSetFont(-1, 8, 400, 0, "Arial")

$Label5 = GUICtrlCreateLabel("Alt+w =", 16, 107, 43, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Arial")

$Label6 = GUICtrlCreateLabel("Alt+e =", 16, 75, 41, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Arial")

$Label7 = GUICtrlCreateLabel("Alt+q =", 16, 139, 41, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Arial")

$Label8 = GUICtrlCreateLabel("Alt+d =", 16, 171, 41, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Arial")

$Label9 = GUICtrlCreateLabel("Alt+s =", 16, 203, 41, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Arial")

$Label10 = GUICtrlCreateLabel("Alt+a =", 176, 75, 41, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Arial")

$Label11 = GUICtrlCreateLabel("Alt+c =", 176, 107, 40, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Arial")

$Label12 = GUICtrlCreateLabel("Alt+x =", 176, 139, 39, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Arial")

$Label13 = GUICtrlCreateLabel("Alt+z =", 176, 171, 39, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Arial")

$Label15 = GUICtrlCreateLabel("Cat-Hotkey Final 0.1 are Copyright to Gerald Catague", 40, 242, 293, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Arial")

$Label17 = GUICtrlCreateLabel("Press [Home] to Run Coztom Hotkey", 88, 48, 204, 19)

GUICtrlSetFont(-1, 9, 400, 0, "Arial")

GUICtrlCreateTabItem("")

$Button1 = GUICtrlCreateButton("OK", 110, 272, 75, 25)

$Button2 = GUICtrlCreateButton("Cancel", 190, 272, 75, 25)

$Button3 = GUICtrlCreateButton("Help", 272, 272, 75, 25)

Global $hotkeysset = False

Global $msgauto = False

Global $hidesbody = False

HotKeySet("{HOME}","TogglePause")

HotKeySet("{F5}","TPause")

HotKeySet("{Insert}","hidebody")

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

Opt("TrayMenuMode",1) ; Default tray menu items (Script Paused/Exit) will not be shown.

$prefsitem = TrayCreateItem("Instruction")

TrayCreateItem("")

$aboutitem = TrayCreateItem("About")

TrayCreateItem("")

$showtray = TrayCreateItem("Show and Hide [insert]")

TrayCreateItem("")

$exititem = TrayCreateItem("Exit")

TraySetState()

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

case $Checkbox2

trunHpviewbyKey()

Case $Checkbox1

trunHpviewbyKeyKalaban()

Case $Button3

about()

Case $Button1

TogglePause()

Case $Button2

Exit

case $Button4

IniWrite($sIniFile, "Cat-Hotkey Final 0.1", "spam msg 1", GUICtrlRead($Input1))

IniWrite($sIniFile, "Cat-Hotkey Final 0.1", "spam msg 2", GUICtrlRead($Input2))

IniWrite($sIniFile, "Cat-Hotkey Final 0.1", "spam msg 3", GUICtrlRead($Input3))

IniWrite($sIniFile, "Cat-Hotkey Final 0.1", "spam msg 4", GUICtrlRead($Input4))

MsgBox(0,"Cat-Hotkey Final 0.1","Auto Send Msg Save!!")

EndSwitch

$msg = TrayGetMsg()

Select

Case $msg = 0

ContinueLoop

Case $msg = $prefsitem

about()

case $msg = $showtray

hidebody()

Case $msg = $aboutitem

about()

Case $msg = $exititem

ExitLoop

EndSelect

WEnd

func _hidebody()

GUISetState(@SW_HIDE, $mainbody)

TrayTip("Cat-Hotkey Final 0.1", "Click the Help to see instruction", 5, 1)

EndFunc

func _showbody()

GUISetState(@SW_SHOW, $mainbody)

TrayTip("Cat-Hotkey Final 0.1", "Click the Help to see instruction", 5, 1)

EndFunc

Func TogglePause()

$hotkeysset = Not $hotkeysset

If $hotkeysset = True Then

hotkeyon()

Else

hotkeyoff()

EndIf

EndFunc

Func hidebody()

$hidesbody = Not $hidesbody

If $hidesbody = True Then

_hidebody()

Else

_showbody()

EndIf

EndFunc

Func TPause()

$msgauto = Not $msgauto

If $msgauto = True Then

ongamemsgon()

Else

ongamemsgoff()

EndIf

EndFunc

func trunHpviewbyKey()

If BitAND(GUICtrlRead($Checkbox2), $GUI_CHECKED) Then

MsgBox(0, "Cat-Hotkey Final 0.1", "Ingame Press [Ctrl+Q] to active the HP bar")

CalltheHPview()

Else

MsgBox(0, "Cat-Hotkey Final 0.1", "Allies Hp Viewr disable")

setdisable()

EndIf

EndFunc

Func trunHpviewbyKeyKalaban()

If BitAND(GUICtrlRead($Checkbox1), $GUI_CHECKED) Then

MsgBox(0, "Cat-Hotkey Final 0.1", "Ingame Press [Ctrl+W] to active the HP bar")

CalltheHPview()

Else

MsgBox(0, "Cat-Hotkey Final 0.1", "enemy Hp Viewr disable")

setdisable()

EndIf

EndFunc

Func CalltheHPview()

HotKeySet("^q","dokasapi")

HotKeySet("^w","dokalaban")

EndFunc

func dokasapi()

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

send("[")

Send("{[ down}") ;Holds the A key down

TrayTip("Cat-Hotkey Final0.1", "The allies Hp View was active", 5, 1)

EndFunc

Func dokalaban()

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

send("]")

Send("{] down}") ;Holds the A key down

TrayTip("Cat-Hotkey Final0.1", "The Enemy Bar was active", 5, 1)

EndFunc

func setdisable()

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

Send("{] up}") ;Holds the [ key up

Send("{[ up}")

TrayTip("Cat-Hotkey Final0.1", "The Hp bar was disable", 5, 1)

EndFunc

;on game MsgBox

func hotkeyon()

HotKeySet("!z","alt_Z")

HotKeySet("!x","alt_X")

HotKeySet("!c","alt_c")

HotKeySet("!a","alt_a")

HotKeySet("!s","alt_s")

HotKeySet("!d","alt_d")

HotKeySet("!q","alt_q")

HotKeySet("!w","alt_w")

HotKeySet("!e","alt_e")

GUICtrlSetState($C1, $GUI_DISABLE)

GUICtrlSetState($C2, $GUI_DISABLE)

GUICtrlSetState($C3, $GUI_DISABLE)

GUICtrlSetState($C4, $GUI_DISABLE)

GUICtrlSetState($C5, $GUI_DISABLE)

GUICtrlSetState($C6, $GUI_DISABLE)

GUICtrlSetState($C7, $GUI_DISABLE)

GUICtrlSetState($C8, $GUI_DISABLE)

GUICtrlSetState($C9, $GUI_DISABLE)

GUICtrlSetData($Button1, "Stop")

TrayTip("Cat-Hotkey Final0.1", "Costomize Hotkey is Active", 5, 1)

EndFunc

Func hotkeyoff()

HotKeySet("!z")

HotKeySet("!x")

HotKeySet("!c")

HotKeySet("!a")

HotKeySet("!s")

HotKeySet("!d")

HotKeySet("!q")

HotKeySet("!w")

HotKeySet("!e")

GUICtrlSetState($C1, $GUI_ENABLE)

GUICtrlSetState($C2, $GUI_ENABLE)

GUICtrlSetState($C3, $GUI_ENABLE)

GUICtrlSetState($C4, $GUI_ENABLE)

GUICtrlSetState($C5, $GUI_ENABLE)

GUICtrlSetState($C6, $GUI_ENABLE)

GUICtrlSetState($C7, $GUI_ENABLE)

GUICtrlSetState($C8, $GUI_ENABLE)

GUICtrlSetState($C9, $GUI_ENABLE)

GUICtrlSetData($Button1, "OK")

TrayTip("Cat-Hotkey Final0.1", "Costomize Hotkey are Disable", 5, 1)

EndFunc

func ongamemsgon()

HotKeySet("{F6}","msg")

HotKeySet("{F7}","msg2")

HotKeySet("{F8}","msg3")

HotKeySet("{F9}","msg4")

GUICtrlSetState($Input1, $GUI_DISABLE)

GUICtrlSetState($Input2, $GUI_DISABLE)

GUICtrlSetState($Input3, $GUI_DISABLE)

GUICtrlSetState($Input4, $GUI_DISABLE)

TrayTip("Cat-Hotkey Final0.1", "Auto Send Msg Is Active", 5, 1)

EndFunc

Func ongamemsgoff()

HotKeySet("{F6}")

HotKeySet("{F7}")

HotKeySet("{F8}")

HotKeySet("{F9}")

GUICtrlSetState($Input1, $GUI_ENABLE)

GUICtrlSetState($Input2, $GUI_ENABLE)

GUICtrlSetState($Input3, $GUI_ENABLE)

GUICtrlSetState($Input4, $GUI_ENABLE)

TrayTip("Cat-Hotkey Final0.1", "Auto Send Msg Is Disable", 5, 1)

EndFunc

Func msg()

$string = GUICtrlRead($Input1)

$string = StringReplace ($string, "^", "{^}")

$string = StringReplace ($string, "!", "{!}")

$string = StringReplace ($string, "@", "@")

$string = StringReplace ($string, "@", "s")

$string = StringReplace ($string, "$", "$")

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

send ("{ENTER}")

Send($string)

send ("{ENTER}")

EndFunc

Func msg2()

$string = GUICtrlRead($Input2)

$string = StringReplace ($string, "^", "{^}")

$string = StringReplace ($string, "!", "{!}")

$string = StringReplace ($string, "@", "@")

$string = StringReplace ($string, "@", "s")

$string = StringReplace ($string, "$", "$")

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

send ("{ENTER}")

Send($string)

send ("{ENTER}")

EndFunc

Func msg3()

$string = GUICtrlRead($Input3)

$string = StringReplace ($string, "^", "{^}")

$string = StringReplace ($string, "!", "{!}")

$string = StringReplace ($string, "@", "@")

$string = StringReplace ($string, "@", "s")

$string = StringReplace ($string, "$", "$")

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

send ("{ENTER}")

Send($string)

send ("{ENTER}")

EndFunc

Func msg4()

$string = GUICtrlRead($Input4)

$string = StringReplace ($string, "^", "{^}")

$string = StringReplace ($string, "!", "{!}")

$string = StringReplace ($string, "@", "@")

$string = StringReplace ($string, "@", "s")

$string = StringReplace ($string, "$", "$")

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

send ("{ENTER}")

Send($string)

send ("{ENTER}")

EndFunc

;;Numpad

Func alt_Z()

$string = GUICtrlRead($C1)

$string = StringReplace ($string, "NumPad 1", "{NumPad1}")

$string = StringReplace ($string, "Letter A", "a")

$string = StringReplace ($string, "Letter B", "b")

$string = StringReplace ($string, "Letter C", "c")

$string = StringReplace ($string, "Letter D", "d")

$string = StringReplace ($string, "Letter E", "e")

$string = StringReplace ($string, "Letter F", "f")

$string = StringReplace ($string, "Letter G", "g")

$string = StringReplace ($string, "Letter H", "h")

$string = StringReplace ($string, "Letter I", "i")

$string = StringReplace ($string, "Letter J", "j")

$string = StringReplace ($string, "Letter K", "k")

$string = StringReplace ($string, "Letter L", "l")

$string = StringReplace ($string, "Letter M", "m")

$string = StringReplace ($string, "Letter N", "n")

$string = StringReplace ($string, "Letter O", "o")

$string = StringReplace ($string, "Letter P", "p")

$string = StringReplace ($string, "Letter Q", "q")

$string = StringReplace ($string, "Letter R", "r")

$string = StringReplace ($string, "Letter S", "s")

$string = StringReplace ($string, "Letter T", "t")

$string = StringReplace ($string, "Letter U", "u")

$string = StringReplace ($string, "Letter V", "v")

$string = StringReplace ($string, "Letter W", "w")

$string = StringReplace ($string, "Letter X", "x")

$string = StringReplace ($string, "Letter Y", "y")

$string = StringReplace ($string, "Letter Z", "z")

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

Send($string)

EndFunc

Func alt_X()

$string = GUICtrlRead($C2)

$string = StringReplace ($string, "NumPad 2", "{NumPad2}")

$string = StringReplace ($string, "Letter A", "a")

$string = StringReplace ($string, "Letter B", "b")

$string = StringReplace ($string, "Letter C", "c")

$string = StringReplace ($string, "Letter D", "d")

$string = StringReplace ($string, "Letter E", "e")

$string = StringReplace ($string, "Letter F", "f")

$string = StringReplace ($string, "Letter G", "g")

$string = StringReplace ($string, "Letter H", "h")

$string = StringReplace ($string, "Letter I", "i")

$string = StringReplace ($string, "Letter J", "j")

$string = StringReplace ($string, "Letter K", "k")

$string = StringReplace ($string, "Letter L", "l")

$string = StringReplace ($string, "Letter M", "m")

$string = StringReplace ($string, "Letter N", "n")

$string = StringReplace ($string, "Letter O", "o")

$string = StringReplace ($string, "Letter P", "p")

$string = StringReplace ($string, "Letter Q", "q")

$string = StringReplace ($string, "Letter R", "r")

$string = StringReplace ($string, "Letter S", "s")

$string = StringReplace ($string, "Letter T", "t")

$string = StringReplace ($string, "Letter U", "u")

$string = StringReplace ($string, "Letter V", "v")

$string = StringReplace ($string, "Letter W", "w")

$string = StringReplace ($string, "Letter X", "x")

$string = StringReplace ($string, "Letter Y", "y")

$string = StringReplace ($string, "Letter Z", "z")

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

Send($string)

EndFunc

Func alt_c()

$string = GUICtrlRead($C3)

$string = StringReplace ($string, "NumPad 3", "{NumPad3}")

$string = StringReplace ($string, "Letter A", "a")

$string = StringReplace ($string, "Letter B", "b")

$string = StringReplace ($string, "Letter C", "c")

$string = StringReplace ($string, "Letter D", "d")

$string = StringReplace ($string, "Letter E", "e")

$string = StringReplace ($string, "Letter F", "f")

$string = StringReplace ($string, "Letter G", "g")

$string = StringReplace ($string, "Letter H", "h")

$string = StringReplace ($string, "Letter I", "i")

$string = StringReplace ($string, "Letter J", "j")

$string = StringReplace ($string, "Letter K", "k")

$string = StringReplace ($string, "Letter L", "l")

$string = StringReplace ($string, "Letter M", "m")

$string = StringReplace ($string, "Letter N", "n")

$string = StringReplace ($string, "Letter O", "o")

$string = StringReplace ($string, "Letter P", "p")

$string = StringReplace ($string, "Letter Q", "q")

$string = StringReplace ($string, "Letter R", "r")

$string = StringReplace ($string, "Letter S", "s")

$string = StringReplace ($string, "Letter T", "t")

$string = StringReplace ($string, "Letter U", "u")

$string = StringReplace ($string, "Letter V", "v")

$string = StringReplace ($string, "Letter W", "w")

$string = StringReplace ($string, "Letter X", "x")

$string = StringReplace ($string, "Letter Y", "y")

$string = StringReplace ($string, "Letter Z", "z")

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

Send($string)

EndFunc

Func alt_a()

$string = GUICtrlRead($C4)

$string = StringReplace ($string, "NumPad 4", "{NumPad4}")

$string = StringReplace ($string, "Letter A", "a")

$string = StringReplace ($string, "Letter B", "b")

$string = StringReplace ($string, "Letter C", "c")

$string = StringReplace ($string, "Letter D", "d")

$string = StringReplace ($string, "Letter E", "e")

$string = StringReplace ($string, "Letter F", "f")

$string = StringReplace ($string, "Letter G", "g")

$string = StringReplace ($string, "Letter H", "h")

$string = StringReplace ($string, "Letter I", "i")

$string = StringReplace ($string, "Letter J", "j")

$string = StringReplace ($string, "Letter K", "k")

$string = StringReplace ($string, "Letter L", "l")

$string = StringReplace ($string, "Letter M", "m")

$string = StringReplace ($string, "Letter N", "n")

$string = StringReplace ($string, "Letter O", "o")

$string = StringReplace ($string, "Letter P", "p")

$string = StringReplace ($string, "Letter Q", "q")

$string = StringReplace ($string, "Letter R", "r")

$string = StringReplace ($string, "Letter S", "s")

$string = StringReplace ($string, "Letter T", "t")

$string = StringReplace ($string, "Letter U", "u")

$string = StringReplace ($string, "Letter V", "v")

$string = StringReplace ($string, "Letter W", "w")

$string = StringReplace ($string, "Letter X", "x")

$string = StringReplace ($string, "Letter Y", "y")

$string = StringReplace ($string, "Letter Z", "z")

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

Send($string)

EndFunc

Func alt_s()

$string = GUICtrlRead($C5)

$string = StringReplace ($string, "NumPad 5", "{NumPad5}")

$string = StringReplace ($string, "Letter A", "a")

$string = StringReplace ($string, "Letter B", "b")

$string = StringReplace ($string, "Letter C", "c")

$string = StringReplace ($string, "Letter D", "d")

$string = StringReplace ($string, "Letter E", "e")

$string = StringReplace ($string, "Letter F", "f")

$string = StringReplace ($string, "Letter G", "g")

$string = StringReplace ($string, "Letter H", "h")

$string = StringReplace ($string, "Letter I", "i")

$string = StringReplace ($string, "Letter J", "j")

$string = StringReplace ($string, "Letter K", "k")

$string = StringReplace ($string, "Letter L", "l")

$string = StringReplace ($string, "Letter M", "m")

$string = StringReplace ($string, "Letter N", "n")

$string = StringReplace ($string, "Letter O", "o")

$string = StringReplace ($string, "Letter P", "p")

$string = StringReplace ($string, "Letter Q", "q")

$string = StringReplace ($string, "Letter R", "r")

$string = StringReplace ($string, "Letter S", "s")

$string = StringReplace ($string, "Letter T", "t")

$string = StringReplace ($string, "Letter U", "u")

$string = StringReplace ($string, "Letter V", "v")

$string = StringReplace ($string, "Letter W", "w")

$string = StringReplace ($string, "Letter X", "x")

$string = StringReplace ($string, "Letter Y", "y")

$string = StringReplace ($string, "Letter Z", "z")

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

Send($string)

EndFunc

Func alt_d()

$string = GUICtrlRead($C6)

$string = StringReplace ($string, "NumPad 6", "{NumPad6}")

$string = StringReplace ($string, "Letter A", "a")

$string = StringReplace ($string, "Letter B", "b")

$string = StringReplace ($string, "Letter C", "c")

$string = StringReplace ($string, "Letter D", "d")

$string = StringReplace ($string, "Letter E", "e")

$string = StringReplace ($string, "Letter F", "f")

$string = StringReplace ($string, "Letter G", "g")

$string = StringReplace ($string, "Letter H", "h")

$string = StringReplace ($string, "Letter I", "i")

$string = StringReplace ($string, "Letter J", "j")

$string = StringReplace ($string, "Letter K", "k")

$string = StringReplace ($string, "Letter L", "l")

$string = StringReplace ($string, "Letter M", "m")

$string = StringReplace ($string, "Letter N", "n")

$string = StringReplace ($string, "Letter O", "o")

$string = StringReplace ($string, "Letter P", "p")

$string = StringReplace ($string, "Letter Q", "q")

$string = StringReplace ($string, "Letter R", "r")

$string = StringReplace ($string, "Letter S", "s")

$string = StringReplace ($string, "Letter T", "t")

$string = StringReplace ($string, "Letter U", "u")

$string = StringReplace ($string, "Letter V", "v")

$string = StringReplace ($string, "Letter W", "w")

$string = StringReplace ($string, "Letter X", "x")

$string = StringReplace ($string, "Letter Y", "y")

$string = StringReplace ($string, "Letter Z", "z")

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

Send($string)

EndFunc

Func alt_q()

$string = GUICtrlRead($C7)

$string = StringReplace ($string, "NumPad 7", "{NumPad7}")

$string = StringReplace ($string, "Letter A", "a")

$string = StringReplace ($string, "Letter B", "b")

$string = StringReplace ($string, "Letter C", "c")

$string = StringReplace ($string, "Letter D", "d")

$string = StringReplace ($string, "Letter E", "e")

$string = StringReplace ($string, "Letter F", "f")

$string = StringReplace ($string, "Letter G", "g")

$string = StringReplace ($string, "Letter H", "h")

$string = StringReplace ($string, "Letter I", "i")

$string = StringReplace ($string, "Letter J", "j")

$string = StringReplace ($string, "Letter K", "k")

$string = StringReplace ($string, "Letter L", "l")

$string = StringReplace ($string, "Letter M", "m")

$string = StringReplace ($string, "Letter N", "n")

$string = StringReplace ($string, "Letter O", "o")

$string = StringReplace ($string, "Letter P", "p")

$string = StringReplace ($string, "Letter Q", "q")

$string = StringReplace ($string, "Letter R", "r")

$string = StringReplace ($string, "Letter S", "s")

$string = StringReplace ($string, "Letter T", "t")

$string = StringReplace ($string, "Letter U", "u")

$string = StringReplace ($string, "Letter V", "v")

$string = StringReplace ($string, "Letter W", "w")

$string = StringReplace ($string, "Letter X", "x")

$string = StringReplace ($string, "Letter Y", "y")

$string = StringReplace ($string, "Letter Z", "z")

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

Send($string)

EndFunc

Func alt_w()

$string = GUICtrlRead($C8)

$string = StringReplace ($string, "NumPad 8", "{NumPad8}")

$string = StringReplace ($string, "Letter A", "a")

$string = StringReplace ($string, "Letter B", "b")

$string = StringReplace ($string, "Letter C", "c")

$string = StringReplace ($string, "Letter D", "d")

$string = StringReplace ($string, "Letter E", "e")

$string = StringReplace ($string, "Letter F", "f")

$string = StringReplace ($string, "Letter G", "g")

$string = StringReplace ($string, "Letter H", "h")

$string = StringReplace ($string, "Letter I", "i")

$string = StringReplace ($string, "Letter J", "j")

$string = StringReplace ($string, "Letter K", "k")

$string = StringReplace ($string, "Letter L", "l")

$string = StringReplace ($string, "Letter M", "m")

$string = StringReplace ($string, "Letter N", "n")

$string = StringReplace ($string, "Letter O", "o")

$string = StringReplace ($string, "Letter P", "p")

$string = StringReplace ($string, "Letter Q", "q")

$string = StringReplace ($string, "Letter R", "r")

$string = StringReplace ($string, "Letter S", "s")

$string = StringReplace ($string, "Letter T", "t")

$string = StringReplace ($string, "Letter U", "u")

$string = StringReplace ($string, "Letter V", "v")

$string = StringReplace ($string, "Letter W", "w")

$string = StringReplace ($string, "Letter X", "x")

$string = StringReplace ($string, "Letter Y", "y")

$string = StringReplace ($string, "Letter Z", "z")

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

Send($string)

EndFunc

Func alt_e()

$string = GUICtrlRead($C9)

$string = StringReplace ($string, "NumPad 9", "{NumPad9}")

$string = StringReplace ($string, "Letter A", "a")

$string = StringReplace ($string, "Letter B", "b")

$string = StringReplace ($string, "Letter C", "c")

$string = StringReplace ($string, "Letter D", "d")

$string = StringReplace ($string, "Letter E", "e")

$string = StringReplace ($string, "Letter F", "f")

$string = StringReplace ($string, "Letter G", "g")

$string = StringReplace ($string, "Letter H", "h")

$string = StringReplace ($string, "Letter I", "i")

$string = StringReplace ($string, "Letter J", "j")

$string = StringReplace ($string, "Letter K", "k")

$string = StringReplace ($string, "Letter L", "l")

$string = StringReplace ($string, "Letter M", "m")

$string = StringReplace ($string, "Letter N", "n")

$string = StringReplace ($string, "Letter O", "o")

$string = StringReplace ($string, "Letter P", "p")

$string = StringReplace ($string, "Letter Q", "q")

$string = StringReplace ($string, "Letter R", "r")

$string = StringReplace ($string, "Letter S", "s")

$string = StringReplace ($string, "Letter T", "t")

$string = StringReplace ($string, "Letter U", "u")

$string = StringReplace ($string, "Letter V", "v")

$string = StringReplace ($string, "Letter W", "w")

$string = StringReplace ($string, "Letter X", "x")

$string = StringReplace ($string, "Letter Y", "y")

$string = StringReplace ($string, "Letter Z", "z")

$A_KeyDelay = -0

$keydown = -0

opt("sendkeydelay" , $A_KeyDelay)

opt("sendkeydowndelay" , $keydown)

Send($string)

EndFunc

;;about

Func about()

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("About", 264, 330, 359, 200)

GUISetIcon("D:\003.ico")

$GroupBox111 = GUICtrlCreateGroup("", 8, 1, 249, 297)

$Group1 = GUICtrlCreateGroup("Instruction key", 16, 24, 217, 121)

$Label11 = GUICtrlCreateLabel("[insert] = Hide and show Cat-Hoteky", 24, 40, 175, 17)

$Label21 = GUICtrlCreateLabel("[Home] = On/Off The HotKey", 24, 56, 143, 17)

$Label31 = GUICtrlCreateLabel("[F5] = On/Off Auto Send Msg", 24, 72, 146, 17)

$Label41 = GUICtrlCreateLabel("For more Info how to use this e-mail me at", 24, 96, 199, 17)

$Label51 = GUICtrlCreateLabel("game_catague@yahoo.com", 24, 112, 138, 17)

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Group222 = GUICtrlCreateGroup("Special Thank's to the Following", 16, 152, 217, 137)

$Label61 = GUICtrlCreateLabel("kiel_allen_21", 24, 176, 66, 17)

$Label71 = GUICtrlCreateLabel("Save the auto send Msg", 24, 208, 120, 17)

$Label81 = GUICtrlCreateLabel("And Change the key of auto Msg", 24, 224, 160, 17)

$Label91 = GUICtrlCreateLabel("Give The Idea of The Following:", 24, 192, 153, 17)

$Label101 = GUICtrlCreateLabel("And You!! Thank You for Suporting me", 24, 240, 187, 17)

$Label111 = GUICtrlCreateLabel("More Version To come ^^,)", 24, 264, 132, 17)

GUICtrlCreateGroup("", -99, -99, 1, 1)

$Button111 = GUICtrlCreateButton("&OK", 97, 299, 75, 25, 0)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

GUIDelete($Form1)

ExitLoop

Case $Button111

GUIDelete($Form1)

ExitLoop

EndSwitch

WEnd

EndFunc

adik2dmax666 · February 9, 2010

lol alang nag rereply sa dota utilities mo ah ... add mo ko sa ym phili_blu09@yahoo.com tulungan mo ako gwa garena tunnel lahat sa room at autoclicker

Edited February 9, 2010 by adik2dmax666

Yashied · February 9, 2010

Gerald, use [аutoit][/аutoit] tag please.

Sign In

nid help in save

Recommended Posts

Gerald

adik2dmax666

Yashied

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members

Browse

AutoIt Resources

Release

Beta