64 lines
1.4 KiB
Plaintext
64 lines
1.4 KiB
Plaintext
module RGB_LED
|
|
author unknown
|
|
version 1 0
|
|
description ''
|
|
variables SetPins
|
|
|
|
spec ' ' 'RGBLED' 'RGB Pin _ R _ G _ B _' 'auto bool bool bool' 17 false false false
|
|
spec ' ' 'PickColor' 'RGB Pin _ Color _' 'num str' 17 'Empty'
|
|
|
|
to PickColor Pin Color {
|
|
if (Color == ('[data:toString]' 'Red')) {
|
|
digitalWriteOp Pin true
|
|
Pin += 1
|
|
digitalWriteOp Pin false
|
|
Pin += 1
|
|
digitalWriteOp Pin false
|
|
} (Color == ('[data:toString]' 'Yellow')) {
|
|
digitalWriteOp Pin true
|
|
Pin += 1
|
|
digitalWriteOp Pin true
|
|
Pin += 1
|
|
digitalWriteOp Pin false
|
|
} (Color == ('[data:toString]' 'Green')) {
|
|
digitalWriteOp Pin false
|
|
Pin += 1
|
|
digitalWriteOp Pin true
|
|
Pin += 1
|
|
digitalWriteOp Pin false
|
|
} (Color == ('[data:toString]' 'Purple')) {
|
|
digitalWriteOp Pin false
|
|
Pin += 1
|
|
digitalWriteOp Pin true
|
|
Pin += 1
|
|
digitalWriteOp Pin true
|
|
} (Color == ('[data:toString]' 'Blue')) {
|
|
digitalWriteOp Pin false
|
|
Pin += 1
|
|
digitalWriteOp Pin false
|
|
Pin += 1
|
|
digitalWriteOp Pin true
|
|
} true {
|
|
digitalWriteOp Pin true
|
|
Pin += 1
|
|
digitalWriteOp Pin true
|
|
Pin += 1
|
|
digitalWriteOp Pin true
|
|
} else {
|
|
digitalWriteOp Pin false
|
|
Pin += 1
|
|
digitalWriteOp Pin false
|
|
Pin += 1
|
|
digitalWriteOp Pin false
|
|
}
|
|
}
|
|
|
|
to RGBLED Pin Red Green Blue {
|
|
digitalWriteOp Pin Red
|
|
Pin += 1
|
|
digitalWriteOp Pin Green
|
|
Pin += 1
|
|
digitalWriteOp Pin Blue
|
|
}
|
|
|