[RoutineDef, ZRemeshAllSubTools,
  [If, [IsEnabled, "Tool:SubTool:SelectUp"], [SubToolSelect, 0]]
  [Loop, 10000,
    [Loop, 10000,
      [IPress, "Tool:Geometry:ZRemesher"]
      [If, [IsEnabled, "Tool:SubTool:SelectDown"],, [LoopExit]]
      [IPress, "Tool:SubTool:SelectDown"]
    ]
    [If, [IsEnabled, "Tool:SubTool:SelectDown"],, [LoopExit]]
  ]
]

[ISubPalette, "ZPlugin:ZRemesh batch"]
[IButton, "ZPlugin:ZRemesh batch:ZRemesh all SubTools", "Remesh all SubTools",
  [RoutineCall, ZRemeshAllSubTools]
,,1.0]