Search
Search titles only
By:
Search titles only
By:
Home
Forums
New posts
Search forums
What's new
New posts
Latest activity
Members
Current visitors
Κανονισμός Λειτουργίας
Σωματείο AVClub
Log in
Register
Search
Search titles only
By:
Search titles only
By:
New posts
Search forums
Menu
Install the app
Install
Reply to thread
Home
Forums
AVClub Lounge
Εργαλεία, Gadgets και Κατασκευές
Φακοί LED
Η γωνιά της μετατροπής
JavaScript is disabled. For a better experience, please enable JavaScript in your browser before proceeding.
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an
alternative browser
.
Message
<blockquote data-quote="astanapane_10" data-source="post: 1390320" data-attributes="member: 23365"><p><strong>Re: Η γωνια της μετατροπης</strong></p><p></p><p>δεν ξερω αν μπορω να το βαλω το θεμα εδω αλλα νομιζω οτι ταιριαζει απολυτα.</p><p></p><p>Εχω φτιαξει εναν απλο μεχρι στιγμης κωδικα που φαινεται να δουλευει με καποια μικρα προβληματα.</p><p></p><p>Το κυκλωμα θα το ανεβασω μαζι με πληροφοριες προς το παρον να ο κωδικας....</p><p></p><p>εχει γινει με το τσιπακι της Microchip pic12f675.</p><p></p><p>στο πιν 7 το LED και στο πιν 4 o διακοπτης.</p><p></p><p>@ DEVICE PIC12F675,INTRC_OSC_NOCLKOUT ' internal RC osc</p><p>@ DEVICE PIC12F675,MCLR_OFF ' Disable external MCLR</p><p>@ DEVICE PIC12F675,WDT_OFF ' Disable WatchDog timer</p><p>@ DEVICE PIC12F675,PROTECT_OFF ' Disable device protect</p><p>@ DEVICE PIC12F675,CPD_OFF ' Disable Code-Protect</p><p></p><p>GPIO = 0</p><p>TRISIO = %00001000 </p><p>CMCON = 7</p><p>ANSEL = 0</p><p>CNT VAR BYTE</p><p> BUT VAR GPIO.3</p><p> LED VAR GPIO.0</p><p> cnt = 0</p><p> </p><p> CHECK:</p><p> IF BUT = 0 THEN TICK</p><p> GOTO CHECK </p><p> </p><p> TICK:</p><p> PAUSE 100</p><p> CNT = CNT + 1</p><p> IF cnt = 1 THEN DIM</p><p> IF cnt = 2 THEN PER</p><p> if cnt = 3 then bright </p><p> if cnt = 4 then sos</p><p> IF CNT => 5 THEN LED_OFF</p><p> GOTO CHECK</p><p> </p><p> DIM:</p><p> PWM LED,10,100 (αναβει στο περιπου 10 του 255)</p><p> IF BUT = 0 THEN TICK</p><p> GOTO DIM</p><p> </p><p> PER:</p><p> pwm led,100,100 (αναβει στο 100 του 255)</p><p> if but = 0 then tick</p><p> goto per</p><p> </p><p> BRIGHT:</p><p> HIGH LED (αναβει στο φουλ)</p><p> PAUSE 100</p><p> IF BUT = 0 THEN TICK</p><p> GOTO BRIGHT</p><p> </p><p> sos: (εδω εχω βαλει καποια παραλλαγη του ΣΟΣ, θελει φτιαξιμο)</p><p> high led</p><p> pause 500</p><p> low led</p><p> pause 200</p><p> high led</p><p> pause 500</p><p> low led</p><p> pause 200</p><p> high led</p><p> pause 500</p><p> low led</p><p> pause 2000</p><p> </p><p> high led</p><p> pause 100</p><p> low led</p><p> pause 200</p><p> high led</p><p> pause 100</p><p> low led</p><p> pause 200</p><p> high led</p><p> pause 100</p><p> low led</p><p> pause 100</p><p> </p><p> if but = 0 then tick</p><p> goto sos</p><p> </p><p> LED_OFF:</p><p> LOW LED</p><p> PAUSE 250</p><p> CNT = 0</p><p> GOTO CHECK</p><p> </p><p> end</p></blockquote><p></p>
[QUOTE="astanapane_10, post: 1390320, member: 23365"] [b]Re: Η γωνια της μετατροπης[/b] δεν ξερω αν μπορω να το βαλω το θεμα εδω αλλα νομιζω οτι ταιριαζει απολυτα. Εχω φτιαξει εναν απλο μεχρι στιγμης κωδικα που φαινεται να δουλευει με καποια μικρα προβληματα. Το κυκλωμα θα το ανεβασω μαζι με πληροφοριες προς το παρον να ο κωδικας.... εχει γινει με το τσιπακι της Microchip pic12f675. στο πιν 7 το LED και στο πιν 4 o διακοπτης. @ DEVICE PIC12F675,INTRC_OSC_NOCLKOUT ' internal RC osc @ DEVICE PIC12F675,MCLR_OFF ' Disable external MCLR @ DEVICE PIC12F675,WDT_OFF ' Disable WatchDog timer @ DEVICE PIC12F675,PROTECT_OFF ' Disable device protect @ DEVICE PIC12F675,CPD_OFF ' Disable Code-Protect GPIO = 0 TRISIO = %00001000 CMCON = 7 ANSEL = 0 CNT VAR BYTE BUT VAR GPIO.3 LED VAR GPIO.0 cnt = 0 CHECK: IF BUT = 0 THEN TICK GOTO CHECK TICK: PAUSE 100 CNT = CNT + 1 IF cnt = 1 THEN DIM IF cnt = 2 THEN PER if cnt = 3 then bright if cnt = 4 then sos IF CNT => 5 THEN LED_OFF GOTO CHECK DIM: PWM LED,10,100 (αναβει στο περιπου 10 του 255) IF BUT = 0 THEN TICK GOTO DIM PER: pwm led,100,100 (αναβει στο 100 του 255) if but = 0 then tick goto per BRIGHT: HIGH LED (αναβει στο φουλ) PAUSE 100 IF BUT = 0 THEN TICK GOTO BRIGHT sos: (εδω εχω βαλει καποια παραλλαγη του ΣΟΣ, θελει φτιαξιμο) high led pause 500 low led pause 200 high led pause 500 low led pause 200 high led pause 500 low led pause 2000 high led pause 100 low led pause 200 high led pause 100 low led pause 200 high led pause 100 low led pause 100 if but = 0 then tick goto sos LED_OFF: LOW LED PAUSE 250 CNT = 0 GOTO CHECK end [/QUOTE]
Verification
Post reply
Home
Forums
AVClub Lounge
Εργαλεία, Gadgets και Κατασκευές
Φακοί LED
Η γωνιά της μετατροπής
Top
Bottom
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.
Accept
Learn more…