32 lines
365 B
Plaintext
32 lines
365 B
Plaintext
|
#include "m70100a.h"
|
||
|
|
|
||
|
|
TOOLBAR "" 0 20 0 2
|
||
|
|
|
||
|
|
#include <toolbar.h>
|
||
|
|
|
||
|
|
ENDPAGE
|
||
|
|
|
||
|
|
#define F1 100
|
||
|
|
#define F2 101
|
||
|
|
|
||
|
|
|
||
|
|
PAGE "MODULO 770 - SCHEDA PERCIPIENTI" -1 -1 78 21
|
||
|
|
|
||
|
|
BOOLEAN F1
|
||
|
|
BEGIN
|
||
|
|
PROMPT 1 4 "Flag 1 "
|
||
|
|
// USE LF_BASE
|
||
|
|
FIELD LF_BASE->NUMSER1[1,1]
|
||
|
|
END
|
||
|
|
|
||
|
|
BOOLEAN F2
|
||
|
|
BEGIN
|
||
|
|
PROMPT 1 6 "Flag 2 "
|
||
|
|
// USE LF_BASE
|
||
|
|
FIELD LF_BASE->NUMSER1[2,1]
|
||
|
|
END
|
||
|
|
|
||
|
|
ENDPAGE
|
||
|
|
|
||
|
|
ENDMASK
|