ฟอรั่ม 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


2 posters

    ช่วยรบกวนดูสคริปนี้ทีครับ

    scanditionx
    scanditionx
    PSsix Member Class III
    PSsix Member Class III


    PSsix Game Coder
    จำนวนข้อความ : 51
    ความนิยม : 0
    เข้าร่วมเมื่อ : 02/10/2010
    อายุ : 35
    ที่อยู่ : ดาวโลก

    ช่วยรบกวนดูสคริปนี้ทีครับ Empty ช่วยรบกวนดูสคริปนี้ทีครับ

    ตั้งหัวข้อ by scanditionx 14/07/11, 05:19 am

    ถ้าหากผมจะเขียนสคริปด้านล่าง โดยใช้คำสั่ง Case,Select จะเขียนในลักษณะไหนดีครับ


    Func _Run()

    While $Pixel = PixelGetColor(267,71)
    if $Pixel <> 0xE7DEDA Then
    Send("{4}")
    sleep(1000)

    Else

    $Pixel = PixelGetColor(562,57)
    if $Pixel <> 0xE7DEDA Then
    Send("{RIGHT}")
    sleep(50)
    Send("{TAB}")

    Else

    if $Pixel <> 0xE7DEDA Then
    Send("{TAB}")
    sleep(100)

    Else

    $Pixel = PixelGetColor(561,57)
    if $Pixel <>0xE7DEDA Then
    sleep(200)
    Send ("{TAB}")

    EndIf
    EndIf
    EndIf
    EndIf
    WEnd
    EndFunc

    ตอนนี้กำลังศึกษาเรื่องคำสั่ง Case,select
    POS
    POS
    PSsix
    PSsix


    ช่วยรบกวนดูสคริปนี้ทีครับ Empty ช่วยรบกวนดูสคริปนี้ทีครับ Empty ช่วยรบกวนดูสคริปนี้ทีครับ Empty
    จำนวนข้อความ : 1152
    ความนิยม : 326
    เข้าร่วมเมื่อ : 19/07/2010

    ช่วยรบกวนดูสคริปนี้ทีครับ Empty Re: ช่วยรบกวนดูสคริปนี้ทีครับ

    ตั้งหัวข้อ by POS 14/07/11, 09:48 am

    เท่าที่ดูคำสั่ง if ซ้อนกันหลายชั้น ถ้าใช้ select case ก็ต้องเขียนซ้อนเหมือนกัน เพราะต้องตรวจเงื่อนไขไปทีละชั้น ซึ่งใช้ if ก็จะง่ายกว่า

    แต่ถ้าต้องการเพียงตรวจเงื่อนไขทุกอันก็เขียนเหมือนคำสั่งด้านล่างนี้


    Code:
    While 1
       _Run()
    WEnd

    Func _Run()
       Select
          Case PixelGetColor(267, 71) <> 0xE7DEDA
             Send("{4}")
             Sleep(1000)
             ContinueCase
          Case PixelGetColor(562, 57) <> 0xE7DEDA
             Send("{RIGHT}")
             Sleep(50)
             Send("{TAB}")
             ContinueCase
          Case PixelGetColor(562, 57) <> 0xE7DEDA
             Send("{TAB}")
             Sleep(100)
             ContinueCase
          Case PixelGetColor(561, 57) <> 0xE7DEDA
             Sleep(200)
             Send("{TAB}")
             ContinueCase
       EndSelect
    EndFunc
    scanditionx
    scanditionx
    PSsix Member Class III
    PSsix Member Class III


    PSsix Game Coder
    จำนวนข้อความ : 51
    ความนิยม : 0
    เข้าร่วมเมื่อ : 02/10/2010
    อายุ : 35
    ที่อยู่ : ดาวโลก

    ช่วยรบกวนดูสคริปนี้ทีครับ Empty Re: ช่วยรบกวนดูสคริปนี้ทีครับ

    ตั้งหัวข้อ by scanditionx 15/07/11, 12:14 am

    ขอบคุณครับ ท่าน POS ที่ทำให้ผมกระจ่างมากขึ้นเลยครับ

      เวลาขณะนี้ 29/03/24, 03:16 am