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


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

Share

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


จำนวนข้อความ : 15
ความนิยม : 0
เข้าร่วมเมื่อ : 30/01/2012

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

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

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

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

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

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

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


จำนวนข้อความ : 15
ความนิยม : 0
เข้าร่วมเมื่อ : 30/01/2012

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

ตั้งหัวข้อ by olyakuzalo on 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

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

รบกวนผู้รู้เขียนให้หน่อยนะครับ

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


จำนวนข้อความ : 15
ความนิยม : 0
เข้าร่วมเมื่อ : 30/01/2012

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

ตั้งหัวข้อ by olyakuzalo on 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 ยังทำงานอยู่
avatar
aut
PSsix Powerful Scripting Class
PSsix Powerful Scripting Class

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

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

ตั้งหัวข้อ by aut on 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

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


จำนวนข้อความ : 15
ความนิยม : 0
เข้าร่วมเมื่อ : 30/01/2012

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

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

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


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

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


จำนวนข้อความ : 15
ความนิยม : 0
เข้าร่วมเมื่อ : 30/01/2012

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

ตั้งหัวข้อ by olyakuzalo on 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 หน่อยครับ
avatar
max30012540
PSsix Member High Class
PSsix Member High Class

PSsix Program Coder
จำนวนข้อความ : 98
ความนิยม : 10
เข้าร่วมเมื่อ : 10/10/2011
อายุ : 19

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

ตั้งหัวข้อ by max30012540 on 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
avatar
POS
PSsix
PSsix


จำนวนข้อความ : 1151
ความนิยม : 323
เข้าร่วมเมื่อ : 19/07/2010

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

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

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


||----------------------------------------------------------------------------------------------------------------||

กลุ่ม AutoIt ในเฟสบุ๊ค
[You must be registered and logged in to see this link.]

++++++++++++++++++++++++++++++++++++++++++++
pssix.blogspot.com

    เวลาขณะนี้ 28/04/17, 05:05 pm