'{$STAMP BS2}
'{$PBASIC 2.0}
'Program 1
x VAR Nib
a  CON 10
b  CON 11
c  CON 3
d  CON 0
e  CON 4
f  CON 9
g  CON 12

OUTPUT 0
OUTPUT 1
OUTPUT 3
OUTPUT 4
OUTPUT 5
OUTPUT 6
OUTPUT 7


HIGH a
HIGH b
HIGH c
HIGH d
HIGH e
HIGH f
HIGH g

LOW a     'turns all on
LOW b
LOW c
LOW d
LOW e
LOW f
LOW g
PAUSE 1000
HIGH a
HIGH b
HIGH c
HIGH d
HIGH e
HIGH f
HIGH g
PAUSE 1000


FOR x = 1 TO 5

LOW a     'flashes a rotation
PAUSE 21
HIGH a
PAUSE 21
LOW b
PAUSE 21
HIGH b
PAUSE 21
LOW c
PAUSE 21
HIGH c
PAUSE 21
LOW d
PAUSE 21
HIGH d
PAUSE 21
LOW e
PAUSE 21
HIGH e
PAUSE 21
LOW f
PAUSE 21
HIGH f
PAUSE 21
NEXT
LOW a
PAUSE 21
HIGH a
PAUSE 100

LOW a     'turns all on
LOW b
LOW c
LOW d
LOW e
LOW f
LOW g
PAUSE 700
HIGH a
HIGH b
HIGH c
HIGH d
HIGH e
HIGH f
HIGH g
PAUSE 1500

LOW a            '0
LOW b
LOW c
LOW d
LOW e
LOW f
PAUSE 1000
HIGH a
HIGH b
HIGH c
HIGH d
HIGH e
HIGH f


LOW b             '1
LOW c
PAUSE 1000
HIGH b
HIGH c


LOW a             '2
LOW b
LOW g
LOW e
LOW d
PAUSE 1000
HIGH a
HIGH b
HIGH g
HIGH d
HIGH e
HIGH d

LOW a             '3
LOW b
LOW c
LOW g
LOW d
PAUSE 1000
HIGH a
HIGH b
HIGH c
HIGH g
HIGH d

LOW f             '4
LOW g
LOW b
LOW c
PAUSE 1000
HIGH f
HIGH g
HIGH b
HIGH c

LOW a             '5
LOW f
LOW g
LOW c
LOW d
PAUSE 1000
HIGH a
HIGH f
HIGH g
HIGH c
HIGH d

LOW a             '6
LOW f
LOW g
LOW c
LOW d
LOW e
PAUSE 1000
HIGH a
HIGH f
HIGH g
HIGH c
HIGH d
HIGH e

LOW a             '7
LOW b
LOW c
PAUSE 1000
HIGH a
HIGH b
HIGH c

LOW a             '8
LOW b
LOW c
LOW d
LOW e
LOW f
LOW g
PAUSE 1000
HIGH a
HIGH b
HIGH c
HIGH d
HIGH e
HIGH f
HIGH g

LOW a             '9
LOW b
LOW c
LOW f
LOW g
PAUSE 1000
HIGH a
HIGH b
HIGH c
HIGH f
HIGH g

LOW a             'A
LOW b
LOW c
LOW g
LOW e
LOW f
PAUSE 1000
HIGH a
HIGH b
HIGH c
HIGH g
HIGH e
HIGH f

LOW f             'B
LOW g
LOW e
LOW d
LOW c
PAUSE 1000
HIGH f
HIGH g
HIGH e
HIGH d
HIGH c

LOW a             'C
LOW f
LOW e
LOW d
PAUSE 1000
HIGH a
HIGH f
HIGH e
HIGH d


LOW b              'd
LOW c
LOW d
LOW e
LOW g
PAUSE 1000
HIGH b
HIGH c
HIGH d
HIGH e
HIGH g

LOW a               'E
LOW d
LOW e
LOW f
LOW g
PAUSE 1000
HIGH a
HIGH d
HIGH e
HIGH f
HIGH g

LOW a               'F
LOW e
LOW f
LOW g
PAUSE 1000
HIGH a
HIGH e
HIGH f
HIGH g
PAUSE 1000

LOW a     'turns all on
LOW b
LOW c
LOW d
LOW e
LOW f
LOW g
PAUSE 500
HIGH a
HIGH b
HIGH c
HIGH d
HIGH e
HIGH f
HIGH g
PAUSE 500

LOW a     'turns all on
LOW b
LOW c
LOW d
LOW e
LOW f
LOW g
PAUSE 500
HIGH a
HIGH b
HIGH c
HIGH d
HIGH e
HIGH f
HIGH g
PAUSE 500


