← Back to branch summary

~arcachofo/simulide/1.1.0

« back to all changes in this revision

Viewing changes to resources/examples/Arduino/servo-gcb/servo.gcb

  • Committer: arcachofo
  • Date: 2021-01-01 14:23:42 UTC
  • Revision ID: arcachofo@simulide.com-20210101142342-ozfljnll44g5lbl3
Initial Commit 0.5.15-RC3

Show diffs side-by-side

added added

removed removed

Lines of Context:
resources/examples/Arduino/servo-gcb/servo.gcb
 
1
'''A demonstration program for GCGB and GCB.
 
2
'''--------------------------------------------------------------------------------------------------------------------------------
 
3
'''Attach a servo motor to PORTB.0 - this program will make it sweep back and forth
 
4
''':    Connect the potentiometer to AN0.
 
5
''':    The position of the servo motor will be respresentive to the position of the potentiometer.
 
6
'''@author              EvanV plus works of ChuckH
 
7
'''@licence     GPL
 
8
'''@version     1.0a
 
9
'''@date        31.01.2015
 
10
'''********************************************************************************
 
11
 
 
12
; ----- Configuration
 
13
  #chip mega328p, 16
 
14
 
 
15
; ----- Define Hardware settings
 
16
  ' No hardware configuration is required as outputs and inputs are set automatically within the methods used.
 
17
 
 
18
; ----- Constants
 
19
  ' No Constants specified in this example.
 
20
 
 
21
; ----- Variables
 
22
  ' No Variables specified in this example. All byte variables are defined upon use.
 
23
 
 
24
 
 
25
; ----- Main body of program commences here.
 
26
 
 
27
 
 
28
  main:
 
29
 
 
30
    count = ReadAD(AN0)
 
31
    'Limit CW travel
 
32
    if count < 75 then
 
33
        count = 75                                      
 
34
    end if
 
35
    'Limit CCW travel
 
36
    if count > 225 then
 
37
       count = 225                                      
 
38
    end if
 
39
    pulseout PORTB.0 ,count 10us
 
40
    wait 20 ms
 
41
 
 
42
  goto main