| 
                                    
                                    
                                    
                                    
                                    
                                    
                                    
                                     
                                        
                                     
                                    
                                        
                                        - 小学六年级
 
                                        
                                        - 8522251
 
                                        - 143
 
                                        - 0
 
                                        - 107 朵
 
                                        - 134 个
 
                                        - 109 个
 
                                        - 0
 
                                        - 2021-11-01
 
                                     
                                    
                                 | 
                                
                                    
                                        
                                            
                                                
                                                9#
                                                
                                            
                                        
                                        
                                            
                                                
                                                
                                                t
                                                T
                                             
                                            
                                            
                                            
                                                
                                                发表于 2022-06-04 12:37
                                            
                                                                                        
                                            | 
                                            
                                            
                                            |只看该用户
                                            
                                         
                                     
                                    
                                    
                
                
                
                
                    
                    
                    
                   
                    
                        - Dim 滿血血量
  
- 滿血血量 = 目前血量
  
- Call Lib.雜項.對話("滿血血量為 " & 滿血血量)
  
- Delay 500
  
- Call Lib.雜項.對話("血量只要有變動就會喝水")
  
- Delay 500
  
- Call Lib.雜項.對話("腳本開始")
  
- Do
  
-     If 滿血血量 <> 目前血量 Then 
  
-         Call Lib.雜項.喝水
  
-     End If
  
-     Delay 10
  
- Loop
  
- Function 目前血量
  
-     Dim i, j, 個位數, 十位數, 百位數, 千位數, 萬位數
  
-     i = 41 : j = 589
  
-     IfColor i - 3, j - 4, "EFEBEF", 0 Then //0,1,2,3,5,6,7,8,9
  
-         Call Lib.雜項.對話("請滿血再執行腳本")
  
-         ExitScript
  
-     End If
  
-     IfColor i - 3, j - 3, "EFEBEF", 0 Then//4
  
-         Call Lib.雜項.對話("請滿血再執行腳本")
  
-         ExitScript
  
-     End If
  
-     IfColor i + 2, j + 4, "EFEBEF", 0 Then
  
-         個位數 = 2
  
-     Else 
  
-         IfColor i - 2, j - 4, "EFEBEF", 0 Then
  
-             個位數 = 7
  
-         Else
  
-             IfColor i, j + 3, "EFEBEF", 0 Then
  
-                 個位數 = 1
  
-             Else 
  
-                 IfColor i, j - 3, "EFEBEF", 0 Then
  
-                     個位數 = 4
  
-                 Else 
  
-                     IfColor i, j + 1, "EFEBEF", 0 Then
  
-                         個位數 = 9
  
-                     Else 
  
-                         IfColor i - 2, j + 4, "EFEBEF", 0 Then
  
-                             個位數 = 5
  
-                         Else 
  
-                             IfColor i + 2, j - 4, "EFEBEF", 0 Then
  
-                                 個位數 = 6
  
-                             Else 
  
-                                 IfColor i + 1, j - 1, "EFEBEF", 0 Then
  
-                                     個位數 = 3
  
-                                 Else 
  
-                                     IfColor i, j, "EFEBEF", 0 Then
  
-                                         個位數 = 8
  
-                                     Else 
  
-                                         IfColor i + 2, j, "EFEBEF", 0 Then
  
-                                             個位數 = 0
  
-                                         Else 
  
-                                             個位數 = -1
  
-                                         End If
  
-                                     End If
  
-                                 End If
  
-                             End If
  
-                         End If    
  
-                     End If
  
-                 End If
  
-             End If
  
-         End If
  
-     End If
  
-     i = i - 6
  
-     IfColor i + 2, j + 4, "EFEBEF", 0 Then
  
-         十位數 = 2
  
-     Else 
  
-         IfColor i - 2, j - 4, "EFEBEF", 0 Then
  
-             十位數 = 7
  
-         Else
  
-             IfColor i, j + 3, "EFEBEF", 0 Then
  
-                 十位數 = 1
  
-             Else 
  
-                 IfColor i, j - 3, "EFEBEF", 0 Then
  
-                     十位數 = 4
  
-                 Else 
  
-                     IfColor i, j + 1, "EFEBEF", 0 Then
  
-                         十位數 = 9
  
-                     Else 
  
-                         IfColor i - 2, j + 4, "EFEBEF", 0 Then
  
-                             十位數 = 5
  
-                         Else 
  
-                             IfColor i + 2, j - 4, "EFEBEF", 0 Then
  
-                                 十位數 = 6
  
-                             Else 
  
-                                 IfColor i + 1, j - 1, "EFEBEF", 0 Then
  
-                                     十位數 = 3
  
-                                 Else 
  
-                                     IfColor i, j, "EFEBEF", 0 Then
  
-                                         十位數 = 8
  
-                                     Else 
  
-                                         IfColor i + 2, j, "EFEBEF", 0 Then
  
-                                             十位數 = 0
  
-                                         Else 
  
-                                             十位數 = -1
  
-                                         End If
  
-                                     End If
  
-                                 End If
  
-                             End If
  
-                         End If    
  
-                     End If
  
-                 End If
  
-             End If
  
