From c to pbp

[savnik]

Here you go, 'unverified' code.

@ device PIC16f84, HS, NOWDT, PROTECT, PUT

ltime  var  word
PIN_B7 var PORTB.7

   TRISB = 0
   for ltime = 0 to 50
      PIN_B7 = 1
      pause 50
      PIN_B7 = 0
      pause 50
   next

   while (1)
      PORTB = 1
      pause_us(59)
      PORTB = 2
      pause_us(59)
      PORTB = $41
      pause_us(59)
      PORTB = $42
      pause_us(59)
   wend
/////////////////////// the end !! ////////////////////////////////////////

Thank you.I will try.