JeeKi

Elimde kendim editleyerek : [codebox]#NoTrayIcon #include <nmemory.au3> $spider=ProcessExists("Örnek.exe") If Not $spider Then MsgBox(16,@ScriptName,$spider &" Bulunamadı.",3) Exit EndIf $memory=_MemoryOpen($spider) $read=_MemoryRead(0x015F6868,$memory) $value=InputBox(@ScriptName,"Para Miktarı:",$read,"",50,50) $write=_MemoryWrite(0x015F6868,$memory,$value) If $write=1 Then MsgBox(64,@ScriptName,"Başarıyla Tamamlanmıştır",3) Else MsgBox(16,@ScriptName,"Hata Kodu : 06669 "& @error) EndIf[/codebox] Kod gayet bekledigim gibi calısmaktadır ama sonradan ögrendigim şey İle : [codebox]#include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 210, 309, 192, 124) $Label1 = GUICtrlCreateLabel("Para Miktarı:", 8, 72, 95, 24) GUICtrlSetFont(-1, 11, 400, 0, "Comic Sans MS") $Label3 = GUICtrlCreateLabel("Kosma Hızı:", 14, 104, 83, 24) GUICtrlSetFont(-1, 11, 400, 0, "Comic Sans MS") $Label2 = GUICtrlCreateLabel("Saldırı Hızı:", 8, 136, 86, 24) GUICtrlSetFont(-1, 11, 400, 0, "Comic Sans MS") $Input3 = GUICtrlCreateInput("", 120, 136, 81, 21) $Label4 = GUICtrlCreateLabel("Oto Pot(Gün):", 8, 168, 100, 24) GUICtrlSetFont(-1, 11, 400, 0, "Comic Sans MS") $Input4 = GUICtrlCreateInput("60", 120, 168, 81, 21) $Input1 = GUICtrlCreateInput("", 120, 72, 81, 21) $Input2 = GUICtrlCreateInput("", 120, 104, 81, 21) $Label5 = GUICtrlCreateLabel("Oto HP :", 8, 216, 63, 24) GUICtrlSetFont(-1, 11, 400, 0, "Comic Sans MS") $Label6 = GUICtrlCreateLabel("%10 = 1 %20=2 %30=3 %40=4 ", 8, 248, 189, 17) $Label7 = GUICtrlCreateLabel("%50=5", 80, 272, 36, 17) $Input5 = GUICtrlCreateInput("", 72, 216, 25, 21) $Label8 = GUICtrlCreateLabel("Oto MP :", 112, 216, 64, 24) GUICtrlSetFont(-1, 11, 400, 0, "Comic Sans MS") $Input6 = GUICtrlCreateInput("", 176, 216, 25, 21) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd [/codebox] Böyle Bişey Yaptım Bu Seferde Bu 2sini Birleştiremiyorum :S Yani : $value=InputBox(@ScriptName,"Para Miktarı:",$read,"",50,50) Bu kodda ınputBox olusturuyor ama ben 2.koddaki $Input1 = GUICtrlCreateInput("", 120, 72, 81, 21) Bunun Olmasını İstiyorum .. Inputbox'a yazılan değilde İnput1 e yazılanın olmasını istiyorum nasıl yapacagım :S