Good day every one!

I have a new problem now .
I want a led to be on for 5sec. How ever pause and HSER dont work together. Any sugestions?

This is the program:

DEFINE LOADER_USED 1

DEFINE HSER_TXSTA 24h
DEFINE HSER_BAUD 2400

DEFINE OSC 4

Char VAR BYTE
LEDB var PORTD.1
LEDG var PORTD.2
LEDR VAR PORTD.4

main:
GOSUB standby
LOW LEDB
HSEROUT [STR char \1]
HIGH LEDG
PAUSE 5000
LOW LEDG
RCSTA.4 = 0
RCSTA.4 = 1
GOTO main

Standby:
High ledb
HSERIN [str char \1]
RETURN

Error:
END