Counting Down with a PIC16F628(A)

'*********************
Dim value as Byte
'*********************
Sub Procedure Dlay100
Delay_ms(100)
End Sub
'*********************
Main:
     TrisB = %00000000 'Configure Pins of PortB as Output
     value = 255       'Start code off with a value = 255
Count_Dwn:
     PortB = value     'Send value to PortB
     Value = value - 1 'Subtract one to Value
     If value = 0 Then 'If value is equal to 255 then....
        value = 255    'Value switches back to 255
     End if            'Always end an If statement with an End If
     Dlay100           'Call the Dlay100 sub procedure
Goto Count_Dwn         'Jump back up to the Count_Dwn Section
End.                   'All good things must end
'*********************