INIT:
    MOVW 0X00           ;WHEN CODE IS FIRST LOADED MAKE ALL PORT B OUTPUTS
    MOVWR TRISB
MAIN:

    SERIN 5, t2400,  ( "BRENDAN" ), B0  ; Read the data packet
    debug b0            ;DEBUG THE DATA PACKET
if b0 < 6 then      ;IF IT IS LESS THAN 6(55 DECIBELS)
    high 5          ; TURN LED ON TO INDICATE WARNING
    for b8 = 1 to 2         ; FOR LOOP TO GET 2 MINUTE( MAX IS 60 SECONDS)
    pause 60000
    next for
    if b0 < 6            ; CHECK IF IT IS STILL LESS THAN 6
        high 7      ;SOUND THE ALARM
        pause 20000     ; PAUSE FOR 20 SECONDS
        low 7           ;TURN ALARM OFF
    end if          ;END THE SECOND IF STATEMENT
    low 5               ;TURN LED OFF
    else                ; ELSE (IF THE FIRST IF IS NOT TRUE)
    high 6          ; TURN ON THE OTHER LED
    pause 10000         ; PAUSE FOR 10 SECONDS
    low 6           ; TURN THE LED OFF
end if              ; END THE FIRST IF STATEMENT

goto main               ; GO TO THE TOP