-         End If
  
-     End If
  
-     i = i - 6
  
-     IfColor i + 2, j + 4, "EFEBEF", 0 Then
  
-         百位數 = 2
  
-     Else 
  
-         IfColor i - 2, j - 4, "EFEBEF", 0 Then
  
-             百位數 = 7
  
-         Else
  
-             IfColor i, j + 3, "EFEBEF", 0 Then
  
-                 百位數 = 1
  
-             Else 
  
-                 IfColor i, j - 3, "EFEBEF", 0 Then
  
-                     百位數 = 4
  
-                 Else 
  
-                     IfColor i, j + 1, "EFEBEF", 0 Then
  
-                         百位數 = 9
  
-                     Else 
  
-                         IfColor i - 2, j + 4, "EFEBEF", 0 Then
  
-                             百位數 = 5
  
-                         Else 
  
-                             IfColor i + 2, j - 4, "EFEBEF", 0 Then
  
-                                 百位數 = 6
  
-                             Else 
  
-                                 IfColor i + 1, j - 1, "EFEBEF", 0 Then
  
-                                     百位數 = 3
  
-                                 Else 
  
-                                     IfColor i, j, "EFEBEF", 0 Then
  
-                                         百位數 = 8
  
-                                     Else 
  
-                                         IfColor i + 2, j, "EFEBEF", 0 Then
  
-                                             百位數 = 0
  
-                                         Else 
  
-                                             百位數 = -1
  
-                                         End If
  
-                                     End If
  
-                                 End If
  
-                             End If
  
-                         End If    
  
-                     End If
  
-                 End If
  
-             End If
  
-         End If
  
-     End If
  
-     i = i - 6
  
-     IfColor i + 2, j + 4, "EFEBEF", 0 Then
  
-         千位數 = 2
  
-     Else 
  
-         IfColor i - 2, j - 4, "EFEBEF", 0 Then
  
-             千位數 = 7
  
-         Else
  
-             IfColor i, j + 3, "EFEBEF", 0 Then
  
-                 千位數 = 1
  
-             Else 
  
-                 IfColor i, j - 3, "EFEBEF", 0 Then
  
-                     千位數 = 4
  
-                 Else 
  
-                     IfColor i, j + 1, "EFEBEF", 0 Then
  
-                         千位數 = 9
  
-                     Else 
  
-                         IfColor i - 2, j + 4, "EFEBEF", 0 Then
  
-                             千位數 = 5
  
-                         Else 
  
-                             IfColor i + 2, j - 4, "EFEBEF", 0 Then
  
-                                 千位數 = 6
  
-                             Else 
  
-                                 IfColor i + 1, j - 1, "EFEBEF", 0 Then
  
-                                     千位數 = 3
  
-                                 Else 
  
-                                     IfColor i, j, "EFEBEF", 0 Then
  
-                                         千位數 = 8
  
-                                     Else 
  
-                                         IfColor i + 2, j, "EFEBEF", 0 Then
  
-                                             千位數 = 0
  
-                                         Else 
  
-                                             千位數 = -1
  
-                                         End If
  
-                                     End If
  
-                                 End If
  
-                             End If
  
-                         End If    
  
-                     End If
  
-                 End If
  
-             End If
  
-         End If
  
-     End If
  
-     i = i - 6
  
-     IfColor i + 2, j + 4, "EFEBEF", 0 Then
  
-         萬位數 = 2
  
-     Else 
  
-         IfColor i - 2, j - 4, "EFEBEF", 0 Then
  
-             萬位數 = 7
  
-         Else
  
-             IfColor i, j + 3, "EFEBEF", 0 Then
  
-                 萬位數 = 1
  
-             Else 
  
-                 IfColor i, j - 3, "EFEBEF", 0 Then
  
-                     萬位數 = 4
  
-                 Else 
  
-                     IfColor i, j + 1, "EFEBEF", 0 Then
  
-                         萬位數 = 9
  
-                     Else 
  
-                         IfColor i - 2, j + 4, "EFEBEF", 0 Then
  
-                             萬位數 = 5
  
-                         Else 
  
-                             IfColor i + 2, j - 4, "EFEBEF", 0 Then
  
-                                 萬位數 = 6
  
-                             Else 
  
-                                 IfColor i + 1, j - 1, "EFEBEF", 0 Then
  
-                                     萬位數 = 3
  
-                                 Else 
  
-                                     IfColor i, j, "EFEBEF", 0 Then
  
-                                         萬位數 = 8
  
-                                     Else 
  
-                                         IfColor i + 2, j, "EFEBEF", 0 Then
  
-                                             萬位數 = 0
  
-                                         Else 
  
-                                             萬位數 = -1
  
-                                         End If
  
-                                     End If
  
-                                 End If
  
-                             End If
  
-                         End If    
  
-                     End If
  
-                 End If
  
-             End If
  
-         End If
  
-     End If
  
-     目前血量 = 個位數 + 十位數 * 10 + 百位數 * 100 + 千位數 * 1000 + 萬位數 * 10000
  
- End Function
  
  复制代码 
                        
                     
                    
                    
                    
                    
                    
                    
                     
                     |