** wait wind di tengah layar
WAIT WINDOW 'Apa Khabar ?' AT INT(wROWs()/2), INT((wCOLs() - 12) / 2) 

WAIT WINDOW 'Khabar Baik' AT INT(SROWS()/2), INT((SCOLS() - 11) / 2) 

=Tunggu('MERDEKA !!')

PROCEDURE Tunggu
LPARAMETERS tcMsg
WAIT WINDOW AT 25, (WCOLS() - TXTWIDTH(tcMsg) * FONTMETRIC(6)/FONTMETRIC(6))/2 tcMsg NOWAIT
ENDPROC