Files
hexapod-robot/2019-teensy-nrf24/robot/PWMServo.cpp
T
2022-12-04 23:22:48 +01:00

227 lines
6.0 KiB
C++

#include "Arduino.h"
#include "PWMServo.h"
/*
PWMServo.cpp - Hardware Servo Timer Library
http://arduiniana.org/libraries/pwmservo/
Author: Jim Studt, jim@federated.com
Copyright (c) 2007 David A. Mellis. All right reserved.
renamed to PWMServo by Mikal Hart
ported to other chips by Paul Stoffregen
This library is free software; you can redistribute it and/or
modify it under the terms of the GNU Lesser General Public
License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version.
This library is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
Lesser General Public License for more details.
You should have received a copy of the GNU Lesser General Public
License along with this library; if not, write to the Free Software
Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
*/
#define NO_ANGLE (0xff)
#if defined(__AVR__)
#include <avr/interrupt.h>
uint8_t PWMServo::attachedA = 0;
uint8_t PWMServo::attachedB = 0;
#ifdef SERVO_PIN_C
uint8_t PWMServo::attachedC = 0;
#endif
void PWMServo::seizeTimer1()
{
uint8_t oldSREG = SREG;
cli();
TCCR1A = _BV(WGM11); /* Fast PWM, ICR1 is top */
TCCR1B = _BV(WGM13) | _BV(WGM12) /* Fast PWM, ICR1 is top */
| _BV(CS11) /* div 8 clock prescaler */
;
OCR1A = 3000;
OCR1B = 3000;
ICR1 = clockCyclesPerMicrosecond() * (20000L / 8); // 20000 uS is a bit fast for the refresh, 20ms, but
// it keeps us from overflowing ICR1 at 20MHz clocks
// That "/8" at the end is the prescaler.
#if defined(__AVR_ATmega8__)
TIMSK &= ~(_BV(TICIE1) | _BV(OCIE1A) | _BV(OCIE1B) | _BV(TOIE1) );
#else
TIMSK1 &= ~(_BV(OCIE1A) | _BV(OCIE1B) | _BV(TOIE1) );
#endif
SREG = oldSREG; // undo cli()
}
void PWMServo::releaseTimer1() {}
PWMServo::PWMServo() : pin(0), angle(NO_ANGLE) {}
uint8_t PWMServo::attach(int pinArg, int min, int max)
{
#ifdef SERVO_PIN_C
if (pinArg != SERVO_PIN_A && pinArg != SERVO_PIN_B && pinArg != SERVO_PIN_C) return 0;
#else
if (pinArg != SERVO_PIN_A && pinArg != SERVO_PIN_B) return 0;
#endif
min16 = min / 16;
max16 = max / 16;
pin = pinArg;
angle = NO_ANGLE;
digitalWrite(pin, LOW);
pinMode(pin, OUTPUT);
#ifdef SERVO_PIN_C
if (!attachedA && !attachedB && !attachedC) seizeTimer1();
#else
if (!attachedA && !attachedB) seizeTimer1();
#endif
if (pin == SERVO_PIN_A) {
attachedA = 1;
TCCR1A = (TCCR1A & ~_BV(COM1A0)) | _BV(COM1A1);
}
if (pin == SERVO_PIN_B) {
attachedB = 1;
TCCR1A = (TCCR1A & ~_BV(COM1B0)) | _BV(COM1B1);
}
#ifdef SERVO_PIN_C
if (pin == SERVO_PIN_C) {
attachedC = 1;
TCCR1A = (TCCR1A & ~_BV(COM1C0)) | _BV(COM1C1);
}
#endif
return 1;
}
void PWMServo::detach()
{
// muck with timer flags
if (pin == SERVO_PIN_A) {
attachedA = 0;
TCCR1A = TCCR1A & ~_BV(COM1A0) & ~_BV(COM1A1);
pinMode(pin, INPUT);
}
if (pin == SERVO_PIN_B) {
attachedB = 0;
TCCR1A = TCCR1A & ~_BV(COM1B0) & ~_BV(COM1B1);
pinMode(pin, INPUT);
}
#ifdef SERVO_PIN_C
if (pin == SERVO_PIN_C) {
attachedC = 0;
TCCR1A = TCCR1A & ~_BV(COM1C0) & ~_BV(COM1C1);
pinMode(pin, INPUT);
}
#endif
#ifdef SERVO_PIN_C
if (!attachedA && !attachedB && !attachedC) releaseTimer1();
#else
if (!attachedA && !attachedB) releaseTimer1();
#endif
}
void PWMServo::write(int angleArg)
{
uint16_t p;
if (angleArg < 0) angleArg = 0;
if (angleArg > 180) angleArg = 180;
angle = angleArg;
// bleh, have to use longs to prevent overflow, could be tricky if always a 16MHz clock, but not true
// That 8L on the end is the TCNT1 prescaler, it will need to change if the clock's prescaler changes,
// but then there will likely be an overflow problem, so it will have to be handled by a human.
p = (min16 * 16L * clockCyclesPerMicrosecond() + (max16 - min16) * (16L * clockCyclesPerMicrosecond()) * angle / 180L) / 8L;
if (pin == SERVO_PIN_A) OCR1A = p;
if (pin == SERVO_PIN_B) OCR1B = p;
#ifdef SERVO_PIN_C
if (pin == SERVO_PIN_C) OCR1C = p;
#endif
}
uint8_t PWMServo::attached()
{
if (pin == SERVO_PIN_A && attachedA) return 1;
if (pin == SERVO_PIN_B && attachedB) return 1;
#ifdef SERVO_PIN_C
if (pin == SERVO_PIN_C && attachedC) return 1;
#endif
return 0;
}
#elif defined(__arm__) && defined(TEENSYDUINO)
uint32_t PWMServo::attachedpins[(NUM_DIGITAL_PINS + 31) / 32]; // 1 bit per digital pin
PWMServo::PWMServo() : pin(255), angle(NO_ANGLE) {}
uint8_t PWMServo::attach(int pinArg, int min, int max)
{
// Serial.printf("attach, pin=%d, min=%d, max=%d\n", pinArg, min, max);
if (pinArg < 0 || pinArg >= NUM_DIGITAL_PINS) return 0;
if (!digitalPinHasPWM(pinArg)) return 0;
pin = pinArg;
analogWriteFrequency(pin, 50);
min16 = min >> 4;
max16 = max >> 4;
angle = NO_ANGLE;
digitalWrite(pin, LOW);
pinMode(pin, OUTPUT);
attachedpins[pin >> 5] |= (1 << (pin & 31));
// Serial.println("Succes!");
return 1;
}
void PWMServo::write(float angleArg)
{
//Serial.printf("write, pin=%d, angle=%d\n", pin, angleArg);
if (pin >= NUM_DIGITAL_PINS) return;
if (angleArg < 0) angleArg = 0;
if (angleArg > 180) angleArg = 180;
angle = angleArg;
uint32_t us = (((max16 - min16) * 46603 * (uint8_t)angle) >> 11) + (min16 << 12); // us*256
//uint32_t duty = (us * 3355) >> 22;
float usec = (float)((max16 - min16) << 4) * ((float)angle / 180.0f) + (float)(min16 << 4);
uint32_t duty = (int)(usec / 20000.0f * 4096.0f);
if (false)
Serial.printf("pin=%d, angle=%.2f, usec=%.2f, us=%.2f, duty=%d, min=%d, max=%d\n",
pin, (float)angle, usec, (float)us / 256.0f, duty, min16 << 4, max16 << 4);
#if TEENSYDUINO >= 137
noInterrupts();
uint32_t oldres = analogWriteResolution(12);
analogWrite(pin, duty);
analogWriteResolution(oldres);
interrupts();
#else
analogWriteResolution(12);
analogWrite(pin, duty);
#endif
}
uint8_t PWMServo::attached()
{
if (pin >= NUM_DIGITAL_PINS) return 0;
return (attachedpins[pin >> 5] & (1 << (pin & 31))) ? 1 : 0;
}
#endif