TIMESET

(GIN Macro)

Defined in: LLSMACROS

Used in: CHARGESC867

TIMESET.mac.txt

 7*SW ...[??? TIMESET SECT CENT FGN 6 DOC
 7*W2    # %A RETURN LABEL FOR SEGENTRY  
 7B*L    [ DROPS THRU IF MIDNIGHT
 7BT=    [ %B RETURN IF MINUTE UP
 7C#W    [ %C OTHER RETURN   
 7D#6    #MAC  TIMESET   
 7DRQ          LDX   0  CLEANCT  
 7F?B          SBX   0  CLEANCTL 
 7FR2          SBN   0  60*1000/K9   
 7G=L          BNG   0  %C                  [JUMP IF FTIME STILL VALID   
 7GQ=          ACROSS   DATECON,3
 7H9W    #DEF  %A=0?                        [SET LABEL PARAM - MUST BE #DEF  
 7HPG          BZE   7  %B                  [X7=0 => NOT MIDNIGHT
 7J96    #NOR