MAIN:
   ....
   ....  <- perform any startup initialization
   ....
MAIN_LOOP:
    LCALL  DIPSWT_FUNC
    JMP    MAIN_LOOP