Electromechanical Timer Replacement - 320Volt

More documents

Recommendations

Info

Electromechanical Timer Replacementaddwf PC ;add it to the program counter to jump to the; appropriate mode handlergoto Counter0 ;auto-reset event counter state 0 handler; (same as event counter state 0 handler)goto Counter1 ;auto-reset event counter state 1 handler;(same as event counter state 1 handler)goto ACounter2 ;auto-reset event counter state 2 handler;************************************************;* Main sequencer subroutine return point *;************************************************seqEnd retlw 0 ;return from subroutine; on delay state 0 - waiting for input to go activeOnDly0bcf flags,OUTON ;clear timer output on flagbtfsc flags,INPON ;is timer input active?goto OnDly0a ;if yes, go to OnDly0agoto seqEnd ;go to seqEndOnDly0a incf modest ;move to mode state 1call MoveP1ToTgt ;initialize target counter valuegoto seqEnd ;go to seqEnd; on delay state 1 - input active, waiting for target timer to time outOnDly1bcf flags,OUTON ;clear timer output on flagbtfsc flags,INPON ;is timer input still active?goto OnDly1a ;if yes, go to OnDly1aclrf modest ;otherwise, go back to state 0goto seqEnd ;go to seqEndOnDly1a call IsTgtZero ;is target timer = 0?SEQ ;goto seqEnd ;if not, go to seqEndincf modest ;otherwise, move to mode state 2goto seqEnd ;go to seqEndOnDly2OffDly0OffDly0aOffDly1OffDly2bsf flags,OUTON ;set timer output on flagbtfsc flags,INPON ;is timer input still active?goto seqEnd ;if yes, go to OnDly2aclrf modest ;otherwise, go back to state 0goto seqEnd ;go to seqEndbcf flags,OUTON ;clear timer output flagbtfsc flags,INPON ;is timer input active?goto OffDly0a ;if yes, go to OffDly0agoto seqEnd ;otherwise, goto seqEndincf modest ;move to mode state 1goto seqEnd ;go to seqEndbsf flags,OUTON ;set timer output on flagbtfsc flags,INPON ;is timer input still active?goto seqEnd ;if yes, go to seqEndincf modest ;move to mode state 2call MoveP1ToTgt ;initialize target counter valuegoto seqEnd ;go to seqEndbsf flags,OUTON ;set timer output on flagbtfsc flags,INPON ;is timer input active again?goto OffDly2a ;if so, go to OffDly2a© 1997 Microchip Technology Inc. DS40160A/1_005B-page 17
Electromechanical Timer Replacementcall IsTgtZero ;is target timer = 0?SEQ ;goto seqEnd ;if not, go to seqEndclrf modest ;otherwise, move to mode state 0goto seqEnd ;go to seqEndOffDly2aOneShot0OneShot0aOneShot1ROneShot1decf modest ;move back to mode state 1goto seqEnd ;go to seqEndbcf flags,OUTON ;clear timer output on flagbtfsc flags,EDGON ;has an active edge been detected?goto OneShot0a ;if yes, go to OnDly0agoto seqEnd ;go to seqEndincf modest ;move to mode state 1call MoveP1ToTgt ;initialize target counter valuegoto seqEnd ;go to seqEndbsf flags,OUTON ;set timer output on flagcall IsTgtZero ;is target timer = 0?SEQ ;goto seqEnd ;if not, go to seqEndclrf modest ;otherwise, move to mode state 0goto seqEnd ;go to seqEndbsf flags,OUTON ;set timer output on flagbtfsc flags,EDGON ;have we been retriggered?goto ROneShot1a ;yes we have - go to ROneShot1acall IsTgtZero ;is target timer = 0?SEQ ;goto seqEnd ;if not, go to seqEndclrf modest ;otherwise, move to mode state 0goto seqEnd ;go to seqEndROneShot1acall MoveP1ToTgt ;initialize target counter valuegoto seqEnd ;go to seqEndAstable0Astable1Astable2bcf flags,OUTON ;clear timer output on flagincf modest ;move to mode state 1call MoveP1ToTgt ;initialize target counter valuegoto seqEnd ;go to seqEndbsf flags,OUTON ;set timer output on flagcall IsTgtZero ;is target timer = 0?SEQ ;goto seqEnd ;if not, go to seqEndincf modest ;otherwise, move to mode state 2call MoveP2ToTgt ;initialize target counter valuegoto seqEnd ;go to seqEndbcf flags,OUTON ;clear timer output on flagcall IsTgtZero ;is target timer = 0?SEQ ;goto seqEnd ;if not, go to seqEndmovlw 1 ;otherwise, movemovwf modest ; to mode state 0call MoveP1ToTgt ;initialize target counter valueDS40160A/1_005B-page 18© 1997 Microchip Technology Inc.
Page 3 and 4: Electromechanical Timer Replacement
Page 11 and 12: Electromechanical TimerReplacementL
Page 13 and 14: MWORLDWIDE SALES & SERVICEAMERICASC
Page 17 and 18: PIC12C508 Based TimerElectromechani
Page 19 and 20: Electromechanical TimerReplacementA
Page 51: Electromechanical Timer Replacement
Page 59 and 60: Time Delay Relay FamilyElectromecha

Electromechanical Timer Replacement - 320Volt

Create successful ePaper yourself

Delete template?

Save as template?