MAIN:
LDM WDTR,#INIT_WDTR ;\ watch dog
BBC A1MS_FLAG,MAIN1 ;\ 1ms flag
CLR1 A1MS_FLAG ;\ 1ms flag coming,clear 1ms flag
CALL ADSUB ;\ AD(currentvoltageemperature)
NOT1 A2MS_FLAG ;\ not1 get 2ms flag
BBC A2MS_FLAG,MAIN1 ;\ 2ms flag
CALL POWER ;\ power down protect
CALL KEY ;\ key
CALL DISPLAY ;\ display
CALL TIMES ;\ time flag setup
MAIN1:
BBC A20MS_FLAG,MAIN2 ;\ 20ms flag
CLR1 A20MS_FLAG ;\ 20ms flag coming,clear 20ms flag
CALL CHECK_PAN ;\ check pan if place on plate
CALL PROTECT ;\ protect \voltage,temperature
CALL BUZZR ;\ BUZZER
NOT1 A40MS_FLAG
BBC A40MS_FLAG,MAIN2 ;40ms flag
CALL HEAT ;heat
MAIN2:
BBC A500MS_FLAG,MAIN ;500ms flag
CLR1 A500MS_FLAG
CALL FUNCTION ;fuctopm
CALL FAN ;fan
BRA MAIN