her keze selam
Sub led_yakma(kac_lamba As Integer)
led(kac_lamba).FillColor = &HFF00&
top_data = 0
Select Case kac_lamba
Case 0
data(0) = 1
Case 1
data(1) = 2
Case 2
data(2) = 4
Case 3
data(3) = 8
Case 4
data(4) = 16
Case 5
data(5) = 32
Case 6
data(6) = 64
Case 7
data(7) = 128
End Select
For...