commit 1f4f985e64c21dfdc09389be00ad98ce2fa6372e Author: Fatima Idrees Date: Tue May 27 10:14:47 2025 +0300 Pushing diff --git a/Images/1.png b/Images/1.png new file mode 100644 index 0000000..f569169 Binary files /dev/null and b/Images/1.png differ diff --git a/Images/2.png b/Images/2.png new file mode 100644 index 0000000..905e9b9 Binary files /dev/null and b/Images/2.png differ diff --git a/Images/3.png b/Images/3.png new file mode 100644 index 0000000..5acc84d Binary files /dev/null and b/Images/3.png differ diff --git a/Images/4.png b/Images/4.png new file mode 100644 index 0000000..7538085 Binary files /dev/null and b/Images/4.png differ diff --git a/MotorFanLibrary.ubp b/MotorFanLibrary.ubp new file mode 100644 index 0000000..4501ed3 --- /dev/null +++ b/MotorFanLibrary.ubp @@ -0,0 +1,44 @@ +module main +author unknown +version 1 0 +description '' + + spec ' ' 'MotorFan' 'MotorFan _ _' 'num bool' 10 true + spec ' ' 'MotorSpeed' 'MotorSpeed _ _' 'auto auto' '10' '10' + +to MotorFan Pin State { + comment 'اوصل محرك المروحة بالمنفذ الذي وضعته' + comment 'حدد حالة المحرك ' + if (State == (booleanConstant true)) { + digitalWriteOp Pin true + } else { + digitalWriteOp Pin false + } +} + +to MotorSpeed Pin Speed { + comment 'اوصل محرك المروحة بالمنفذ الذي وضعته' + comment 'ضع السرعة التي تودها' + comment 'محرك المروحة يعمل وفقا للسرعة الموضوعة' + if (and (Speed > 0) (Speed < 1024)) { + analogWriteOp Pin Speed + } else { + digitalWriteOp Pin false + } +} + +script 67 68 { +to MotorFan {} +} + +script 451 147 { +whenStarted +MotorSpeed 23 500 +waitMillis 1500 +MotorSpeed 23 0 +} + +script 66 369 { +to MotorSpeed {} +} + diff --git a/MotorFanLibraryv2.ubp b/MotorFanLibraryv2.ubp new file mode 100644 index 0000000..ed5af45 --- /dev/null +++ b/MotorFanLibraryv2.ubp @@ -0,0 +1,26 @@ +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 +} + diff --git a/MotorFanLibraryv3.ubp b/MotorFanLibraryv3.ubp new file mode 100644 index 0000000..23c038f --- /dev/null +++ b/MotorFanLibraryv3.ubp @@ -0,0 +1,31 @@ +module main +author unknown +version 1 0 +description '' +variables PWM + + spec ' ' 'MotorFan' 'MotorFan _ _ _' 'num bool auto' 23 true 500 + +to MotorFan Pin State Speed { + if (and (Speed > 0) (Speed <= 100)) { + PWM = (absoluteValue (((Speed - 1) * ((1023 - 1) / 99)) + 1)) + if (State == (booleanConstant true)) { + if (and (PWM > 0) (PWM < 1024)) {analogWriteOp Pin PWM} + } else { + digitalWriteOp Pin false + } + } +} + +script 134 74 { +to MotorFan {} +} + +script 695 150 { +whenStarted +comment 'Enter (Pin, State, Speed%)' +MotorFan 23 true 12 +waitMillis 1000 +MotorFan 23 false 10 +} +