Help with BS2 to BS1

billy.bob

This is a light show I run on BS2 and for the life of me can't make it run on BS1, I think it has to do with symbol. Please help and sure would be thanken ya.
' {$STAMP BS2}
' {$PBASIC 2.5}
Ct VAR Byte
DO
FOR ct = 30 TO 50
HIGH 0
PAUSE ct
LOW 0
PAUSE ct
NEXT
FOR ct = 30 TO 50
HIGH 1
PAUSE ct
LOW 1
PAUSE ct
NEXT
FOR ct = 30 TO 50
HIGH 2
PAUSE ct
LOW 2
PAUSE ct
NEXT
FOR ct = 30 TO 50
HIGH 3
PAUSE ct
LOW 3
PAUSE ct
NEXT
FOR ct = 30 TO 50
HIGH 4
PAUSE ct
LOW 4
PAUSE ct
NEXT
LOOP