Thomas Engdahl’s PowerUP_HI

;PowerUP_HI
;Says "HI" in morse code on powerup
;By Thomas Engdahl

to runlightgreen
    setbit 0 portc                      ;   set port C0 to high voltage
    clearbit 3 portc                    ;   set port C3 to low voltage
end

to runlightred
    setbit 3 portc                      ;   set port C3 to high voltage
    clearbit 0 portc                    ;   set port C0 to low voltage
end

to runlightoff
    clearbit 0 portc                    ;   set both port C0
    clearbit 3 portc                    ;       and port C3 to low voltage
end

to dot
        runlightgreen
        wait 5
        runlightred
        wait 5
end

to dash
        runlightgreen
        wait 10
        runlightred
        wait 5
end

to space
        runlightred
        wait 10
end

to MC_H
        dot dot dot dot
end

to MC_I
        dot dot
end

to powerup
        space MC_H space MC_I space
end