B4R Question Read pins into a byte

dim s as byte =0
Dim s2 as byte=0
dim mask as int=1
For i = 0 To 3
    Dim f As Boolean
    f = rly(i).DigitalRead
    If f = True Then  'some part of  byte s = 1
         'This will work
         s=Bit.Or(s, Bit.ShifLeft(1,i))    ' pins 0 to 3 will be in bits 0 (weight=1) to 3 (weight=8)

         'This is basically the same
         s2 = s2 + mask
     Else
        'some part of  byte s = 0 --> just do nothing
     End If
     mask=mask*2
next
Log("Result is "&s)
Log("Result is "&s2)

Dim s As Byte = 0 'very important
For i = 0 To 3
   If ifrly(i).DigitalRead Then Bit.Set(s, i)
Next