ฟอรั่ม PSsix

Would you like to react to this message? Create an account in a few clicks or log in to continue.

ฟอรั่มของบล็อก http://pssix.blogspot.com


4 posters

    เก็บค่าตัวแปลของสี

    avatar
    olyakuzalo
    สมาชิกทั่วไป
    สมาชิกทั่วไป


    เก็บค่าตัวแปลของสี Empty เก็บค่าตัวแปลของสี Empty
    จำนวนข้อความ : 15
    ความนิยม : 0
    เข้าร่วมเมื่อ : 30/01/2012

    เก็บค่าตัวแปลของสี Empty เก็บค่าตัวแปลของสี

    ตั้งหัวข้อ by olyakuzalo 31/01/12, 12:15 am

    ผมต้องการที่จะ ให้

    พิกัด 111,222
    เปลี่ยนสี
    ใช่กด1
    ไม่กด2

    วนดูพิกัด 111,222 ไปเรื่อยๆ

    ใครทำได้โพสหน่อยนะครับ
    avatar
    olyakuzalo
    สมาชิกทั่วไป
    สมาชิกทั่วไป


    เก็บค่าตัวแปลของสี Empty เก็บค่าตัวแปลของสี Empty
    จำนวนข้อความ : 15
    ความนิยม : 0
    เข้าร่วมเมื่อ : 30/01/2012

    เก็บค่าตัวแปลของสี Empty Re: เก็บค่าตัวแปลของสี

    ตั้งหัวข้อ by olyakuzalo 31/01/12, 01:08 am

    olyakuzalo พิมพ์ว่า:ผมต้องการที่จะ ให้

    พิกัด 111,222
    เปลี่ยนสี
    ใช่กด1
    ไม่กด2

    วนดูพิกัด 111,222 ไปเรื่อยๆ

    ใครทำได้โพสหน่อยนะครับ

    เอาใหม่แบบคร่าวๆ นะครับ

    a = จุด 111,222 สีอะไรก็ได้
    while
    b = ดูว่า จุด 111,222 สีอะไร เก็บไว้ที่ b

    IF a !=b
    ให้คลิกตำแหน่งที่ 1
    EndIf

    คลิกตำแหน่งที่ 2
    คลิกตำแหน่งที่ 3
    คลิกตำแหน่งที่ 4

    a = ดูจุด 111,222 ว่าสีอะไร แล้วเก็บค่าที่ a
    WEnd

    แล้วก็วนไปเรื่อยๆ

    รบกวนผู้รู้เขียนให้หน่อยนะครับ
    avatar
    olyakuzalo
    สมาชิกทั่วไป
    สมาชิกทั่วไป


    เก็บค่าตัวแปลของสี Empty เก็บค่าตัวแปลของสี Empty
    จำนวนข้อความ : 15
    ความนิยม : 0
    เข้าร่วมเมื่อ : 30/01/2012

    เก็บค่าตัวแปลของสี Empty Re: เก็บค่าตัวแปลของสี

    ตั้งหัวข้อ by olyakuzalo 31/01/12, 01:55 am

    ขออีกอย่างครับ

    คืออยากหน่วงเวลาให้ โค้ดบางตัหยุดทำงานไปก่อน แต่ยังให้ตัวอื่นทำงาน เช่น

    while
    $ok = PixelSearch( 0,0, 1024,768, 0x7F6B42 )
    If Not @error Then
    MouseClick("", $ok[0], $ok[1], 1, 0)
    EndIf

    $ok1 = PixelSearch( 0,0, 1024,768, 0x7F6B42 )
    If Not @error Then
    MouseClick("", $ok1[0], $ok1[1], 1, 0)
    EndIf

    $ok2 = PixelSearch( 0,0, 1024,768, 0x7F6B42 )
    If Not @error Then
    MouseClick("", $ok2[0], $ok2[1], 1, 0)
    EndIf

    WEnd


    อยากให้ ok1 เมื่อทำงานแล้วให้หยุดไป 10 แต่ ok กับ ok2 ยังทำงานอยู่
    aut
    aut
    PSsix Powerful Scripting Class
    PSsix Powerful Scripting Class


    PSsix Game Coder
    จำนวนข้อความ : 472
    ความนิยม : 126
    เข้าร่วมเมื่อ : 24/07/2010

    เก็บค่าตัวแปลของสี Empty Re: เก็บค่าตัวแปลของสี

    ตั้งหัวข้อ by aut 31/01/12, 08:12 pm

    นายจาทัมรัยอะเอารูปเกมมาก้อด้าย ชินจัง

    แบบอะเป่า
    $a = PixelGetColor(111,222)
    While 1
    $b = PixelGetColor(111,222)
    if $a = $b then
    MouseClick("",พิกัดx,พิกัดy)
    EndIf
    Sleep(100)
    MouseClick("",พิกัดx,พิกัดy)
    Sleep(100)
    MouseClick("",พิกัดx,พิกัดy)
    Sleep(100)
    MouseClick("",พิกัดx,พิกัดy)
    Sleep(100)
    $a = PixelGetColor(111,222)
    WEnd
    avatar
    olyakuzalo
    สมาชิกทั่วไป
    สมาชิกทั่วไป


    เก็บค่าตัวแปลของสี Empty เก็บค่าตัวแปลของสี Empty
    จำนวนข้อความ : 15
    ความนิยม : 0
    เข้าร่วมเมื่อ : 30/01/2012

    เก็บค่าตัวแปลของสี Empty Re: เก็บค่าตัวแปลของสี

    ตั้งหัวข้อ by olyakuzalo 01/02/12, 06:21 pm

    ลองเขียนใหม่แปป


    แก้ไขล่าสุดโดย olyakuzalo เมื่อ 01/02/12, 07:52 pm, ทั้งหมด 2 ครั้ง
    avatar
    olyakuzalo
    สมาชิกทั่วไป
    สมาชิกทั่วไป


    เก็บค่าตัวแปลของสี Empty เก็บค่าตัวแปลของสี Empty
    จำนวนข้อความ : 15
    ความนิยม : 0
    เข้าร่วมเมื่อ : 30/01/2012

    เก็บค่าตัวแปลของสี Empty Re: เก็บค่าตัวแปลของสี

    ตั้งหัวข้อ by olyakuzalo 01/02/12, 07:50 pm

    ตามความคิิดผมนะ พึ่หัดเขียน

    $a = PixelGetColor(733,93) ; รับค่าสี a จากตำแหน่ง 733,93 แล้วเก็บไว้ที่ a
    While 1 ; เริ่มการวน
    $b = PixelGetColor(733,93) ; รับค่าสี b จากตำแหน่ง 733,93 แล้วเก็บไว้ที่ b
    If $a <> $b then ; ถ้า a ไม่เท่า b ให้
    Sleep (3000) ; หลับ 3 วิ
    $w = PixelSearch(0,0, 1024,768 ,0x24B7C7 ) ; w หาสี 0x24B7C7
    If Not @error Then
    MouseClick("", $w[0], $w[1], 1, 0) ; เมาท์คลิกซ้าย 1 ที
    EndIf

    $p = PixelSearch(0,0, 1024,768 ,0xE8643E ) ; p หาสี 0xE8643E
    If Not @error Then
    MouseClick("", $p[0], $p[1], 1, 0) ; เมาท์คลิกซ้าย 1 ที
    EndIf

    $ok = PixelSearch(0,0, 1024,768 ,0x7F6B42 ) ; ok หาค่าสี 0x7F6B42
    If Not @error Then
    MouseClick("", $ok[0], $ok[1], 1, 0) ; เมาท์คลิกซ้าย 1 ที
    EndIf

    Sleep(1000) ; หลับ 1 วิ
    $a = PixelGetColor(733,93) ; รับค่าสี a จากตำแหน่ง 733,93 แล้วเก็บไว้ที่ a
    WEnd ; วนไปที while1

    ไม่รู้ว่าเขียนถูกหรือเปล่า แต่อยากให้ ถ้า $a ไม่เท่ากับ $b ให้ไปที่$w ถ้าเท่ากันให้ไปที่ $p ช่วย comment หน่อยครับ
    max30012540
    max30012540
    PSsix Member High Class
    PSsix Member High Class


    เก็บค่าตัวแปลของสี Empty PSsix Program Coder
    จำนวนข้อความ : 98
    ความนิยม : 10
    เข้าร่วมเมื่อ : 10/10/2011
    อายุ : 26

    เก็บค่าตัวแปลของสี Empty Re: เก็บค่าตัวแปลของสี

    ตั้งหัวข้อ by max30012540 01/02/12, 10:20 pm

    olyakuzalo พิมพ์ว่า: ตามความคิิดผมนะ พึ่หัดเขียน

    $a = PixelGetColor(733,93) ; รับค่าสี a จากตำแหน่ง 733,93 แล้วเก็บไว้ที่ a
    While 1 ; เริ่มการวน
    $b = PixelGetColor(733,93) ; รับค่าสี b จากตำแหน่ง 733,93 แล้วเก็บไว้ที่ b
    If $a <> $b then ; ถ้า a ไม่เท่า b ให้
    Sleep (3000) ; หลับ 3 วิ
    $w = PixelSearch(0,0, 1024,768 ,0x24B7C7 ) ; w หาสี 0x24B7C7
    If Not @error Then
    MouseClick("", $w[0], $w[1], 1, 0) ; เมาท์คลิกซ้าย 1 ที
    EndIf

    $p = PixelSearch(0,0, 1024,768 ,0xE8643E ) ; p หาสี 0xE8643E
    If Not @error Then
    MouseClick("", $p[0], $p[1], 1, 0) ; เมาท์คลิกซ้าย 1 ที
    EndIf

    $ok = PixelSearch(0,0, 1024,768 ,0x7F6B42 ) ; ok หาค่าสี 0x7F6B42
    If Not @error Then
    MouseClick("", $ok[0], $ok[1], 1, 0) ; เมาท์คลิกซ้าย 1 ที
    EndIf

    Sleep(1000) ; หลับ 1 วิ
    $a = PixelGetColor(733,93) ; รับค่าสี a จากตำแหน่ง 733,93 แล้วเก็บไว้ที่ a
    WEnd ; วนไปที while1

    ไม่รู้ว่าเขียนถูกหรือเปล่า แต่อยากให้ ถ้า $a ไม่เท่ากับ $b ให้ไปที่$w ถ้าเท่ากันให้ไปที่ $p ช่วย comment หน่อยครับ
    em218
    Code:
    $a = PixelGetColor(733,93);ตรวจสีที่ 733,93
    While 1
    $b = PixelGetColor(733,93);ตรวจสีที่ 733,93
    If $a = $b then;ถ้าตัวแปรเอเท่ากับตัวแปลบี ให้ทำตามคำสั่งด้านล่าง
    $p = PixelSearch(0,0, 1024,768 ,0xE8643E );ค้นหาสี 0xE8643E  ที่พิดกัด 0,0-1024,764
    If Not @error Then MouseClick("", $p[0], $p[1], 1, 0);คลิกเม้าส์
    Else;ถ้าไม่ใช่ ให้ทำตามคำสั่งด้านล่าง
    $w = PixelSearch(0,0, 1024,768 ,0x24B7C7 );ค้นหาสี 0x24B7C7  ที่พิดกัด 0,0-1024,764
    If Not @error Then MouseClick("", $w[0], $w[1], 1, 0);คลิกเม้าส์
    EndIf;จบการเปรีบยเทียบ
    $ok = PixelSearch(0,0, 1024,768 ,0x7F6B42 );ค้นหาสี 0x7F6B42  ที่พิดกัด 0,0-1024,764
    If Not @error Then   MouseClick("", $ok[0], $ok[1], 1, 0);คลิกเม้าส์
    Sleep(1000);หน่วงเวลา 1 วิ
    $a = PixelGetColor(733,93);ตรวจสีที่ 733,93
    WEnd
    POS
    POS
    PSsix
    PSsix


    เก็บค่าตัวแปลของสี Empty เก็บค่าตัวแปลของสี Empty เก็บค่าตัวแปลของสี Empty
    จำนวนข้อความ : 1152
    ความนิยม : 326
    เข้าร่วมเมื่อ : 19/07/2010

    เก็บค่าตัวแปลของสี Empty Re: เก็บค่าตัวแปลของสี

    ตั้งหัวข้อ by POS 02/02/12, 10:23 am

    คุณต้องเอารูปในเกมส์มาก่อนครับ แล้วชี้จุดว่าต้องการทำอะไรในจุดไหนบ้าง ถ้ากลัวว่าคนอื่นจะค้นหาใน google เจอสคริปต์ของคุณ ก็เปลี่ยนชื่อเกมส์เป็นชื่ออื่น

      เวลาขณะนี้ 27/04/24, 10:57 am