Rainbow Electronics API4000M - Manual (Page 13)

INTEGRATED
API4000M
SERIES
CIRCUITS INC. VOICE OTP MODULE
13
P30:
MOVD R0 , 15 ; /* R0 = 00001111 */
OUT PE , R0 ; /* Set Sound Processor = OFF, Melody = OFF */
CLINTR ; /* clear INTR2 */
JUMP ADDR , P50 ; /* go to P50 */
P40:
INPUT PA , R12 ; /* read Input Port A data */
ADDC R12 , 254 ; /* if R12 < 2 */
JUMP CO0 , P42 ; /* if PI0 = 1 go to P42 */
P41:
JUMP INTR1 , P41 ; /* if Key In go to P41 */
JUMP ADDR , P5 ; /* go to P5 */
P42:
JUMP INTR1 , P42 ; /* if Key In go to P42 */
MOVD R0 , 15 ; /* R0 = 00001111 */
OUT PE , R0 ; /* Set Sound Processor = OFF, Melody = OFF */
P50:
INTRE ; /* enable INTR signal */
SHUTDN ; /* Shut Down API4000M */
END ; /* End of Program , END must put in the end of program */