27 lines
431 B
Plaintext
27 lines
431 B
Plaintext
module main
|
|
author unknown
|
|
version 1 0
|
|
description ''
|
|
|
|
spec ' ' 'MotorFan' 'MotorFan _ _ _' 'num bool auto' 23 true 500
|
|
|
|
to MotorFan Pin State Speed {
|
|
if (State == (booleanConstant true)) {
|
|
if (and (Speed > 0) (Speed < 1024)) {analogWriteOp Pin Speed}
|
|
} else {
|
|
digitalWriteOp Pin false
|
|
}
|
|
}
|
|
|
|
script 67 68 {
|
|
to MotorFan {}
|
|
}
|
|
|
|
script 628 144 {
|
|
whenStarted
|
|
MotorFan 23 true 500
|
|
waitMillis 1000
|
|
MotorFan 23 false 10
|
|
}
|
|
|