LED 閃爍 調整亮度

ㄜ  周老師!!!
不太知道  怎麼寫程式=口=
沒碰觸過   所以  不太知道  LED 閃爍調整亮度  怎麼打=口=
!!!!!!!!!!!!!!!!!!!!!!!!

參考這個看看

Sub main()
  Dim i As Word
  Low 0
  Output(0)
'低亮度 3 秒
  For i = 0 To 100    '（週期為 30ms * 100 ~= 3 秒，由於頻率大於 24Hz，眼睛就不太能看出它在閃爍）
    Hi 0                    '（ 點亮接在 P0 的 LED 燈）
    Pause 10
    Low 0                 '（ 熄滅接在 P0 的 LED 燈）
    Pause 20            
  Next
'中亮度 3 秒
  For i = 0 To 100    '（週期為 30ms * 100 ~= 3 秒，由於頻率大於 24Hz，眼睛就不太能看出它在閃爍）
    Hi 0                    '（ 點亮接在 P0 的 LED 燈）
    Pause 20
    Low 0                 '（ 熄滅接在 P0 的 LED 燈）
    Pause 10            
  Next
End Sub

如果已解決你的問題，請回覆讓我知道喔！

周老師~~~~~~~~~~~~~~

錯誤 2 個 =口=

jeyye0203 發表於 2012-5-4 23:02
周老師~~~~~~~~~~~~~~

錯誤 2 個 =口=

打字也是會不小心沒斷行的啦，不過藍色字的錯誤我以為你可已自已找出來的說...

ㄜ   還是聽不太懂-....-   @@"