Jump to content

blackman12

Emekli
  • Posts

    5349
  • Joined

  • Last visited

Posts posted by blackman12

  1. Faturada "SAMSUNG GALAXY 9100" yazdığına göre haklı çıkma oranın yüksek. tüketici mahkemeleri var, ama işi uzatır, onun yerine adamalara buyrun faturada yazan bu, eğer hatanızı telafi etmezseniz tüketici mahkemesine gidicem gibisinden tehditlerde bulun, pek işe yarıcanı sanmam ama denemekte de fayda var.
  2. [codebox]#NoTrayIcon
    #include <nmemory.au3>

    $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)
    $button = GUICtrlCreateButton("ayarla",10,10,100)
    GUISetState(@SW_SHOW)

    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case -3
    Exit
    case $button
    $spider=ProcessExists("Örnek.exe")
    if Not $spider Then
    MsgBox(16,@ScriptName,$spider &" Bulunamadı.",3)
    Exit
    EndIf
    $memory=_MemoryOpen($spider)
    $read=_MemoryRead(0x015F6868,$memory)
    $value=GUICtrlRead($Input1)
    $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
    EndSwitch
    WEnd[/codebox]

    yalnız nmemory.au3 ünü alırım haa ;)

  3. [codebox]GUICreate("deneme",300,300)
    $prog = GUICtrlCreateProgress(10, 10, 200, 20)
    $lab = GUICtrlCreateLabel("",10,70,100,25)
    $rastgele = random(245,5145,1) ; ben burada randomdan aldım değeri, sen sayının bağlı olduğu değişkene göre gönderirsin.
    guictrlsetdata($lab,$rastgele)
    GUISetState()
    for $i = 1 to $rastgele
    GUICtrlSetData($prog,$rastgele*$i/100)
    Next

    Sleep(2000)[/codebox]
  4. [b]Type[/b] [b]Details[/b] none dllcall bir dönüş yapmıyor.
    BYTE 8 bit uzunluğunda bir sayı değeri (0 - 255 arası)
    BOOLEAN 8 bit uzunluğunda bir sayı değeri (genelde true false gibi dönüşler için kullanılır)
    short 16 bitlik bir sayı değeri (−32,768 to 32,767)
    USHORT 16bitlik bir sayı değeri ( 0 to 65,535) WORD 16 bitlik bir sayı değeri ( 0 to 65,535)
    int 32 bit bir sayı değeri (genelde sayı değeri dönmesini istediğimizde bu değişkeni kullan)
    long 32 bitlik sayı (−2,147,483,648 to 2,147,483,647)
    BOOL 32 bitlik sayı (−2,147,483,648 to 2,147,483,647)
    UINT 32 bitlik sayı (0 to 4,294,967,295)
    ULONG 32 bitlik sayı (0 to 4,294,967,295) DWORD 32 bitlik sayı (0 to 4,294,967,295) INT64 64 bit sayı (−9,223,372,036,854,775,808 to 9,223,372,036,854,775,807)
    UINT64 64 bit sayı ( 0 to 18,446,744,073,709,551,615)
    ptr genel bir parametre
    HWND dönen veri bir pencere veya gui ise
    HANDLE dönen veri bir pencere elemanının handleı ise
    float a single precision floating point number double gerçekten büyük sayılar için −(2[sup]127[/sup]) to 2[sup]127[/sup] − 1 INT_PTR, LONG_PTR, LRESULT, LPARAM pozitif değerler için kullanılabilecek genel terimler, dönen veriye göre şekillenirler
    UINT_PTR, ULONG_PTR, DWORD_PTR, WPARAM - veya + değerler için genel terimler
    str bildiğimiz string yani text dönüşü 65536 karaktere kadar dönüş alabilir
    wstr unicode
    struct eğer dönüş bir structure ise


  5. gerçekten çok kullanışlı bi fonksiyomuş ;)

    bir öğeyle sınırlandırmadan tüm öğeleri taşınabilir yapabilirsin.

    Func _CONTROL_MOVE($CTRL_ID = "")
    Local $GGCI = GUIGetCursorInfo()
    If @error Then Return False
    Local $tasi = $GGCI[4]
    If $GGCI[4] = $CTRL_ID Then $tasi = $CTRL_ID
    GUICtrlSendMsg($tasi, 0x0112, BitOR(0xF010, 2), 0)
    EndFunc ;==>_CONTROL_MOVE

  6. [code]1. [i]isim[/i] Yapılması, yerine getirilmesi, insanlık duygusu, töre ve yasa bakımından gerekli olan iş veya davranış, vazife, vecibe[/code]

    at gözlükleriniz hayırlı olsun. türkçeyi sadece günlük kullanımlarınız kadar biliyorsunuz bir uygulamadan her anlamını bilmesini bekliyorsunuz. üstüne üstlük bana "insan gibi davran" gibi bir cümle kuruyorsunuz. Haddinizi aşmayın derim, günlük hayatımda biri bana bu cümleyi söyleyecek kendini camdan aşağıda bulmayacak? Ama klavye başında hepiniz aslansınız kaplansınız tabi.
×
×
  • Create New...