FoxPro/Visual FoxPro - Ayuda con hora

Saludo a los amigos del foro,

foxpro 2.6

Tengo una practica con un programa que debe terminar cuando llege una hora determinada,

a partir de las 06:30:00.pm no debe permiter entrar.

tengo la idea, pero el problema es que yo tengo una hora para (06:30:00.pm) para compararla con la del sistema, la mia esta en formato de 12 hora y el sistema me la da en formato de 24 entonces no puedo hacer esto:

horafin= 06:30:00

IF TIME() > hora
wait window "Tiempo agotado "
quit
endif

si pudiera traer la fecha del siste en formato de 12 hora esto funcionara bien.

espero darme a entender y puedan ayudar.

prueba esto

horafin = "06:30:00 PM"

SET HOURS TO 12

do while !(TTOc(dateTIME(),2) == horafin)

?TTOc(dateTIME(),2)

enddo

Gracias por el intento, este comando ( ?TTOc(dateTIME(),2) ) funciona muy bien en VISUAL FOXPRO pero mi problema es en foxpro 2.6 no es el de windows.

Agradezco las proximas ayudas.

intenta

horafin= 18:30:00

IF TIME() > hora
wait window "Tiempo agotado "
quit
endif