KeyUp "Up", 1   
        Delay 80   
        KeyDown "Right", 1   
        Delay 200   
        KeyDown "Down", 1   
Else  
    Goto C5   
End If  
Else  
Goto C6   
End If  
Rem C7   
IfColor 868,100,"E7E7EF",0 Then  
    Delay 50   
KeyPress "Space", 1   
Else  
Goto C7   
End If  
Rem C8   
IfColor 873,127,"E7E7EF",0 Then  
    Delay 80   
    KeyUp "Right", 1   
    Delay 80   
KeyPress "Space", 1   
    Delay 80   
    KeyUp "Down", 1   
    Delay 800   
    KeyPress "Up", 1   
Else  
Goto C8   
End If  
  
        Call DT()   
Else  
        KeyPress "M", 1   
        Delay 100   
//二号洞   
KeyDown "Left", 1   
Rem B1   
IfColor 817,142,"73F7DE",0 Then  
KeyUp "Left", 1   
Else  
    Goto B1   
End If  
Delay 100   
For 5   
KeyPress "Space", 1   
Delay 720   
Next  
KeyDown "Left", 1   
Delay 60   
KeyPress "Space", 1   
Delay 60   
KeyUp "Left", 1   
Delay 720   
For 8   
KeyDown "Right", 1   
Delay 60   
KeyPress "Space", 1   
Delay 60   
KeyUp "Right", 1   
Delay 700   
Next  
KeyDown "Right", 1   
Rem B2   
IfColor 831,100,"73F7FF",0 Then  
KeyPress "Space", 1   
    Delay 300   
    KeyUp "Right", 1   
    Delay 400   
    KeyPress "Space", 1   
    Delay 700   
KeyPress "Space", 1   
    Delay 700   
Else  
Goto B2   
End If  
For 2   
KeyDown "Right", 1   
Delay 70   
KeyPress "Space", 1   
Delay 70   
KeyUp "Right", 1   
    Delay 640   
Next  
KeyDown "Right", 1   
Delay 60   
KeyPress "Space", 1   
Delay 100   
KeyDown "Up", 1   
Delay 100   
Rem B3   
IfColor 825,88,"7BF7EF",0 Then  
    Delay 200   
KeyUp "Up", 1   
Else  
Goto B3   
End If  
Rem B4   
IfColor 817,91,"7BF7EF",0 Then