2017-07-06 13:24:21 +02:00
|
|
|
define appv 'RunAndWaitForEsc V0.00'
|
|
|
|
|
vmthread MAIN
|
|
|
|
|
{
|
|
|
|
|
DATA8 State
|
|
|
|
|
DATA32 Status
|
2017-07-08 22:18:05 +02:00
|
|
|
DATA32 Timer
|
2017-07-07 14:08:36 +02:00
|
|
|
DATA16 Serial
|
2017-07-06 13:24:21 +02:00
|
|
|
|
2017-07-08 22:18:05 +02:00
|
|
|
UI_WRITE(LED,LED_ORANGE)
|
2017-07-06 13:24:21 +02:00
|
|
|
UI_DRAW(TEXT,FG_COLOR,48,62,'Starting...')
|
|
|
|
|
UI_DRAW(UPDATE)
|
2017-07-07 14:08:36 +02:00
|
|
|
// Make sure VM knows that /tmp/serial.txt is open for writing and can stream the content
|
2017-07-08 22:18:05 +02:00
|
|
|
//FILE(OPEN_WRITE, '/tmp/serial.txt', Serial)
|
2017-07-07 14:08:36 +02:00
|
|
|
// Actual filename is patched-in here
|
2017-07-06 18:34:31 +02:00
|
|
|
SYSTEM('XXXXXXXXX', Status)
|
2017-07-06 13:24:21 +02:00
|
|
|
Loop:
|
2017-07-08 22:18:05 +02:00
|
|
|
//UI_BUTTON(WAIT_FOR_PRESS)
|
|
|
|
|
//UI_BUTTON(SHORTPRESS,BACK_BUTTON,State)
|
|
|
|
|
//JR_FALSE(State,Loop)
|
2017-07-06 13:24:21 +02:00
|
|
|
//UI_WRITE(LED,LED_RED)
|
2017-07-08 22:18:05 +02:00
|
|
|
TIMER_WAIT(100, Timer)
|
|
|
|
|
TIMER_READY(Timer)
|
2017-07-06 13:24:21 +02:00
|
|
|
UI_DRAW(TEXT,FG_COLOR,48,62,'Bye!')
|
|
|
|
|
UI_DRAW(UPDATE)
|
|
|
|
|
}
|
|
|
|
|
|
