Excel.LaunchExcel.LaunchAndOpenUnderExistingProcess Path: $'''C:\\Users\\masanori\\OneDrive\\デスクトップ\\TIP自動bet.xlsx''' Visible: True ReadOnly: False Instance=> ExcelInstance Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 7 StartRow: 12 ReadAsText: False CellValue=> start WAIT start WebAutomation.LaunchEdge.LaunchEdge Url: $'''https://tipstar.com/''' WindowState: WebAutomation.BrowserWindowState.Maximized ClearCache: False ClearCookies: False WaitForPageToLoadTimeout: 60 Timeout: 60 BrowserInstance=> Browser2 Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 14 StartRow: 22 ReadAsText: False CellValue=> Ex2X Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 22 ReadAsText: False CellValue=> Ex2Y MouseAndKeyboard.MoveMouse X: Ex2X Y: Ex2Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.AnimateFast MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 SET X2 TO 12 SET X TO 4 SET ZX TO 4 SET ZY TO 8 Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 14 StartRow: 6 ReadAsText: False CellValue=> Ex1X Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 6 ReadAsText: False CellValue=> Ex1Y Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 4 StartRow: 21 ReadAsText: False CellValue=> wait1 Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 14 StartRow: 7 ReadAsText: False CellValue=> keirinX Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 7 ReadAsText: False CellValue=> keirinY Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 21 StartRow: 7 ReadAsText: False CellValue=> Xidou1 Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 14 StartRow: 13 ReadAsText: False CellValue=> bet1X Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 13 ReadAsText: False CellValue=> bet1Y Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 14 StartRow: 14 ReadAsText: False CellValue=> bet2X Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 14 ReadAsText: False CellValue=> bet2Y Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 14 StartRow: 15 ReadAsText: False CellValue=> bet3X Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 15 ReadAsText: False CellValue=> bet3Y Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 14 StartRow: 16 ReadAsText: False CellValue=> bet4X Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 16 ReadAsText: False CellValue=> bet4Y Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 14 StartRow: 17 ReadAsText: False CellValue=> bet5X Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 17 ReadAsText: False CellValue=> bet5Y Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 14 StartRow: 18 ReadAsText: False CellValue=> bet6X Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 18 ReadAsText: False CellValue=> bet6Y Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 14 StartRow: 19 ReadAsText: False CellValue=> bet7X Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 19 ReadAsText: False CellValue=> bet7Y Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 14 StartRow: 20 ReadAsText: False CellValue=> bet8X Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 20 ReadAsText: False CellValue=> bet8Y Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 14 StartRow: 21 ReadAsText: False CellValue=> bet9X Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 21 ReadAsText: False CellValue=> bet9Y Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 7 StartRow: 14 ReadAsText: False CellValue=> down MouseAndKeyboard.MoveMouse X: Ex1X Y: Ex1Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 LOOP KorA FROM 1 TO 2 STEP 1 MouseAndKeyboard.MoveMouse X: keirinX Y: keirinY RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: X StartRow: 5 ReadAsText: False CellValue=> loop1 Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 21 StartRow: X2 ReadAsText: False CellValue=> shokiti1X Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 9 ReadAsText: False CellValue=> shokiti1Y Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 21 StartRow: 8 ReadAsText: False CellValue=> Xidou2 WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 LOOP LoopIndex FROM 1 TO loop1 STEP 1 MouseAndKeyboard.MoveMouse X: shokiti1X Y: shokiti1Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.AnimateFast WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: ZX StartRow: ZY ReadAsText: False CellValue=> loop2 Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 14 StartRow: 11 ReadAsText: False CellValue=> shokiti2X Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 15 StartRow: 11 ReadAsText: False CellValue=> shokiti2Y Excel.ReadFromExcel.ReadCell Instance: ExcelInstance StartColumn: 21 StartRow: 9 ReadAsText: False CellValue=> Xidou3 LOOP LoopIndex FROM 1 TO loop2 STEP 1 MouseAndKeyboard.MoveMouse X: shokiti2X Y: shokiti2Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.AnimateFast MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 MouseAndKeyboard.MoveMouse X: bet1X Y: bet1Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 IF KorA = 1 THEN ELSE END MouseAndKeyboard.MoveMouse X: bet2X Y: bet2Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 MouseAndKeyboard.MoveMouse X: bet3X Y: bet3Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 MouseAndKeyboard.MoveMouse X: bet4X Y: bet4Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 MouseAndKeyboard.MoveMouse X: bet5X Y: bet5Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 MouseAndKeyboard.MoveMouse X: bet6X Y: bet6Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 MouseAndKeyboard.MoveMouse X: bet7X Y: bet7Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 MouseAndKeyboard.MoveMouse X: bet8X Y: bet8Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 MouseAndKeyboard.MoveMouse X: bet9X Y: bet9Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 MouseAndKeyboard.MoveMouse X: Ex1X Y: Ex1Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 MouseAndKeyboard.MoveMouse X: keirinX Y: keirinY RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 MouseAndKeyboard.MoveMouse X: shokiti1X Y: shokiti1Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 Variables.IncreaseVariable Value: shokiti2X IncrementValue: Xidou3 END Variables.IncreaseVariable Value: shokiti1X IncrementValue: Xidou2 Variables.IncreaseVariable Value: ZY IncrementValue: 1 MouseAndKeyboard.MoveMouse X: Ex1X Y: Ex1Y RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 MouseAndKeyboard.MoveMouse X: keirinX Y: keirinY RelativeTo: MouseAndKeyboard.PositionRelativeTo.Screen MovementStyle: MouseAndKeyboard.MovementStyle.Instant WAIT wait1 MouseAndKeyboard.SendMouseClick.Click ClickType: MouseAndKeyboard.MouseClickType.LeftClick MillisecondsDelay: 0 END Variables.IncreaseVariable Value: keirinX IncrementValue: Xidou1 Variables.IncreaseVariable Value: X IncrementValue: 3 Variables.IncreaseVariable Value: X2 IncrementValue: 1 Variables.IncreaseVariable Value: ZX IncrementValue: 3 SET ZY TO 8 END IF down = 1 THEN External.ShutdownComputer.Shutdown Force: True ELSE Display.ShowMessageDialog.ShowMessage Title: $'''終了''' Message: $'''終了いたしました''' Icon: Display.Icon.None Buttons: Display.Buttons.OK DefaultButton: Display.DefaultButton.Button1 IsTopMost: True ButtonPressed=> ButtonPressed END