Cómo hacer ping a una IP en un lenguaje sencillo

Esto es simple, usando un reloj con un periodo de 10000.

Los eventos periódicos se escriben de la siguiente manera:

.If (prueba de comunicación("dirección IP", 5000)lt; 0)

De lo contrario

Infobox("¡El mantenimiento ha finalizado!")

.Si ya terminó

Por favor acepte, si está satisfecho, gracias