' {$STAMP BS2}
' {$PBASIC 2.5}

DEBUG "program running"

DO
  HIGH 8
  PAUSE 200
  LOW 8
  HIGH 9
  PAUSE 200
  LOW 9
  HIGH 10
  PAUSE 200
  LOW 10
  HIGH 11
  PAUSE 200
  LOW 11
  HIGH 12
  PAUSE 200
  LOW 12
  HIGH 13
  PAUSE 200
  LOW 13
  HIGH 14
  PAUSE 200
  LOW 14
  HIGH 15
  PAUSE 200
  LOW 15
  HIGH 15
  PAUSE 200
  LOW 15
  HIGH 14
  PAUSE 200
  LOW 14
  HIGH 13
  PAUSE 200
  LOW 13
  HIGH 12
  PAUSE 200
  LOW 12
  HIGH 11
  PAUSE 200
  LOW 11
  HIGH 10
  PAUSE 200
  LOW 10
  HIGH 9
  PAUSE 200
  LOW 9
  HIGH 8
  PAUSE 200
  LOW 8
  PAUSE 2000
  HIGH 8
  HIGH 9
  HIGH 10
  HIGH 11
  HIGH 12
  HIGH 13
  HIGH 14
  HIGH 15
  PAUSE 300
  LOW 8
  LOW 9
  LOW 10
  LOW 11
  LOW 12
  LOW 13
  LOW 14
  LOW 15
  PAUSE 200
  HIGH 8
  HIGH 9
  HIGH 10
  HIGH 11
  HIGH 12
  HIGH 13
  HIGH 14
  HIGH 15
  PAUSE 500
  LOW 8
  LOW 9
  LOW 10
  LOW 11
  LOW 12
  LOW 13
  LOW 14
  LOW 15
  PAUSE 2000
  HIGH 8
  PAUSE 200
  LOW 8
  HIGH 9
  PAUSE 200
  LOW 9
  HIGH 10
  PAUSE 200
  LOW 10
  HIGH 11
  PAUSE 200
  LOW 11
  HIGH 12
  PAUSE 200
  LOW 12
  HIGH 13
  PAUSE 200
  LOW 13
  HIGH 14
  PAUSE 200
  LOW 14
  HIGH 15
  PAUSE 200
  LOW 15
  HIGH 15
  PAUSE 200
  LOW 15
  HIGH 14
  PAUSE 200
  LOW 14
  HIGH 13
  PAUSE 200
  LOW 13
  HIGH 12
  PAUSE 200
  LOW 12
  HIGH 11
  PAUSE 200
  LOW 11
  HIGH 10
  PAUSE 200
  LOW 10
  HIGH 9
  PAUSE 200
  LOW 9
  HIGH 8
  PAUSE 200
  LOW 8
  PAUSE 2000
  HIGH 8
  HIGH 9
  HIGH 10
  HIGH 11
  HIGH 12
  HIGH 13
  HIGH 14
  HIGH 15
  PAUSE 300
  LOW 8
  LOW 9
  LOW 10
  LOW 11
  LOW 12
  LOW 13
  LOW 14
  LOW 15
  PAUSE 200
  HIGH 8
  HIGH 9
  HIGH 10
  HIGH 11
  HIGH 12
  HIGH 13
  HIGH 14
  HIGH 15
  PAUSE 500
  LOW 8
  LOW 9
  LOW 10
  LOW 11
  LOW 12
  LOW 13
  LOW 14
  LOW 15
  PAUSE 2000
  LOOP