KeyPress "Space", 1   
Delay 700   
KeyDown "Left", 1   
Delay 50   
KeyPress "Space", 1   
Delay 700   
Rem A3   
IfColor 790,121,"7BF7DE",0 Then  
KeyPress "Space", 1   
    Delay 700   
    KeyPress "Space", 1   
    Delay 700   
Else  
Goto A3   
End If  
Rem A4   
IfColor 810,118,"73F7EF",0 Then  
KeyPress "Space", 1   
    Delay 100   
    KeyUp "Left", 1   
    Delay 600   
    KeyPress "Space", 1   
    Delay 700   
    KeyPress "Space", 1   
    Delay 700   
Else  
Goto A4   
End If  
KeyDown "Left", 1   
Delay 50   
KeyPress "Space", 1   
Delay 100   
KeyUp "Left", 1   
Delay 600   
KeyDown "Right", 1   
Rem A5   
IfColor 836,119,"73F7EF",0 Then  
KeyPress "Space", 1   
    Delay 800   
    KeyPress "Space", 1   
    Delay 700   
Else  
Goto A5   
End If  
Rem A6   
IfColor 896,94,"73F3FF",0 Then  
KeyPress "Space", 1   
    Delay 50   
    KeyUp "Right", 1   
    Delay 50   
    KeyDown "Up", 1   
    Delay 100   
    KeyDown "Left", 1   
    Rem A7   
    IfColor 805,106,"E7E7EF",0 Then  
    KeyUp "Up", 1   
        Delay 100   
Else  
    Goto A7   
End If  
Else  
Goto A6   
End If  
Rem A8   
IfColor 739,109,"7BF7F7",0 Then  
KeyPress "Space", 1   
        Delay 300   
Else  
Goto A8   
End If  
Rem A85   
IfColor 765,109,"7BF7F7",0 Then  
KeyPress "Space", 1   
    Delay 300   
Else  
Goto A85   
End If  
    Rem A9   
    IfColor 796,109,"7BF7F7",0 Then  
    KeyPress "Space", 1   
        Delay 300   
Else  
Goto A9   
End If  
Rem A10   
IfColor 748,108,"80418",0 Then  
KeyUp "Left", 1   
    Delay 100   
    KeyPress "Up", 1   
Else  
Goto A10   
End If  
        Call DT()   
Else  
    IfColor 473,467,"29F3EF",0 Then  
            KeyPress "M", 1   
            Delay 100   
//四号洞   
KeyDown "Left", 1   
Rem D1