安德烈Mikhalchuk的博客

你做任何你想要用此代码，只是提到我的博客http://andrey.mikhalchuk.com
的意见，使人们可以找到更新的代码。 谢谢！

这是我的第一个PICAXE方案，我道歉，如果这个代码不符合您的质量
期望和伤害你的感情有多好代码应该看起来像:)
＃endrem

＃PICAXE08米
setfreq M4

;配置
象征速度= 3;值越小颜色变化速度越高
的象征SPEED_VARIATIONS = 7;定义应该使用多少个不同的颜色变化速度

;地图上的标签
象征RED0_PIN = 0
象征GREEN0_PIN = 1
象征BLUE0_PIN = 2

;地图引脚值，以MEM
;针值是目前的LED亮度
象征red0 = B0
象征green0 = B1
象征blue0 = B2

;地图pin_deltas到Mem
三角洲是亮度变化的速度
象征red0_delta = B3
象征green0_delta = B4
象征blue0_delta = B5

;子程序的温度值
象征delta_w = W3
象征TMP = B7

;子程序参数
符号引脚= B8
符号值= B9
象征三角洲= B10

;初始化一切
red0 = 0
green0 = 70
blue0 = 200
red0_delta = 1
green0_delta = 5
blue0_delta = 9

，启动伺服模式
;注意“servopos RED0_PIN，255”呈现LED熄灭！！
;的“servopos RED0_PIN，0”使得它真的暗淡，但点燃。 是，PICAXE错误，？
伺服RED0_PIN，255
伺服GREEN0_PIN，255
伺服BLUE0_PIN，255

这个代码是像循环（在阿尔杜伊诺）
主要有：
;模拟功能，减少环境中的函数调用
引脚= RED0_PIN：VAL = red0：三角洲= red0_delta：GOSUB set_color_val：red0 = VAL：red0_delta三角洲
引脚= GREEN0_PIN：VAL = green0：三角洲= green0_delta：GOSUB set_color_val：green0 = VAL：green0_delta三角洲
引脚= BLUE0_PIN：VAL = blue0：三角洲= blue0_delta：GOSUB set_color_val：blue0 = VAL：blue0_delta三角洲
转到主

本次调整亮度的LED和三角洲
set_color_val：
值= VAL +三角洲
如果三角洲<128和val <三角洲然后FWD
随机delta_w
三角洲=的三角洲％SPEED_VARIATIONS + 1个
三角洲= 255 - 三角洲
值= 255
ELSEIF三角洲> = 128和val> =三角洲然后反向
随机delta_w
三角洲=的三角洲％SPEED_VARIATIONS + 1个
值= 0
ENDIF
TMP = VAL - 1; servopos错误的解决方法
;啊，servopos只需要常数作为第一个参数：（
如果针= RED0_PIN然后
servopos RED0_PIN，TMP
ELSEIF针= GREEN0_PIN然后
servopos GREEN0_PIN，TMP
ELSEIF针= BLUE0_PIN然后
servopos BLUE0_PIN，TMP
ENDIF
暂停速度
返回

YouTube上看到我的其他博客http://rtfms.com的和视频博客RTFMs的用于演示
，这是覆盖在情节＃7：微控制器会见珠宝