ExternalVendorCode/k3ng_rotator_controller
1
0
Fork 0
mirror of https://github.com/k3ng/k3ng_rotator_controller.git synced 2024-12-19 05:07:55 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity
78e7c61030
k3ng_rotator_controller/k3ng_rotator_controller.ino
Anthony Good 78e7c61030 2.0.2014070501 FEATURE_ANALOG_OUTPUT_PINS
2014-07-05 07:31:56 -04:00

11280 lines
414 KiB
C++
Raw Blame History

/* Arduino Rotator Controller
Anthony Good
K3NG
anthony.good@gmail.com
Contributions from John Eigenbode, W3SA
w3sa@arrl.net
Contributions: AZ/EL testing and debugging, AZ/EL LCD Enhancements, original North center code, Az/El Rotator Control Connector Pins
Contributions from Jim Balls, M0CKE
makidoja@gmail.com
Contributions: Rotary Encoder Preset Support
Contributions from Gord, VO1GPK
Contribution: FEATURE_ADAFRUIT_BUTTONS code
Moon2 and sunpos libraries courtesy of Pete Hardie, VE5VA
Non-English extensions ideas, code, and testing provided by Marcin SP5IOU, Hjalmar OZ1JHM, and Sverre LA3ZA
Testing, ideas, and hardware provided by Anthony M0UPU, Bent OZ1CT, Eric WB6KCN, Norm N3YKF, and many others
Translations: Maximo, EA1DDO
***************************************************************************************************************
*
* This program is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 3.0 Unported License
*
* http://creativecommons.org/licenses/by-nc-sa/3.0/
*
* http://creativecommons.org/licenses/by-nc-sa/3.0/legalcode
*
*
***************************************************************************************************************
All copyrights are the property of their respective owners
Full documentation is currently located here: https://docs.google.com/document/d/1Q4_X2XdndylohjhZWsaAUNl1UIqYGt9Kxp1VM70XJGM/edit?usp=sharing
Rules for using this code:
Rule #1: Read the documentation.
Rule #2: Refer to rule #1.
Rule #3: Help others.
Rule #4: Have fun.
New in this release:
HH-12 encoder support
OPTION_PULSE_IGNORE_AMBIGUOUS_PULSES
\P PWM command is now \W
\P is Park command
park_in_progress_pin // goes high when a park has been initiated and rotation is in progress
parked_pin // goes high when in a parked position
heading_reading_inhibit_pin
FEATURE_LIMIT_SENSE
#define az_limit_sense_pin 0 // input - low stops azimuthal rotation
#define el_limit_sense_pin 0 // input - low stops elevation rotation
\Axxx command - manually set azimuth, xxx = azimuth (FEATURE_AZ_POSITION_ROTARY_ENCODER or FEATURE_AZ_POSITION_PULSE_INPUT only)
\Bxxx command - manually set elevation, xxx = elevation (FEATURE_EL_POSITION_POTENTIOMETER or FEATURE_EL_POSITION_ROTARY_ENCODER only)
fixed bug with preset encoder start and kill button
FEATURE_AZ_POSITION_INCREMENTAL_ENCODER
FEATURE_EL_POSITION_INCREMENTAL_ENCODER
OPTION_INCREMENTAL_ENCODER_PULLUPS
#define AZ_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV 8000.0
#define EL_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV 8000.0
AZIMUTH_STARTING_POINT_DEFAULT and AZIMUTH_ROTATION_CAPABILITY_DEFAULT are now persistent
Yaesu P35, P45, and Z commands no longer write to eeprom
control_port points to the hardware port for computer interface
remote_unit_port points to the hardware port for interfacing to remote unit
removed OPTION_SERIAL1, 2, 3, 4
SS command: SS0 = control port, SS1 = remote unit port
No longer need to manually uncomment hh12.h or object declarations
No longer need to manually uncomment LiquidCrystal lcd()
No longer need to manually uncomment Adafruit_ADXL345 accel
No longer need to manually uncomment ADXL345 accel
No longer need to manually uncomment Adafruit_LSM303 lsm;
No longer need to manually uncomment HMC5883L compass;
FEATURE_4_BIT_LCD_DISPLAY
FEATURE_ADAFRUIT_I2C_LCD
FEATURE_YOURDUINO_I2C_LCD
FEATURE_RFROBOT_I2C_DISPLAY
No longer need to uncomment:
FEATURE_LCD_DISPLAY
FEATURE_I2C_LCD
any include files
serial led duration now set by SERIAL_LED_TIME_MS
#define CONTROL_PORT_MAPPED_TO &Serial // change this line to map the control port to a different serial port (Serial1, Serial2, etc.)
#define REMOTE_PORT_MAPPED_TO &Serial1 // change this line to map the remote_unit port to a different serial port
start of remote unit pin control
remote unit pin control (add 100 to a pin number define to map to remote unit pin)
FEATURE_CLOCK
FEATURE_MOON_TRACKING
#define DEFAULT_LATITUDE 40.889958
#define DEFAULT_LONGITUDE -75.585972
#define INTERNAL_CLOCK_CORRECTION 0.00145
\C - show clock
\O - set clock \OYYYYMMDDHHmm
\Mx - x = 0: deactive moon tracking; x = 1: activate moon tracking
\Gxxxxxx - set coordinates via grid square (example: \GFN20EV)
Park is now deactivated when issuing a Yaesu command (other than C) or when doing manual rotation
FEATURE_GPS
#define GPS_PORT_MAPPED_TO &Serial2
#define GPS_PORT_BAUD_RATE 9600
#define SYNC_TIME_WITH_GPS 1
#define SYNC_COORDINATES_WITH_GPS 1
#define GPS_SYNC_PERIOD_SECONDS 10 // how long to consider internal clock syncronized after a GPS reading
#define GPS_VALID_FIX_AGE_MS 10000 // consider a GPS reading valid if the fix age is less than this
FEATURE_SUN_TRACKING
\Ux - x = 0: deactive sun tracking; x = 1: activate sun tracking
FEATURE_AZ_POSITION_INCREMENTAL_ENCODER & FEATURE_EL_POSITION_INCREMENTAL_ENCODER coding
Updated debug output format
\XS - calibration az and el to sun heading - there are calculation bugs
fixed initialize_serial() compilaton error when neither yaesu or easycom protocol is selected in features
fixed bugs in \XS and \XM
\XS and\XM now working on all sensor types
moon_tracking_active_pin
sun_tracking_active_pin
moon_tracking_activate_line
sun_tracking_activate_line
moon_tracking_button
sun_tracking_button
\A azimuth calibration now also works with sensors other than rotary encoders and pulse input
\B elevation calibration now also works with sensors other than rotary encoders and pulse input
OPTION_BUTTON_RELEASE_NO_SLOWDOWN
Fixed God-awful bug that caused Arduino to crash when running FEATURE_GPS. Note to self: never declare a char in a switch case. It causes unpredicatable, unexplainable evil stuff to occur.
Fixed bug with elevation PWM
gps_sync pin - goes high when clock is GPS synchronized
FEATURE_RTC_PCF8583
\O command also programs realtime clocks now
Fixed bug in PWM outputs when changing direction
Ethernet now working with backslash commands, Yaesu commands, and Easycom commands
Fixed bug in Easycom (non-standard) AZ and EL commands
Ethernet remote unit slave support (slave only, master using ethernet not done yet)
#define GPS_MIRROR_PORT &Serial3
OPTION_DISPLAY_SMALL_CLOCK
#define LCD_SMALL_CLOCK_POSITION LEFT
OPTION_DISPLAY_GPS_INDICATOR
#define LCD_GPS_INDICATOR_POSITION RIGHT
OPTION_DISPLAY_MOON_TRACKING_CONTINUOUSLY
#define LCD_MOON_TRACKING_ROW 3
#define LCD_MOON_TRACKING_UPDATE_INTERVAL 5000
OPTION_DISPLAY_SUN_TRACKING_CONTINUOUSLY
#define LCD_SUN_TRACKING_ROW 4
#define LCD_SUN_TRACKING_UPDATE_INTERVAL 5000
#define LCD_ROWS 4
fixed bug with Yourduino LCD display initialization (thanks PA3FPQ)
added GPS counters to debug output
FEATURE_POWER_SWITCH
#define POWER_SWITCH_IDLE_TIMEOUT 15 (unit: minutes)
#define power_switch 0
OPTION_DISPLAY_MOON_OR_SUN_TRACKING_CONDITIONAL
#define LCD_MOON_OR_SUN_TRACKING_CONDITIONAL_ROW 3
OPTION_DISPLAY_BIG_CLOCK
#define GPS_UPDATE_LATENCY_COMPENSATION_MS 200
#define AZIMUTH_CALIBRATION_FROM_ARRAY {180,630}
#define AZIMUTH_CALIBRATION_TO_ARRAY {180,630}
#define ELEVATION_CALIBRATION_FROM_ARRAY {-180,0,180}
#define ELEVATION_CALIBRATION_TO_ARRAY {-180,0,180}
#define rotate_cw_ccw 0
#define az_stepper_motor_direction 0
#define el_stepper_motor_direction 0
bug fix for long clock display
performance improvement for az / el display on LCD
#define az_stepper_motor_pulse 0
#define el_stepper_motor_pulse 0
OPTION_DISPLAY_ALT_HHMM_CLOCK_AND_MAIDENHEAD
#define LCD_SMALL_CLOCK_AND_MAIDENHEAD_POSITION
#define LCD_SMALL_CLOCK_AND_MAIDENHEAD_ROW 4
#define LCD_GPS_INDICATOR_ROW 1
OPTION_EXTERNAL_ANALOG_REFERENCE
more debug_print conversion
OPTION_DISPLAY_SMALL_CLOCK renamed to OPTION_DISPLAY_HHMM_CLOCK
LCD_SMALL_CLOCK_POSITION renamed to LCD_HHMM_CLOCK_POSITION
OPTION_DISPLAY_HHMMSS_CLOCK
OPTION_DISPLAY_DISABLE_DIRECTION_STATUS
OPTION_DISPLAY_SMALL_CLOCK_AND_MAIDENHEAD renamed to OPTION_DISPLAY_ALT_HHMM_CLOCK_AND_MAIDENHEAD
OPTION_DISPLAY_CONSTANT_HHMMSS_CLOCK_AND_MAIDENHEAD
#define LCD_HHMM_CLOCK_POSITION LEFT //LEFT or RIGHT
#define LCD_HHMMSS_CLOCK_POSITION LEFT //LEFT or RIGHT
#define LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_POSITION LEFT
#define LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_ROW 1
#define LCD_CONSTANT_HHMMSS_CLOCK_AND_MAIDENHEAD_POSITION LEFT
#define LCD_CONSTANT_HHMMSS_CLOCK_AND_MAIDENHEAD_ROW 1
OPTION_DISPLAY_DISABLE_DIRECTION_STATUS changed to OPTION_DISPLAY_DIRECTION_STATUS
worked on FEATURE_TWO_DECIMAL_PLACE_HEADINGS
LANGUAGE_ENGLISH
Easycom improvements - space and LF are now also command delimiters. Also fixed bug with one decimal place. Works with PSTRotator
Fixed issue with LCD display updating when target az or target el was changed during rotation
I2C_LCD_COLOR also applies to Yourduino LCD display
HH-12 elevation bug fix
FEATURE_MASTER_WITH_SERIAL_SLAVE
FEATURE_MASTER_WITH_ETHERNET_SLAVE
FEATURE_EL_POSITION_MEMSIC_2125 under development - not working yet
fixed a bug with azimuth and elevation offset zeroing out first decimal place
Ethernet master/slave link!
#define ETHERNET_SLAVE_IP_ADDRESS 192,168,1,173
#define ETHERNET_SLAVE_TCP_PORT 23
#define ETHERNET_SLAVE_RECONNECT_TIME_MS 250
Changed master/slave AZ and EL command result format: AZxxx.xxxxxx EL+xxx.xxxxxx
Slave CL command
OPTION_SYNC_MASTER_CLOCK_TO_SLAVE
fixed "if (clock_status == SLAVE_SYNC) {clock_status = FREE_RUNNING;}" compile error
OPTION_CLOCK_ALWAYS_HAVE_HOUR_LEADING_ZERO
OPTION_DISABLE_HMC5883L_ERROR_CHECKING
HARDWARE_EA4TX_ARS_USB
HARDWARE_M0UPU
rotator_hardware.h file
rotator_features_ea4tx_ars_usb.h
rotator_pins_ea4tx_ars_usb.h
#define AZ_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV 2000.0
#define EL_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV 2000.0
FEATURE_EL_POSITION_INCREMENTAL_ENCODER now does 360 degrees of rotation rather than 720
OPTION_PRESET_ENCODER_0_360_DEGREES
service_rotation() - fixed rollover bug with az and el slow down
Fixed decimal place issue with Easycom AZ and EL query commands
FEATURE_EL_POSITION_INCREMENTAL_ENCODER - fixed storage and retrieval of elevation in eeprom
Bug fix - stop command wouldn't work when in slow down
AZ_INITIALLY_IN_SLOW_DOWN_PWM
EL_INITIALLY_IN_SLOW_DOWN_PWM
Fixed compilation error when FEATURE_JOYSTICK_CONTROL is activated and FEATURE_ELEVATION_CONTROL is disabled
FEATURE_ANALOG_OUTPUT_PINS
*/
#define CODE_VERSION "2.0.2014070501"
#include <avr/pgmspace.h>
#include <EEPROM.h>
#include <math.h>
#include <avr/wdt.h>
#include "rotator_hardware.h"
#ifdef HARDWARE_EA4TX_ARS_USB
#include "rotator_features_ea4tx_ars_usb.h"
#else
#include "rotator_features.h"
#endif
#include "rotator_dependencies.h"
#ifdef FEATURE_4_BIT_LCD_DISPLAY
#include <LiquidCrystal.h> // required for classic 4 bit interface LCD display (FEATURE_4_BIT_LCD_DISPLAY)
#endif // FEATURE_4_BIT_LCD_DISPLAY
#ifdef FEATURE_WIRE_SUPPORT
#include <Wire.h> // required for FEATURE_I2C_LCD, any ADXL345 feature, FEATURE_AZ_POSITION_HMC5883L, FEATURE_EL_POSITION_LSM303
#endif
#if defined(FEATURE_ADAFRUIT_I2C_LCD)
#include <Adafruit_MCP23017.h> // required for Adafruit I2C LCD display
#include <Adafruit_RGBLCDShield.h> // required for Adafruit I2C LCD display
#endif
#if defined(FEATURE_YOURDUINO_I2C_LCD) || defined(FEATURE_RFROBOT_I2C_DISPLAY)
#include <LiquidCrystal_I2C.h> // required for YourDuino.com or DFRobot I2C LCD display
#endif
#if defined(FEATURE_YOURDUINO_I2C_LCD)
#include <LCD.h> // required for YourDuino.com I2C LCD display
#endif
#if defined(FEATURE_AZ_POSITION_HMC5883L)
#include <HMC5883L.h> // required for HMC5883L digital compass support
#endif
#if defined(FEATURE_EL_POSITION_ADXL345_USING_ADAFRUIT_LIB) || defined(FEATURE_AZ_POSITION_LSM303) || defined(FEATURE_EL_POSITION_LSM303)
#include <Adafruit_Sensor.h> // required for any Adafruit sensor libraries
#endif
#if defined(FEATURE_EL_POSITION_ADXL345_USING_LOVE_ELECTRON_LIB)
#include <ADXL345.h> // required for elevation ADXL345 accelerometer using Love Electronics ADXL345 library
#endif
#if defined(FEATURE_EL_POSITION_ADXL345_USING_ADAFRUIT_LIB)
#include <Adafruit_ADXL345_U.h> // required for elevation ADXL345 accelerometer using Adafruit ADXL345 library (FEATURE_EL_POSITION_ADXL345_USING_ADAFRUIT_LIB)
#endif
#if defined(FEATURE_EL_POSITION_LSM303) || defined(FEATURE_AZ_POSITION_LSM303)
#include <Adafruit_LSM303.h> // required for azimuth and/or elevation using LSM303 compass and/or accelerometer
#endif
#if defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
#include "moon2.h"
#endif // defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
#ifdef FEATURE_SUN_TRACKING
#include "sunpos.h"
#endif // FEATURE_SUN_TRACKING
#ifdef FEATURE_GPS
#include "TinyGPS.h"
#endif // FEATURE_GPS
#ifdef FEATURE_RTC_DS1307
#include "RTClib.h"
#endif // FEATURE_RTC_DS1307
#ifdef FEATURE_RTC_PCF8583
#include "PCF8583.h"
#endif //FEATURE_RTC_PCF8583
#ifdef FEATURE_ETHERNET
#include "SPI.h"
#include "Ethernet.h"
#endif
#include "rotator.h"
#ifdef HARDWARE_EA4TX_ARS_USB
#include "rotator_pins_ea4tx_ars_usb.h"
#endif
#ifdef HARDWARE_M0UPU
#include "rotator_pins_m0upu.h"
#endif
#if !defined(HARDWARE_M0UPU) && !defined(HARDWARE_EA4TX_ARS_USB)
#include "rotator_pins.h"
#endif
#include "rotator_settings.h"
/*----------------------- variables -------------------------------------*/
byte incoming_serial_byte = 0;
#ifdef FEATURE_TWO_DECIMAL_PLACE_HEADINGS
long azimuth = 0;
long raw_azimuth = 0;
long target_azimuth = 0;
long target_raw_azimuth = 0;
long azimuth_starting_point = AZIMUTH_STARTING_POINT_DEFAULT;
long azimuth_rotation_capability = AZIMUTH_ROTATION_CAPABILITY_DEFAULT;
#else
int azimuth = 0;
int raw_azimuth = 0;
int target_azimuth = 0;
int target_raw_azimuth = 0;
int azimuth_starting_point = AZIMUTH_STARTING_POINT_DEFAULT;
int azimuth_rotation_capability = AZIMUTH_ROTATION_CAPABILITY_DEFAULT;
#endif
byte control_port_buffer[COMMAND_BUFFER_SIZE];
int control_port_buffer_index = 0;
byte az_state = IDLE;
byte debug_mode = DEFAULT_DEBUG_STATE;
int analog_az = 0;
unsigned long last_debug_output_time = 0;
unsigned long az_last_rotate_initiation = 0;
byte azimuth_button_was_pushed = 0;
byte brake_az_engaged = 0;
byte brake_el_engaged = 0;
byte configuration_dirty = 0;
unsigned long last_serial_receive_time = 0;
byte az_slowstart_active = AZ_SLOWSTART_DEFAULT;
byte az_slowdown_active = AZ_SLOWDOWN_DEFAULT;
byte az_request = 0;
int az_request_parm = 0;
byte az_request_queue_state = NONE;
unsigned long az_slowstart_start_time = 0;
byte az_slow_start_step = 0;
unsigned long az_last_step_time = 0;
byte az_slow_down_step = 0;
unsigned long az_timed_slow_down_start_time = 0;
byte backslash_command = 0;
struct config_t {
byte magic_number;
int analog_az_full_ccw;
int analog_az_full_cw;
int analog_el_0_degrees;
int analog_el_max_elevation;
// int azimuth_starting_point;
// int azimuth_rotation_capability;
float last_azimuth;
float last_elevation;
int last_az_incremental_encoder_position;
int last_el_incremental_encoder_position;
float azimuth_offset;
float elevation_offset;
} configuration;
#ifdef FEATURE_TIMED_BUFFER
int timed_buffer_azimuths[TIMED_INTERVAL_ARRAY_SIZE];
int timed_buffer_number_entries_loaded = 0;
int timed_buffer_entry_pointer = 0;
int timed_buffer_interval_value_seconds = 0;
unsigned long last_timed_buffer_action_time = 0;
byte timed_buffer_status = 0;
#endif // FEATURE_TIMED_BUFFER
byte normal_az_speed_voltage = 0;
byte current_az_speed_voltage = 0;
#ifdef FEATURE_ELEVATION_CONTROL
int elevation = 0;
int target_elevation = 0;
byte el_request = 0;
int el_request_parm = 0;
byte el_request_queue_state = NONE;
byte el_slowstart_active = EL_SLOWSTART_DEFAULT;
byte el_slowdown_active = EL_SLOWDOWN_DEFAULT;
unsigned long el_slowstart_start_time = 0;
byte el_slow_start_step = 0;
unsigned long el_last_step_time = 0;
byte el_slow_down_step = 0;
unsigned long el_timed_slow_down_start_time = 0;
byte normal_el_speed_voltage = 0;
byte current_el_speed_voltage = 0;
int display_elevation = 0;
byte el_state = IDLE;
int analog_el = 0;
unsigned long el_last_rotate_initiation = 0;
#ifdef FEATURE_TIMED_BUFFER
int timed_buffer_elevations[TIMED_INTERVAL_ARRAY_SIZE];
#endif // FEATURE_TIMED_BUFFER
byte elevation_button_was_pushed = 0;
#endif // FEATURE_ELEVATION_CONTROL
#ifdef FEATURE_LCD_DISPLAY
unsigned long last_lcd_update = 0;
String last_row_0_string; // this is only used in update_display(), however if you make it a static within the funtion, the compiler errors out with a strange error
byte push_lcd_update = 0;
//#ifdef FEATURE_I2C_LCD
//byte lcdcolor = I2C_LCD_COLOR;
//#endif // FEATURE_I2C_LCD
#endif // FEATURE_LCD_DISPLAY
#ifdef FEATURE_ROTARY_ENCODER_SUPPORT
#ifdef OPTION_ENCODER_HALF_STEP_MODE // Use the half-step state table (emits a code at 00 and 11)
const unsigned char ttable[6][4] = {
{ 0x3, 0x2, 0x1, 0x0 }, { 0x23, 0x0, 0x1, 0x0 },
{ 0x13, 0x2, 0x0, 0x0 }, { 0x3, 0x5, 0x4, 0x0 },
{ 0x3, 0x3, 0x4, 0x10 }, { 0x3, 0x5, 0x3, 0x20 }
};
#else // Use the full-step state table (emits a code at 00 only)
const unsigned char ttable[7][4] = {
{ 0x0, 0x2, 0x4, 0x0 }, { 0x3, 0x0, 0x1, 0x10 },
{ 0x3, 0x2, 0x0, 0x0 }, { 0x3, 0x2, 0x1, 0x0 },
{ 0x6, 0x0, 0x4, 0x0 }, { 0x6, 0x5, 0x0, 0x10 },
{ 0x6, 0x5, 0x4, 0x0 },
};
#endif // OPTION_ENCODER_HALF_STEP_MODE
#ifdef FEATURE_AZ_PRESET_ENCODER // Rotary Encoder State Tables
#if defined(FEATURE_ONE_DECIMAL_PLACE_HEADINGS) || defined(FEATURE_TWO_DECIMAL_PLACE_HEADINGS)
double az_encoder_raw_degrees = 0;
#else
int az_encoder_raw_degrees = 0;
#endif
volatile unsigned char az_encoder_state = 0;
#ifdef FEATURE_EL_PRESET_ENCODER
volatile unsigned char el_encoder_state = 0;
#if defined(FEATURE_ONE_DECIMAL_PLACE_HEADINGS) || defined(FEATURE_TWO_DECIMAL_PLACE_HEADINGS)
double el_encoder_degrees = 0;
#else
int el_encoder_degrees = 0;
#endif
#endif // FEATURE_EL_PRESET_ENCODER
byte preset_encoders_state = ENCODER_IDLE;
#endif // FEATURE_AZ_PRESET_ENCODER
#endif // FEATURE_ROTARY_ENCODER_SUPPORT
#ifdef DEBUG_PROFILE_LOOP_TIME
float average_loop_time = 0;
#endif // DEBUG_PROFILE_LOOP_TIME
#ifdef FEATURE_AZ_POSITION_PULSE_INPUT
volatile float az_position_pulse_input_azimuth = 0;
volatile byte last_known_az_state = 0;
#endif // FEATURE_AZ_POSITION_PULSE_INPUT
#ifdef FEATURE_EL_POSITION_PULSE_INPUT
volatile float el_position_pulse_input_elevation = 0;
volatile byte last_known_el_state = 0;
#endif // FEATURE_EL_POSITION_PULSE_INPUT
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
byte serial_read_event_flag[] = { 0, 0, 0, 0, 0 };
byte control_port_buffer_carriage_return_flag = 0;
#endif
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
byte remote_unit_port_buffer[COMMAND_BUFFER_SIZE];
int remote_unit_port_buffer_index = 0;
byte remote_unit_port_buffer_carriage_return_flag = 0;
unsigned long serial1_last_receive_time = 0;
byte remote_unit_command_submitted = 0;
unsigned long last_remote_unit_command_time = 0;
unsigned int remote_unit_command_timeouts = 0;
unsigned int remote_unit_bad_results = 0;
unsigned long remote_unit_good_results = 0;
unsigned int remote_unit_incoming_buffer_timeouts = 0;
byte remote_unit_command_results_available = 0;
float remote_unit_command_result_float = 0;
byte remote_port_rx_sniff = 0;
byte remote_port_tx_sniff = 0;
byte suspend_remote_commands = 0;
#endif //FEATURE_MASTER_WITH_SERIAL_SLAVE
#ifdef DEBUG_POSITION_PULSE_INPUT
// unsigned int az_position_pule_interrupt_handler_flag = 0;
// unsigned int el_position_pule_interrupt_handler_flag = 0;
volatile unsigned long az_pulse_counter = 0;
volatile unsigned long el_pulse_counter = 0;
volatile unsigned int az_pulse_counter_ambiguous = 0;
volatile unsigned int el_pulse_counter_ambiguous = 0;
#endif // DEBUG_POSITION_PULSE_INPUT
#ifdef FEATURE_PARK
byte park_status = NOT_PARKED;
byte park_serial_initiated = 0;
#endif // FEATURE_PARK
#ifdef FEATURE_AZ_POSITION_INCREMENTAL_ENCODER
volatile int az_incremental_encoder_position = 0;
volatile byte az_3_phase_encoder_last_phase_a_state = 0;
volatile byte az_3_phase_encoder_last_phase_b_state = 0;
#ifdef DEBUG_AZ_POSITION_INCREMENTAL_ENCODER
volatile int az_position_incremental_encoder_interrupt = 0;
#endif // DEBUG_AZ_POSITION_INCREMENTAL_ENCODER
#endif // FEATURE_AZ_POSITION_INCREMENTAL_ENCODER
#ifdef FEATURE_EL_POSITION_INCREMENTAL_ENCODER
volatile int el_incremental_encoder_position = 0;
volatile byte el_3_phase_encoder_last_phase_a_state = 0;
volatile byte el_3_phase_encoder_last_phase_b_state = 0;
#ifdef DEBUG_EL_POSITION_INCREMENTAL_ENCODER
volatile int el_position_incremental_encoder_interrupt = 0;
#endif // DEBUG_EL_POSITION_INCREMENTAL_ENCODER
#endif // FEATURE_EL_POSITION_INCREMENTAL_ENCODER
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION) || defined(FEATURE_CLOCK)
HardwareSerial * control_port;
#endif
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
HardwareSerial * remote_unit_port;
#endif
#if defined(FEATURE_GPS)
HardwareSerial * gps_port;
#ifdef GPS_MIRROR_PORT
HardwareSerial * (gps_mirror_port);
#endif //GPS_MIRROR_PORT
#endif //defined(FEATURE_GPS)
#if defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
double latitude = DEFAULT_LATITUDE;
double longitude = DEFAULT_LONGITUDE;
#endif
#ifdef FEATURE_MOON_TRACKING
byte moon_tracking_active = 0;
byte moon_visible = 0;
double moon_azimuth = 0;
double moon_elevation = 0;
#endif // FEATURE_MOON_TRACKING
#ifdef FEATURE_SUN_TRACKING
float sun_azimuth = 0;
float sun_elevation = 0;
cTime c_time;
cLocation c_loc;
cSunCoordinates c_sposn;
byte sun_visible = 0;
byte sun_tracking_active = 0;
#endif // FEATURE_SUN_TRACKING
#ifdef FEATURE_CLOCK
unsigned long clock_years = 0;
unsigned long clock_months = 0;
unsigned long clock_days = 0;
unsigned long clock_hours = 0;
unsigned long clock_minutes = 0;
unsigned long clock_seconds = 0;
int clock_year_set = 2014;
byte clock_month_set = 1;
byte clock_day_set = 1;
byte clock_sec_set = 0;
unsigned long clock_hour_set = 0;
unsigned long clock_min_set = 0;
unsigned long millis_at_last_calibration = 0;
#endif // FEATURE_CLOCK
#if defined(FEATURE_GPS) || defined(FEATURE_RTC) || defined(FEATURE_CLOCK)
byte clock_status = FREE_RUNNING;
#endif // defined(FEATURE_GPS) || defined(FEATURE_RTC)
#ifdef FEATURE_GPS
byte gps_data_available = 0;
#endif // FEATURE_GPS
#ifdef FEATURE_ETHERNET
byte mac[] = {ETHERNET_MAC_ADDRESS};
IPAddress ip(ETHERNET_IP_ADDRESS);
IPAddress gateway(ETHERNET_IP_GATEWAY);
IPAddress subnet(ETHERNET_IP_SUBNET_MASK);
EthernetClient ethernetclient0;
EthernetServer ethernetserver0(ETHERNET_TCP_PORT_0);
#ifdef ETHERNET_TCP_PORT_1
EthernetClient ethernetclient1;
EthernetServer ethernetserver1(ETHERNET_TCP_PORT_1);
#endif //ETHERNET_TCP_PORT_1
#ifdef FEATURE_MASTER_WITH_ETHERNET_SLAVE
EthernetClient ethernetslavelinkclient0;
IPAddress slave_unit_ip(ETHERNET_SLAVE_IP_ADDRESS);
byte ethernetslavelinkclient0_state = ETHERNET_SLAVE_DISCONNECTED;
unsigned int ethernet_slave_reconnects = 0;
#endif //FEATURE_MASTER_WITH_ETHERNET_SLAVE
#endif //FEATURE_ETHERNET
#ifdef FEATURE_POWER_SWITCH
unsigned long last_activity_time = 0;
#endif //FEATURE_POWER_SWITCH
#ifdef FEATURE_STEPPER_MOTOR
byte az_stepper_motor_last_direction = STEPPER_UNDEF;
byte az_stepper_motor_last_pin_state = LOW;
#ifdef FEATURE_STEPPER_MOTOR_EXPERIMENTAL_CODE
unsigned long az_stepper_pulse_period_us = 0;
unsigned long az_stepper_pulses_remaining = 0;
#ifdef FEATURE_ELEVATION_CONTROL
unsigned long el_stepper_pulse_period_us = 0;
unsigned long el_stepper_pulses_remaining = 0;
#endif //FEATURE_ELEVATION_CONTROL
#endif //FEATURE_STEPPER_MOTOR_EXPERIMENTAL_CODE
#ifdef FEATURE_ELEVATION_CONTROL
byte el_stepper_motor_last_direction = STEPPER_UNDEF;
byte el_stepper_motor_last_pin_state = LOW;
#endif //FEATURE_ELEVATION_CONTROL
#endif //FEATURE_STEPPER_MOTOR
#ifdef FEATURE_AZIMUTH_CORRECTION
float azimuth_calibration_from[] = AZIMUTH_CALIBRATION_FROM_ARRAY;
float azimuth_calibration_to[] = AZIMUTH_CALIBRATION_TO_ARRAY;
#endif // FEATURE_AZIMUTH_CORRECTION
#ifdef FEATURE_ELEVATION_CORRECTION
float elevation_calibration_from[] = ELEVATION_CALIBRATION_FROM_ARRAY;
float elevation_calibration_to[] = ELEVATION_CALIBRATION_TO_ARRAY;
#endif // FEATURE_ELEVATION_CORRECTION
/* ------------------ let's start doing some stuff now that we got the formalities out of the way --------------------*/
void setup() {
delay(1000);
initialize_serial();
initialize_peripherals();
read_settings_from_eeprom();
initialize_pins();
read_azimuth(0);
#ifdef FEATURE_YAESU_EMULATION
//report_current_azimuth(); // Yaesu - report the azimuth right off the bat without a C command; the Arduino doesn't wake up quick enough
// to get first C command from HRD and if HRD doesn't see anything it doesn't connect
#endif // FEATURE_YAESU_EMULATION
#ifdef FEATURE_TIMED_BUFFER
timed_buffer_status = EMPTY;
#endif // FEATURE_TIMED_BUFFER
#ifdef FEATURE_LCD_DISPLAY
initialize_display();
#endif
initialize_rotary_encoders();
initialize_interrupts();
} /* setup */
/*-------------------------- here's where the magic happens --------------------------------*/
void loop() {
check_serial();
read_headings();
#ifndef FEATURE_REMOTE_UNIT_SLAVE
service_request_queue();
service_rotation();
az_check_operation_timeout();
#ifdef FEATURE_TIMED_BUFFER
check_timed_interval();
#endif // FEATURE_TIMED_BUFFER
read_headings();
check_buttons();
check_overlap();
check_brake_release();
#ifdef FEATURE_ELEVATION_CONTROL
el_check_operation_timeout();
#endif
#endif // ndef FEATURE_REMOTE_UNIT_SLAVE
read_headings();
#ifdef FEATURE_LCD_DISPLAY
update_display();
#endif
read_headings();
#ifndef FEATURE_REMOTE_UNIT_SLAVE
#ifdef OPTION_AZ_MANUAL_ROTATE_LIMITS
check_az_manual_rotate_limit();
#endif
#ifdef OPTION_EL_MANUAL_ROTATE_LIMITS
check_el_manual_rotate_limit();
#endif
check_az_speed_pot();
#ifdef FEATURE_AZ_PRESET_ENCODER // Rotary Encoder or Preset Selector
check_preset_encoders();
#else
check_az_preset_potentiometer();
#endif // FEATURE_AZ_PRESET_ENCODER
#endif // ndef FEATURE_REMOTE_UNIT_SLAVE
#ifdef DEBUG_DUMP
output_debug();
#endif //DEBUG_DUMP
check_for_dirty_configuration();
read_headings();
#ifdef DEBUG_PROFILE_LOOP_TIME
profile_loop_time();
#endif //DEBUG_PROFILE_LOOP_TIME
#ifdef FEATURE_REMOTE_UNIT_SLAVE
service_remote_unit_serial_buffer();
#endif // FEATURE_REMOTE_UNIT_SLAVE
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
service_remote_communications_incoming_buffer();
#endif // defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
#ifdef FEATURE_JOYSTICK_CONTROL
check_joystick();
#endif // FEATURE_JOYSTICK_CONTROL
#ifdef FEATURE_ROTATION_INDICATOR_PIN
service_rotation_indicator_pin();
#endif // FEATURE_ROTATION_INDICATOR_PIN
#ifdef FEATURE_PARK
service_park();
#endif // FEATURE_PARK
#ifdef FEATURE_LIMIT_SENSE
check_limit_sense();
#endif // FEATURE_LIMIT_SENSE
#ifdef FEATURE_MOON_TRACKING
service_moon_tracking();
#endif // FEATURE_MOON_TRACKING
#ifdef FEATURE_SUN_TRACKING
service_sun_tracking();
#endif // FEATURE_SUN_TRACKING
#ifdef FEATURE_GPS
service_gps();
#endif // FEATURE_GPS
#ifdef FEATURE_RTC
service_rtc();
#endif // FEATURE_RTC
#ifdef FEATURE_ETHERNET
service_ethernet();
#endif // FEATURE_ETHERNET
#ifdef FEATURE_POWER_SWITCH
service_power_switch();
#endif //FEATURE_POWER_SWITCH
#if defined(FEATURE_CLOCK) && defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE) && (defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE))
sync_master_clock_to_slave();
#endif
service_blink_led();
#ifdef FEATURE_ANALOG_OUTPUT_PINS
service_analog_output_pins();
#endif //FEATURE_ANALOG_OUTPUT_PINS
} /* loop */
/* -------------------------------------- subroutines -----------------------------------------------
Where the real work happens...
*/
void read_headings(){
read_azimuth(0);
#ifdef FEATURE_ELEVATION_CONTROL
read_elevation(0);
#endif
}
// --------------------------------------------------------------
void service_blink_led(){
#ifdef blink_led
static unsigned long last_blink_led_transition = 0;
static byte blink_led_status = 0;
if (((millis() - last_blink_led_transition) >= 1000) && (blink_led != 0)) {
if (blink_led_status) {
digitalWriteEnhanced(blink_led, LOW);
blink_led_status = 0;
} else {
digitalWriteEnhanced(blink_led, HIGH);
blink_led_status = 1;
}
last_blink_led_transition = millis();
}
#endif // blink_led
} /* service_blink_led */
// --------------------------------------------------------------
#ifdef DEBUG_PROFILE_LOOP_TIME
void profile_loop_time(){
static unsigned long last_time = 0;
static unsigned long last_print_time = 0;
average_loop_time = (average_loop_time + (millis() - last_time)) / 2.0;
last_time = millis();
if (debug_mode) {
if ((millis() - last_print_time) > 1000) {
debug_print("avg loop time: ");
debug_print_float(average_loop_time, 2);
debug_println("");
last_print_time = millis();
}
}
} /* profile_loop_time */
#endif //DEBUG_PROFILE_LOOP_TIME
// --------------------------------------------------------------
void check_az_speed_pot() {
static unsigned long last_pot_check_time = 0;
int pot_read = 0;
byte new_azimuth_speed_voltage = 0;
if (az_speed_pot && azimuth_speed_voltage && ((millis() - last_pot_check_time) > 500)) {
pot_read = analogReadEnhanced(az_speed_pot);
new_azimuth_speed_voltage = map(pot_read, SPEED_POT_LOW, SPEED_POT_HIGH, SPEED_POT_LOW_MAP, SPEED_POT_HIGH_MAP);
if (new_azimuth_speed_voltage != normal_az_speed_voltage) {
#ifdef DEBUG_AZ_SPEED_POT
if (debug_mode) {
debug_print("check_az_speed_pot: normal_az_speed_voltage: ");
debug_print_int(normal_az_speed_voltage);
debug_print(" new_azimuth_speed_voltage:");
debug_print_int(new_azimuth_speed_voltage);
debug_println("");
}
#endif // DEBUG_AZ_SPEED_POT
// analogWriteEnhanced(azimuth_speed_voltage, new_azimuth_speed_voltage);
normal_az_speed_voltage = new_azimuth_speed_voltage;
update_az_variable_outputs(normal_az_speed_voltage);
#if defined(OPTION_EL_SPEED_FOLLOWS_AZ_SPEED) && defined(FEATURE_ELEVATION_CONTROL)
normal_el_speed_voltage = new_azimuth_speed_voltage;
update_el_variable_outputs(normal_el_speed_voltage);
#endif // OPTION_EL_SPEED_FOLLOWS_AZ_SPEED
}
last_pot_check_time = millis();
}
} /* check_az_speed_pot */
// --------------------------------------------------------------
void check_az_preset_potentiometer() {
byte check_pot = 0;
static unsigned long last_pot_check_time = 0;
static int last_pot_read = 9999;
int pot_read = 0;
int new_pot_azimuth = 0;
byte button_read = 0;
static byte pot_changed_waiting = 0;
if (az_preset_pot) {
if (last_pot_read == 9999) { // initialize last_pot_read the first time we hit this subroutine
last_pot_read = analogReadEnhanced(az_preset_pot);
}
if (!pot_changed_waiting) {
if (preset_start_button) { // if we have a preset start button, check it
button_read = digitalReadEnhanced(preset_start_button);
if (button_read == BUTTON_ACTIVE_STATE) {
check_pot = 1;
}
} else { // if not, check the pot every 500 mS
if ((millis() - last_pot_check_time) < 250) {
check_pot = 1;
}
}
if (check_pot) {
pot_read = analogReadEnhanced(az_preset_pot);
new_pot_azimuth = map(pot_read, AZ_PRESET_POT_FULL_CW, AZ_PRESET_POT_FULL_CCW, AZ_PRESET_POT_FULL_CW_MAP, AZ_PRESET_POT_FULL_CCW_MAP);
if ((abs(last_pot_read - pot_read) > 4) && (abs(new_pot_azimuth - (raw_azimuth / HEADING_MULTIPLIER)) > AZIMUTH_TOLERANCE)) {
pot_changed_waiting = 1;
#ifdef DEBUG_AZ_PRESET_POT
if (debug_mode) {
debug_println("check_az_preset_potentiometer: in pot_changed_waiting");
}
#endif // DEBUG_AZ_PRESET_POT
last_pot_read = pot_read;
}
}
last_pot_check_time = millis();
} else { // we're in pot change mode
pot_read = analogReadEnhanced(az_preset_pot);
if (abs(pot_read - last_pot_read) > 3) { // if the pot has changed, reset the timer
last_pot_check_time = millis();
last_pot_read = pot_read;
} else {
if ((millis() - last_pot_check_time) >= 250) { // has it been awhile since the last pot change?
new_pot_azimuth = map(pot_read, AZ_PRESET_POT_FULL_CW, AZ_PRESET_POT_FULL_CCW, AZ_PRESET_POT_FULL_CW_MAP, AZ_PRESET_POT_FULL_CCW_MAP);
#ifdef DEBUG_AZ_PRESET_POT
if (debug_mode) {
debug_print("check_az_preset_potentiometer: pot change - current raw_azimuth: ");
debug_print_float(raw_azimuth / HEADING_MULTIPLIER,0);
debug_print(" new_azimuth: ");
debug_print_int(new_pot_azimuth);
debug_println("");
}
#endif // DEBUG_AZ_PRESET_POT
submit_request(AZ, REQUEST_AZIMUTH_RAW, new_pot_azimuth * HEADING_MULTIPLIER, 44);
pot_changed_waiting = 0;
last_pot_read = pot_read;
last_pot_check_time = millis();
}
}
}
} // if (az_preset_pot)
} /* check_az_preset_potentiometer */
// --------------------------------------------------------------
void initialize_rotary_encoders(){
#ifdef FEATURE_AZ_PRESET_ENCODER
pinModeEnhanced(az_rotary_preset_pin1, INPUT);
pinModeEnhanced(az_rotary_preset_pin2, INPUT);
az_encoder_raw_degrees = raw_azimuth;
#ifdef OPTION_ENCODER_ENABLE_PULLUPS
digitalWriteEnhanced(az_rotary_preset_pin1, HIGH);
digitalWriteEnhanced(az_rotary_preset_pin2, HIGH);
#endif // OPTION_ENCODER_ENABLE_PULLUPS
#endif // FEATURE_AZ_PRESET_ENCODER
#ifdef FEATURE_EL_PRESET_ENCODER
pinModeEnhanced(el_rotary_preset_pin1, INPUT);
pinModeEnhanced(el_rotary_preset_pin2, INPUT);
el_encoder_degrees = elevation;
#ifdef OPTION_ENCODER_ENABLE_PULLUPS
digitalWriteEnhanced(el_rotary_preset_pin1, HIGH);
digitalWriteEnhanced(el_rotary_preset_pin2, HIGH);
#endif // OPTION_ENCODER_ENABLE_PULLUPS
#endif // FEATURE_EL_PRESET_ENCODER
#ifdef FEATURE_AZ_POSITION_ROTARY_ENCODER
pinModeEnhanced(az_rotary_position_pin1, INPUT);
pinModeEnhanced(az_rotary_position_pin2, INPUT);
#ifdef OPTION_ENCODER_ENABLE_PULLUPS
digitalWriteEnhanced(az_rotary_position_pin1, HIGH);
digitalWriteEnhanced(az_rotary_position_pin2, HIGH);
#endif // OPTION_ENCODER_ENABLE_PULLUPS
#endif // FEATURE_AZ_POSITION_ROTARY_ENCODER
#ifdef FEATURE_EL_POSITION_ROTARY_ENCODER
pinModeEnhanced(el_rotary_position_pin1, INPUT);
pinModeEnhanced(el_rotary_position_pin2, INPUT);
#ifdef OPTION_ENCODER_ENABLE_PULLUPS
digitalWriteEnhanced(el_rotary_position_pin1, HIGH);
digitalWriteEnhanced(el_rotary_position_pin2, HIGH);
#endif // OPTION_ENCODER_ENABLE_PULLUPS
#endif // FEATURE_EL_POSITION_ROTARY_ENCODER
#ifdef FEATURE_AZ_POSITION_INCREMENTAL_ENCODER
pinMode(az_incremental_encoder_pin_phase_a, INPUT);
pinMode(az_incremental_encoder_pin_phase_b, INPUT);
pinMode(az_incremental_encoder_pin_phase_z, INPUT);
#ifdef OPTION_INCREMENTAL_ENCODER_PULLUPS
digitalWrite(az_incremental_encoder_pin_phase_a, HIGH);
digitalWrite(az_incremental_encoder_pin_phase_b, HIGH);
digitalWrite(az_incremental_encoder_pin_phase_z, HIGH);
#endif // OPTION_INCREMENTAL_ENCODER_PULLUPS
attachInterrupt(AZ_POSITION_INCREMENTAL_ENCODER_A_PIN_INTERRUPT, az_position_incremental_encoder_interrupt_handler, CHANGE);
attachInterrupt(AZ_POSITION_INCREMENTAL_ENCODER_B_PIN_INTERRUPT, az_position_incremental_encoder_interrupt_handler, CHANGE);
delay(250);
az_3_phase_encoder_last_phase_a_state = digitalRead(az_incremental_encoder_pin_phase_a);
az_3_phase_encoder_last_phase_b_state = digitalRead(az_incremental_encoder_pin_phase_b);
#endif // FEATURE_AZ_POSITION_INCREMENTAL_ENCODER
#ifdef FEATURE_EL_POSITION_INCREMENTAL_ENCODER
pinMode(el_incremental_encoder_pin_phase_a, INPUT);
pinMode(el_incremental_encoder_pin_phase_b, INPUT);
pinMode(el_incremental_encoder_pin_phase_z, INPUT);
#ifdef OPTION_INCREMENTAL_ENCODER_PULLUPS
digitalWrite(el_incremental_encoder_pin_phase_a, HIGH);
digitalWrite(el_incremental_encoder_pin_phase_b, HIGH);
digitalWrite(el_incremental_encoder_pin_phase_z, HIGH);
#endif // OPTION_INCREMENTAL_ENCODER_PULLUPS
attachInterrupt(EL_POSITION_INCREMENTAL_ENCODER_A_PIN_INTERRUPT, el_position_incremental_encoder_interrupt_handler, CHANGE);
attachInterrupt(EL_POSITION_INCREMENTAL_ENCODER_B_PIN_INTERRUPT, el_position_incremental_encoder_interrupt_handler, CHANGE);
delay(250);
el_3_phase_encoder_last_phase_a_state = digitalRead(el_incremental_encoder_pin_phase_a);
el_3_phase_encoder_last_phase_b_state = digitalRead(el_incremental_encoder_pin_phase_b);
#endif // FEATURE_EL_POSITION_INCREMENTAL_ENCODER
} /* initialize_rotary_encoders */
// --------------------------------------------------------------
#ifdef FEATURE_AZ_PRESET_ENCODER
void check_preset_encoders(){
static unsigned long last_encoder_change_time = 0;
byte button_read = HIGH;
byte number_columns = 0;
static byte submit_encoder_change = 0;
static unsigned long last_preset_start_button_start = 0;
static unsigned long last_preset_start_button_kill = 0;
static unsigned long last_encoder_move = 0;
#ifdef FEATURE_AZ_PRESET_ENCODER
static unsigned long az_timestamp[5];
#endif // FEATURE_AZ_PRESET_ENCODER
#ifdef FEATURE_EL_PRESET_ENCODER
static unsigned long el_timestamp[5];
#endif // FEATURE_EL_PRESET_ENCODER
#ifdef FEATURE_AZ_PRESET_ENCODER
az_encoder_state = ttable[az_encoder_state & 0xf][((digitalReadEnhanced(az_rotary_preset_pin2) << 1) | digitalReadEnhanced(az_rotary_preset_pin1))];
unsigned char az_encoder_result = az_encoder_state & 0x30;
#ifdef DEBUG_PRESET_ENCODERS
static byte last_az_rotary_preset_pin1 = 0;
static byte last_az_rotary_preset_pin2 = 0;
if ((debug_mode) && (( last_az_rotary_preset_pin1 != digitalReadEnhanced(az_rotary_preset_pin1)) || ( last_az_rotary_preset_pin2 != digitalReadEnhanced(az_rotary_preset_pin2)))) {
debug_print("check_preset_encoders: az_rotary_preset_pin1: ");
debug_print_int(digitalReadEnhanced(az_rotary_preset_pin1));
debug_print(" az_rotary_preset_pin2: ");
debug_print_int(digitalReadEnhanced(az_rotary_preset_pin2));
debug_print(" encoder_result: ");
debug_print_int(az_encoder_result);
debug_println("");
}
last_az_rotary_preset_pin1 = digitalReadEnhanced(az_rotary_preset_pin1);
last_az_rotary_preset_pin2 = digitalReadEnhanced(az_rotary_preset_pin2);
#endif // DEBUG_PRESET_ENCODERS
#endif // FEATURE_AZ_PRESET_ENCODER
#ifdef FEATURE_EL_PRESET_ENCODER
el_encoder_state = ttable[el_encoder_state & 0xf][((digitalReadEnhanced(el_rotary_preset_pin2) << 1) | digitalReadEnhanced(el_rotary_preset_pin1))];
unsigned char el_encoder_result = el_encoder_state & 0x30;
#endif // FEATURE_EL_PRESET_ENCODER
#ifdef FEATURE_AZ_PRESET_ENCODER
if (az_encoder_result) { // If rotary encoder modified
az_timestamp[0] = az_timestamp[1]; // Encoder step timer
az_timestamp[1] = az_timestamp[2];
az_timestamp[2] = az_timestamp[3];
az_timestamp[3] = az_timestamp[4];
az_timestamp[4] = millis();
last_encoder_move = millis();
#ifdef DEBUG_PRESET_ENCODERS
char tempchar[12] = "";
if (debug_mode) {
debug_print("check_preset_encoders: az_timestamps:");
for (int y = 0; y < 5; y++) {
debug_print(" ");
dtostrf(az_timestamp[y],0,0,tempchar);
debug_print(tempchar);
}
debug_println("");
}
#endif // DEBUG_PRESET_ENCODERS
unsigned long az_elapsed_time = (az_timestamp[4] - az_timestamp[0]); // Encoder step time difference for 10's step
#ifdef OPTION_PRESET_ENCODER_RELATIVE_CHANGE
if ((preset_encoders_state == ENCODER_IDLE) || (preset_encoders_state == ENCODER_EL_PENDING)) {
if (az_request_queue_state == IN_PROGRESS_TO_TARGET) {
az_encoder_raw_degrees = target_raw_azimuth;
} else {
az_encoder_raw_degrees = raw_azimuth;
}
}
#endif // OPTION_PRESET_ENCODER_RELATIVE_CHANGE
// bbbbbb
#ifndef OPTION_PRESET_ENCODER_0_360_DEGREES
if (az_encoder_result == DIR_CW) {
#ifdef DEBUG_PRESET_ENCODERS
debug_print("check_preset_encoders: az CW");
#endif // DEBUG_PRESET_ENCODERS
if (az_elapsed_time < 250 /* mSec */) {
az_encoder_raw_degrees += (5 * HEADING_MULTIPLIER);
} else { az_encoder_raw_degrees += (1 * HEADING_MULTIPLIER); }; // Single deg increase unless encoder turned quickly then 10's step
// if (az_encoder_raw_degrees >=(360*HEADING_MULTIPLIER)) {az_encoder_raw_degrees -= (360*HEADING_MULTIPLIER);};
if (az_encoder_raw_degrees > ((azimuth_starting_point + azimuth_rotation_capability) * HEADING_MULTIPLIER)) {
az_encoder_raw_degrees =
((azimuth_starting_point * HEADING_MULTIPLIER)
/* + ((azimuth_starting_point+azimuth_rotation_capability)*HEADING_MULTIPLIER) - az_encoder_raw_degrees*/);
}
}
if (az_encoder_result == DIR_CCW) {
#ifdef DEBUG_PRESET_ENCODERS
debug_print("check_preset_encoders: az CCW");
#endif // DEBUG_PRESET_ENCODERS
if (az_elapsed_time < 250 /* mSec */) {
az_encoder_raw_degrees -= (5 * HEADING_MULTIPLIER);
} else { az_encoder_raw_degrees -= (1 * HEADING_MULTIPLIER); }; // Single deg decrease unless encoder turned quickly then 10's step
// if (az_encoder_raw_degrees < 0) {az_encoder_raw_degrees = (360*HEADING_MULTIPLIER);};
if (az_encoder_raw_degrees < (azimuth_starting_point * HEADING_MULTIPLIER)) {
az_encoder_raw_degrees = (((azimuth_starting_point + azimuth_rotation_capability) * HEADING_MULTIPLIER)
/*- (az_encoder_raw_degrees-(azimuth_starting_point*HEADING_MULTIPLIER))*/);
}
}
#else //ndef OPTION_PRESET_ENCODER_0_360_DEGREES
if (az_encoder_result == DIR_CW) {
#ifdef DEBUG_PRESET_ENCODERS
debug_print("check_preset_encoders: az CW");
#endif // DEBUG_PRESET_ENCODERS
if (az_elapsed_time < 250) { // Single deg increase unless encoder turned quickly then 10's step
az_encoder_raw_degrees += (5 * HEADING_MULTIPLIER);
} else {
az_encoder_raw_degrees += (1 * HEADING_MULTIPLIER);
}
if (az_encoder_raw_degrees > (360 * HEADING_MULTIPLIER)) {
//az_encoder_raw_degrees = (360 * HEADING_MULTIPLIER);
az_encoder_raw_degrees = 0;
//} else {
// if (az_encoder_raw_degrees < 0) {
// az_encoder_raw_degrees = 0;
// }
}
}
if (az_encoder_result == DIR_CCW) {
#ifdef DEBUG_PRESET_ENCODERS
debug_print("check_preset_encoders: az CCW");
#endif // DEBUG_PRESET_ENCODERS
if (az_elapsed_time < 250) { // Single deg decrease unless encoder turned quickly then 10's step
az_encoder_raw_degrees -= (5 * HEADING_MULTIPLIER);
} else {
az_encoder_raw_degrees -= (1 * HEADING_MULTIPLIER);
}
//if (az_encoder_raw_degrees > (360 * HEADING_MULTIPLIER)) {
// az_encoder_raw_degrees = (360 * HEADING_MULTIPLIER);
//} else {
if (az_encoder_raw_degrees < 0) {
//az_encoder_raw_degrees = 0;
az_encoder_raw_degrees = 359 * HEADING_MULTIPLIER;
}
//}
}
#endif //ndef OPTION_PRESET_ENCODER_0_360_DEGREES
last_encoder_change_time = millis(); // Encoder Check Timer
#ifdef FEATURE_LCD_DISPLAY
push_lcd_update = 1; // push an LCD update
#endif // FEATURE_LCD_DISPLAY
if (preset_encoders_state == ENCODER_IDLE) {
preset_encoders_state = ENCODER_AZ_PENDING;
} else {
if (preset_encoders_state == ENCODER_EL_PENDING) {
preset_encoders_state = ENCODER_AZ_EL_PENDING;
}
}
#ifdef DEBUG_PRESET_ENCODERS
debug_print("check_preset_encoders: az target: ");
dtostrf((az_encoder_raw_degrees / HEADING_MULTIPLIER),0,1,tempchar);
debug_println(tempchar);
#endif // DEBUG_PRESET_ENCODERS
} // if (az_encoder_result)
#endif // FEATURE_AZ_PRESET_ENCODER
#ifdef FEATURE_EL_PRESET_ENCODER
#ifdef OPTION_PRESET_ENCODER_RELATIVE_CHANGE
if ((preset_encoders_state == ENCODER_IDLE) || (preset_encoders_state == ENCODER_AZ_PENDING)) {
if (el_request_queue_state == IN_PROGRESS_TO_TARGET) {
el_encoder_degrees = target_elevation;
} else {
el_encoder_degrees = elevation;
}
}
#endif // OPTION_PRESET_ENCODER_RELATIVE_CHANGE
if (el_encoder_result) { // If rotary encoder modified
el_timestamp[0] = el_timestamp[1]; // Encoder step timer
el_timestamp[1] = el_timestamp[2];
el_timestamp[2] = el_timestamp[3];
el_timestamp[3] = el_timestamp[4];
el_timestamp[4] = millis();
last_encoder_move = millis();
unsigned long el_elapsed_time = (el_timestamp[4] - el_timestamp[0]); // Encoder step time difference for 10's step
if (el_encoder_result == DIR_CW) { // Rotary Encoder CW 0 - 359 Deg
#ifdef DEBUG_PRESET_ENCODERS
debug_println("check_preset_encoders: el CW");
#endif // DEBUG_PRESET_ENCODERS
if (el_elapsed_time < 250) {
el_encoder_degrees += (5 * HEADING_MULTIPLIER);
} else { el_encoder_degrees += (1 * HEADING_MULTIPLIER); }; // Single deg increase unless encoder turned quickly then 10's step
if (el_encoder_degrees > (180 * HEADING_MULTIPLIER)) {
el_encoder_degrees = (180 * HEADING_MULTIPLIER);
}
;
}
if (el_encoder_result == DIR_CCW) {
#ifdef DEBUG_PRESET_ENCODERS
debug_println("check_preset_encoders: el CCW");
#endif // DEBUG_PRESET_ENCODERS
// Rotary Encoder CCW 359 - 0 Deg
if (el_elapsed_time < 250) {
el_encoder_degrees -= (5 * HEADING_MULTIPLIER);
} else { el_encoder_degrees -= (1 * HEADING_MULTIPLIER); }; // Single deg decrease unless encoder turned quickly then 10's step
if (el_encoder_degrees < 0) {
el_encoder_degrees = 0;
}
;
}
last_encoder_change_time = millis(); // Encoder Check Timer
#ifdef FEATURE_LCD_DISPLAY
last_lcd_update = 0; // push an LCD update
#endif // FEATURE_LCD_DISPLAY
if (preset_encoders_state == ENCODER_IDLE) {
preset_encoders_state = ENCODER_EL_PENDING;
} else {
if (preset_encoders_state == ENCODER_AZ_PENDING) {
preset_encoders_state = ENCODER_AZ_EL_PENDING;
}
}
#ifdef DEBUG_PRESET_ENCODERS
debug_print("check_preset_encoders: el target: ");
dtostrf(el_encoder_degrees / HEADING_MULTIPLIER,0,1,tempchar);
debug_println(tempchar);
#endif // DEBUG_PRESET_ENCODERS
} // if (el_encoder_result)
#endif // FEATURE_EL_PRESET_ENCODER
if ((preset_encoders_state != ENCODER_IDLE) && (!submit_encoder_change)) { // Check button or timer
if (preset_start_button) { // if we have a preset start button, check it
button_read = digitalReadEnhanced(preset_start_button);
if (button_read == BUTTON_ACTIVE_STATE) {
submit_encoder_change = 1;
last_preset_start_button_start = millis();
#ifdef DEBUG_PRESET_ENCODERS
debug_println("check_preset_encoders: preset_start_button submit_encoder_change");
#endif // DEBUG_PRESET_ENCODERS
}
} else {
if ((millis() - last_encoder_change_time) > 2000) { // if enc not changed for more than 2 sec, rotate to target
#ifdef DEBUG_PRESET_ENCODERS
debug_println("check_preset_encoders: timer submit_encoder_change");
#endif // DEBUG_PRESET_ENCODERS
submit_encoder_change = 1;
}
}
} // if (!enc_changed_waiting)
if (preset_start_button) { // if we have a preset start button, check it
button_read = digitalReadEnhanced(preset_start_button);
if ((button_read == BUTTON_ACTIVE_STATE) && (!submit_encoder_change) && ((millis() - last_preset_start_button_start) > 250)
&& ((millis() - last_preset_start_button_kill) > 250) && (preset_encoders_state == ENCODER_IDLE)) {
#ifdef DEBUG_PRESET_ENCODERS
debug_println("check_preset_encoders: preset button kill");
#endif // DEBUG_PRESET_ENCODERS
#ifdef FEATURE_AZ_PRESET_ENCODER
if (az_state != IDLE) {
submit_request(AZ, REQUEST_KILL, 0, 45);
}
#endif // FEATURE_AZ_PRESET_ENCODER
#ifdef FEATURE_EL_PRESET_ENCODER
if (el_state != IDLE) {
submit_request(EL, REQUEST_KILL, 0, 46);
}
#endif // FEATURE_EL_PRESET_ENCODER
last_preset_start_button_kill = millis();
}
}
if ((submit_encoder_change) && (button_read == BUTTON_INACTIVE_STATE)) {
#ifdef DEBUG_PRESET_ENCODERS
debug_println("check_preset_encoders: submit_encoder_change ");
#endif // DEBUG_PRESET_ENCODERS
if ((preset_encoders_state == ENCODER_AZ_PENDING) || (preset_encoders_state == ENCODER_AZ_EL_PENDING)) {
#ifndef OPTION_PRESET_ENCODER_0_360_DEGREES
submit_request(AZ, REQUEST_AZIMUTH_RAW, az_encoder_raw_degrees, 47);
#else
submit_request(AZ, REQUEST_AZIMUTH, az_encoder_raw_degrees, 47);
#endif //ndef OPTION_PRESET_ENCODER_0_360_DEGREES
}
#ifdef FEATURE_EL_PRESET_ENCODER
if ((preset_encoders_state == ENCODER_EL_PENDING) || (preset_encoders_state == ENCODER_AZ_EL_PENDING)) {
submit_request(EL, REQUEST_ELEVATION, el_encoder_degrees, 48);
}
#endif // FEATURE_EL_PRESET_ENCODER
preset_encoders_state = ENCODER_IDLE;
submit_encoder_change = 0;
} // if (submit_encoder_change)
if ((preset_start_button) && (preset_encoders_state != ENCODER_IDLE) && ((millis() - last_encoder_move) > ENCODER_PRESET_TIMEOUT)) { // timeout if we have a preset start button
preset_encoders_state = ENCODER_IDLE;
#ifdef FEATURE_LCD_DISPLAY
push_lcd_update = 1; // push an LCD update
#endif // FEATURE_LCD_DISPLAY
}
} /* check_preset_encoders */
#endif // FEATURE_AZ_PRESET_ENCODER
// --------------------------------------------------------------
#ifdef OPTION_AZ_MANUAL_ROTATE_LIMITS
void check_az_manual_rotate_limit() {
if ((current_az_state() == ROTATING_CCW) && (raw_azimuth <= (AZ_MANUAL_ROTATE_CCW_LIMIT * HEADING_MULTIPLIER))) {
#ifdef DEBUG_AZ_MANUAL_ROTATE_LIMITS
debug_print("check_az_manual_rotate_limit: stopping - hit AZ_MANUAL_ROTATE_CCW_LIMIT of ");
debug_print_int(AZ_MANUAL_ROTATE_CCW_LIMIT);
debug_println("");
#endif // DEBUG_AZ_MANUAL_ROTATE_LIMITS
submit_request(AZ, REQUEST_KILL, 0, 49);
}
if ((current_az_state() == ROTATING_CW) && (raw_azimuth >= (AZ_MANUAL_ROTATE_CW_LIMIT * HEADING_MULTIPLIER))) {
#ifdef DEBUG_AZ_MANUAL_ROTATE_LIMITS
debug_print("check_az_manual_rotate_limit: stopping - hit AZ_MANUAL_ROTATE_CW_LIMIT of ");
debug_print_int(AZ_MANUAL_ROTATE_CW_LIMIT);
debug_println("");
#endif // DEBUG_AZ_MANUAL_ROTATE_LIMITS
submit_request(AZ, REQUEST_KILL, 0, 50);
}
} /* check_az_manual_rotate_limit */
#endif // #ifdef OPTION_AZ_MANUAL_ROTATE_LIMITS
// --------------------------------------------------------------
#if defined(OPTION_EL_MANUAL_ROTATE_LIMITS) && defined(FEATURE_ELEVATION_CONTROL)
void check_el_manual_rotate_limit() {
if ((current_el_state() == ROTATING_DOWN) && (elevation <= (EL_MANUAL_ROTATE_DOWN_LIMIT * HEADING_MULTIPLIER))) {
#ifdef DEBUG_EL_MANUAL_ROTATE_LIMITS
debug_print("check_el_manual_rotate_limit: stopping - hit EL_MANUAL_ROTATE_DOWN_LIMIT of ");
debug_print_int(EL_MANUAL_ROTATE_DOWN_LIMIT);
debug_println("");
#endif // DEBUG_EL_MANUAL_ROTATE_LIMITS
submit_request(EL, REQUEST_KILL, 0, 51);
}
if ((current_el_state() == ROTATING_UP) && (elevation >= (EL_MANUAL_ROTATE_UP_LIMIT * HEADING_MULTIPLIER))) {
#ifdef DEBUG_EL_MANUAL_ROTATE_LIMITS
debug_print("check_el_manual_rotate_limit: stopping - hit EL_MANUAL_ROTATE_UP_LIMIT of ");
debug_print_int(EL_MANUAL_ROTATE_UP_LIMIT);
debug_println("");
#endif // DEBUG_EL_MANUAL_ROTATE_LIMITS
submit_request(EL, REQUEST_KILL, 0, 52);
}
} /* check_el_manual_rotate_limit */
#endif // #ifdef OPTION_EL_MANUAL_ROTATE_LIMITS
// --------------------------------------------------------------
void check_brake_release() {
static byte in_az_brake_release_delay = 0;
static unsigned long az_brake_delay_start_time = 0;
#ifdef FEATURE_ELEVATION_CONTROL
static byte in_el_brake_release_delay = 0;
static unsigned long el_brake_delay_start_time = 0;
#endif // FEATURE_ELEVATION_CONTROL
if ((az_state == IDLE) && (brake_az_engaged)) {
if (in_az_brake_release_delay) {
if ((millis() - az_brake_delay_start_time) > AZ_BRAKE_DELAY) {
brake_release(AZ, BRAKE_RELEASE_OFF);
in_az_brake_release_delay = 0;
}
} else {
az_brake_delay_start_time = millis();
in_az_brake_release_delay = 1;
}
}
#ifdef FEATURE_ELEVATION_CONTROL
if ((el_state == IDLE) && (brake_el_engaged)) {
if (in_el_brake_release_delay) {
if ((millis() - el_brake_delay_start_time) > EL_BRAKE_DELAY) {
brake_release(EL, BRAKE_RELEASE_OFF);
in_el_brake_release_delay = 0;
}
} else {
el_brake_delay_start_time = millis();
in_el_brake_release_delay = 1;
}
}
#endif // FEATURE_ELEVATION_CONTROL
} /* check_brake_release */
// --------------------------------------------------------------
void brake_release(byte az_or_el, byte operation){
if (az_or_el == AZ) {
if (brake_az) {
if (operation == BRAKE_RELEASE_ON) {
digitalWriteEnhanced(brake_az, HIGH);
brake_az_engaged = 1;
#ifdef DEBUG_BRAKE
debug_println("brake_release: brake_az BRAKE_RELEASE_ON");
#endif // DEBUG_BRAKE
} else {
digitalWriteEnhanced(brake_az, LOW);
brake_az_engaged = 0;
#ifdef DEBUG_BRAKE
debug_println("brake_release: brake_az BRAKE_RELEASE_OFF");
#endif // DEBUG_BRAKE
}
}
} else {
#ifdef FEATURE_ELEVATION_CONTROL
if (brake_el) {
digitalWriteEnhanced(brake_el, HIGH);
brake_el_engaged = 1;
#ifdef DEBUG_BRAKE
debug_println("brake_release: brake_el BRAKE_RELEASE_ON");
#endif // DEBUG_BRAKE
} else {
digitalWriteEnhanced(brake_el, LOW);
brake_el_engaged = 0;
#ifdef DEBUG_BRAKE
debug_println("brake_release: brake_el BRAKE_RELEASE_OFF");
#endif // DEBUG_BRAKE
}
#endif // FEATURE_ELEVATION_CONTROL
}
} /* brake_release */
// --------------------------------------------------------------
void check_overlap(){
static byte overlap_led_status = 0;
static unsigned long last_check_time;
if ((overlap_led) && ((millis() - last_check_time) > 500)) {
// if ((analog_az > (500*HEADING_MULTIPLIER)) && (azimuth > (ANALOG_AZ_OVERLAP_DEGREES*HEADING_MULTIPLIER)) && (!overlap_led_status)) {
if ((raw_azimuth > (ANALOG_AZ_OVERLAP_DEGREES * HEADING_MULTIPLIER)) && (!overlap_led_status)) {
digitalWriteEnhanced(overlap_led, HIGH);
overlap_led_status = 1;
#ifdef DEBUG_OVERLAP
debug_println("check_overlap: in overlap");
#endif // DEBUG_OVERLAP
} else {
// if (((analog_az < (500*HEADING_MULTIPLIER)) || (azimuth < (ANALOG_AZ_OVERLAP_DEGREES*HEADING_MULTIPLIER))) && (overlap_led_status)) {
if ((raw_azimuth < (ANALOG_AZ_OVERLAP_DEGREES * HEADING_MULTIPLIER)) && (overlap_led_status)) {
digitalWriteEnhanced(overlap_led, LOW);
overlap_led_status = 0;
#ifdef DEBUG_OVERLAP
debug_println("check_overlap: overlap off");
#endif // DEBUG_OVERLAP
}
}
last_check_time = millis();
}
} /* check_overlap */
// --------------------------------------------------------------
void clear_command_buffer(){
control_port_buffer_index = 0;
control_port_buffer[0] = 0;
}
// --------------------------------------------------------------
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_ANCILLARY_PIN_CONTROL)
byte get_analog_pin(byte pin_number){
byte return_output = 0;
switch (pin_number) {
case 0: return_output = A0; break;
case 1: return_output = A1; break;
case 2: return_output = A2; break;
case 3: return_output = A3; break;
case 4: return_output = A4; break;
case 5: return_output = A5; break;
case 6: return_output = A6; break;
}
return return_output;
}
#endif // FEATURE_REMOTE_UNIT_SLAVE
// --------------------------------------------------------------
#ifdef FEATURE_REMOTE_UNIT_SLAVE
void service_remote_unit_serial_buffer(){
/*
*
* This implements a protocol for host unit to remote unit communications
*
*
* Remote Slave Unit Protocol Reference
*
* PG - ping
* AZ - read azimuth
* EL - read elevation
* DOxx - digital pin initialize as output;
* DIxx - digital pin initialize as input
* DPxx - digital pin initialize as input with pullup
* DRxx - digital pin read
* DLxx - digital pin write low
* DHxx - digital pin write high
* DTxxyyyy - digital pin tone output
* NTxx - no tone
* ARxx - analog pin read
* AWxxyyy - analog pin write
* SWxy - serial write byte
* SDx - deactivate serial read event; x = port #
* SSxyyyyyy... - serial write sting; x = port #, yyyy = string of characters to send
* SAx - activate serial read event; x = port #
* RB - reboot
*
* Responses
*
* ER - report an error (remote to host only)
* EV - report an event (remote to host only)
* OK - report success (remote to host only)
* CS - report a cold start (remote to host only)
*
* Error Codes
*
* ER01 - Serial port buffer timeout
* ER02 - Command syntax error
*
* Events
*
* EVSxy - Serial port read event; x = serial port number, y = byte returned
*
*
*/
String command_string;
byte command_good = 0;
if (control_port_buffer_carriage_return_flag) {
if (control_port_buffer_index < 3) {
control_port->println(F("ER02")); // we don't have enough characters - syntax error
} else {
command_string = String(char(toupper(control_port_buffer[0]))) + String(char(toupper(control_port_buffer[1])));
#ifdef DEBUG_SERVICE_SERIAL_BUFFER
debug_print("serial_serial_buffer: command_string: ");
debug_print(command_string);
debug_print("$ control_port_buffer_index: ");
debug_print_int(control_port_buffer_index);
debug_println("");
#endif // DEBUG_SERVICE_SERIAL_BUFFER
if ((command_string == "SS") && (control_port_buffer[2] > 47) && (control_port_buffer[2] < 53)) { // this is a variable length command
command_good = 1;
for (byte x = 3; x < control_port_buffer_index; x++) {
switch (control_port_buffer[2] - 48) {
case 0: control_port->write(control_port_buffer[x]); break;
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
case 1: remote_unit_port->write(control_port_buffer[x]); break;
#endif
}
}
}
if (control_port_buffer_index == 3) {
if (command_string == "PG") {
control_port->println(F("PG")); command_good = 1;
} // PG - ping
if (command_string == "RB") {
wdt_enable(WDTO_30MS); while (1) {
}
} // RB - reboot
if (command_string == "AZ") {
control_port->print(F("AZ"));
if (raw_azimuth < 1000) {
control_port->print("0");
}
if (raw_azimuth < 100) {
control_port->print("0");
}
if (raw_azimuth < 10) {
control_port->print("0");
}
control_port->println(raw_azimuth);
command_good = 1;
}
#ifdef FEATURE_ELEVATION_CONTROL
if (command_string == "EL") {
control_port->print(F("EL"));
if (elevation >= 0) {
control_port->print("+");
} else {
control_port->print("-");
}
if (abs(elevation) < 1000) {
control_port->print("0");
}
if (abs(elevation) < 100) {
control_port->print("0");
}
if (abs(elevation) < 10) {
control_port->print("0");
}
control_port->println(abs(elevation));
command_good = 1;
}
#endif // FEATURE_ELEVATION_CONTROL
} // end of three byte commands
if (control_port_buffer_index == 4) {
if ((command_string == "SA") & (control_port_buffer[2] > 47) && (control_port_buffer[2] < 53)) {
serial_read_event_flag[control_port_buffer[2] - 48] = 1;
command_good = 1;
control_port->println("OK");
}
if ((command_string == "SD") & (control_port_buffer[2] > 47) && (control_port_buffer[2] < 53)) {
serial_read_event_flag[control_port_buffer[2] - 48] = 0;
command_good = 1;
control_port->println("OK");
}
}
if (control_port_buffer_index == 5) {
if (command_string == "SW") { // Serial Write command
switch (control_port_buffer[2]) {
case '0': control_port->write(control_port_buffer[3]); command_good = 1; break;
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
case '1': remote_unit_port->write(control_port_buffer[3]); command_good = 1; break;
#endif
}
}
if (command_string == "DO") {
if ((((control_port_buffer[2] > 47) && (control_port_buffer[2] < 58)) || (toupper(control_port_buffer[2]) == 'A')) && (control_port_buffer[3] > 47) && (control_port_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(control_port_buffer[2]) == 'A') {
pin_value = get_analog_pin(control_port_buffer[3] - 48);
} else {
pin_value = ((control_port_buffer[2] - 48) * 10) + (control_port_buffer[3] - 48);
}
#ifdef DEBUG_SERVICE_SERIAL_BUFFER
debug_print("service_serial_buffer: pin_value: ");
debug_print_int(pin_value);
debug_println("");
#endif // DEBUG_SERVICE_SERIAL_BUFFER
control_port->println("OK");
pinModeEnhanced(pin_value, OUTPUT);
}
}
if (command_string == "DH") {
if ((((control_port_buffer[2] > 47) && (control_port_buffer[2] < 58)) || (toupper(control_port_buffer[2]) == 'A')) && (control_port_buffer[3] > 47) && (control_port_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(control_port_buffer[2]) == 'A') {
pin_value = get_analog_pin(control_port_buffer[3] - 48);
} else {
pin_value = ((control_port_buffer[2] - 48) * 10) + (control_port_buffer[3] - 48);
}
digitalWriteEnhanced(pin_value, HIGH);
control_port->println("OK");
}
}
if (command_string == "DL") {
if ((((control_port_buffer[2] > 47) && (control_port_buffer[2] < 58)) || (toupper(control_port_buffer[2]) == 'A')) && (control_port_buffer[3] > 47) && (control_port_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(control_port_buffer[2]) == 'A') {
pin_value = get_analog_pin(control_port_buffer[3] - 48);
} else {
pin_value = ((control_port_buffer[2] - 48) * 10) + (control_port_buffer[3] - 48);
}
digitalWriteEnhanced(pin_value, LOW);
control_port->println("OK");
}
}
if (command_string == "DI") {
if ((((control_port_buffer[2] > 47) && (control_port_buffer[2] < 58)) || (toupper(control_port_buffer[2]) == 'A')) && (control_port_buffer[3] > 47) && (control_port_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(control_port_buffer[2]) == 'A') {
pin_value = get_analog_pin(control_port_buffer[3] - 48);
} else {
pin_value = ((control_port_buffer[2] - 48) * 10) + (control_port_buffer[3] - 48);
}
pinModeEnhanced(pin_value, INPUT);
control_port->println("OK");
}
}
if (command_string == "DP") {
if ((((control_port_buffer[2] > 47) && (control_port_buffer[2] < 58)) || (toupper(control_port_buffer[2]) == 'A')) && (control_port_buffer[3] > 47) && (control_port_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(control_port_buffer[2]) == 'A') {
pin_value = get_analog_pin(control_port_buffer[3] - 48);
} else {
pin_value = ((control_port_buffer[2] - 48) * 10) + (control_port_buffer[3] - 48);
}
// pinModeEnhanced(pin_value,INPUT_PULLUP);
pinModeEnhanced(pin_value, INPUT);
digitalWriteEnhanced(pin_value, HIGH);
control_port->println("OK");
}
}
if (command_string == "DR") {
if ((((control_port_buffer[2] > 47) && (control_port_buffer[2] < 58)) || (toupper(control_port_buffer[2]) == 'A')) && (control_port_buffer[3] > 47) && (control_port_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(control_port_buffer[2]) == 'A') {
pin_value = get_analog_pin(control_port_buffer[3] - 48);
} else {
pin_value = ((control_port_buffer[2] - 48) * 10) + (control_port_buffer[3] - 48);
}
byte pin_read = digitalReadEnhanced(pin_value);
control_port->print("DR");
control_port->write(control_port_buffer[2]);
control_port->write(control_port_buffer[3]);
if (pin_read) {
control_port->println("1");
} else {
control_port->println("0");
}
}
}
if (command_string == "AR") {
if ((((control_port_buffer[2] > 47) && (control_port_buffer[2] < 58)) || (toupper(control_port_buffer[2]) == 'A')) && (control_port_buffer[3] > 47) && (control_port_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(control_port_buffer[2]) == 'A') {
pin_value = get_analog_pin(control_port_buffer[3] - 48);
} else {
pin_value = ((control_port_buffer[2] - 48) * 10) + (control_port_buffer[3] - 48);
}
int pin_read = analogReadEnhanced(pin_value);
control_port->print("AR");
control_port->write(control_port_buffer[2]);
control_port->write(control_port_buffer[3]);
if (pin_read < 1000) {
control_port->print("0");
}
if (pin_read < 100) {
control_port->print("0");
}
if (pin_read < 10) {
control_port->print("0");
}
control_port->println(pin_read);
}
}
if (command_string == "NT") {
if ((((control_port_buffer[2] > 47) && (control_port_buffer[2] < 58)) || (toupper(control_port_buffer[2]) == 'A')) && (control_port_buffer[3] > 47) && (control_port_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(control_port_buffer[2]) == 'A') {
pin_value = get_analog_pin(control_port_buffer[3] - 48);
} else {
pin_value = ((control_port_buffer[2] - 48) * 10) + (control_port_buffer[3] - 48);
}
noTone(pin_value);
control_port->println("OK");
}
}
} // if (control_port_buffer_index == 5)
if (control_port_buffer_index == 8) {
if (command_string == "AW") {
if ((((control_port_buffer[2] > 47) && (control_port_buffer[2] < 58)) || (toupper(control_port_buffer[2]) == 'A')) && (control_port_buffer[3] > 47) && (control_port_buffer[3] < 58)) {
byte pin_value = 0;
if (toupper(control_port_buffer[2]) == 'A') {
pin_value = get_analog_pin(control_port_buffer[3] - 48);
} else {
pin_value = ((control_port_buffer[2] - 48) * 10) + (control_port_buffer[3] - 48);
}
int write_value = ((control_port_buffer[4] - 48) * 100) + ((control_port_buffer[5] - 48) * 10) + (control_port_buffer[6] - 48);
if ((write_value >= 0) && (write_value < 256)) {
analogWriteEnhanced(pin_value, write_value);
control_port->println("OK");
command_good = 1;
}
}
}
}
if (control_port_buffer_index == 9) {
if (command_string == "DT") {
if ((((control_port_buffer[2] > 47) && (control_port_buffer[2] < 58)) || (toupper(control_port_buffer[2]) == 'A')) && (control_port_buffer[3] > 47) && (control_port_buffer[3] < 58)) {
byte pin_value = 0;
if (toupper(control_port_buffer[2]) == 'A') {
pin_value = get_analog_pin(control_port_buffer[3] - 48);
} else {
pin_value = ((control_port_buffer[2] - 48) * 10) + (control_port_buffer[3] - 48);
}
int write_value = ((control_port_buffer[4] - 48) * 1000) + ((control_port_buffer[5] - 48) * 100) + ((control_port_buffer[6] - 48) * 10) + (control_port_buffer[7] - 48);
if ((write_value >= 0) && (write_value <= 9999)) {
tone(pin_value, write_value);
control_port->println("OK");
command_good = 1;
}
}
}
}
if (!command_good) {
control_port->println(F("ER02"));
}
}
control_port_buffer_carriage_return_flag = 0;
control_port_buffer_index = 0;
} else {
if (((millis() - last_serial_receive_time) > REMOTE_BUFFER_TIMEOUT_MS) && control_port_buffer_index) {
control_port->println(F("ER01"));
control_port_buffer_index = 0;
}
}
} /* service_remote_unit_serial_buffer */
#endif // FEATURE_REMOTE_UNIT_SLAVE
// --------------------------------------------------------------
void check_serial(){
static unsigned long serial_led_time = 0;
float tempfloat = 0;
char return_string[100] = "";
#if !defined(FEATURE_AZ_POSITION_ROTARY_ENCODER) && !defined(FEATURE_AZ_POSITION_PULSE_INPUT)
long place_multiplier = 0;
byte decimalplace = 0;
#endif
#ifdef FEATURE_CLOCK
int temp_year = 0;
byte temp_month = 0;
byte temp_day = 0;
byte temp_minute = 0;
byte temp_hour = 0;
#endif // FEATURE_CLOCK
#if defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
char grid[10] = "";
byte hit_error = 0;
#endif // defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
#if defined(FEATURE_AZ_POSITION_ROTARY_ENCODER) || defined(FEATURE_AZ_POSITION_PULSE_INPUT)
int new_azimuth = 9999;
#endif
#ifdef FEATURE_ELEVATION_CONTROL
#if defined(FEATURE_EL_POSITION_ROTARY_ENCODER) || defined(FEATURE_EL_POSITION_PULSE_INPUT)
int new_elevation = 9999;
#endif // FEATURE_ELEVATION_CONTROL
#endif // defined(FEATURE_AZ_POSITION_ROTARY_ENCODER) || defined(FEATURE_AZ_POSITION_PULSE_INPUT)
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
if ((serial_led) && (serial_led_time != 0) && ((millis() - serial_led_time) > SERIAL_LED_TIME_MS)) {
digitalWriteEnhanced(serial_led, LOW);
serial_led_time = 0;
}
if (control_port->available()) {
if (serial_led) {
digitalWriteEnhanced(serial_led, HIGH); // blink the LED just to say we got something
serial_led_time = millis();
}
#ifdef FEATURE_POWER_SWITCH
last_activity_time = millis();
#endif //FEATURE_POWER_SWITCH
#ifdef DEBUG_SERIAL
int control_port_available = control_port->available();
#endif // DEBUG_SERIAL
incoming_serial_byte = control_port->read();
last_serial_receive_time = millis();
#ifdef DEBUG_SERIAL
debug_print("check_serial: control_port: ");
debug_print_int(control_port_available);
debug_print(":");
debug_print_int(incoming_serial_byte);
debug_println("");
#endif // DEBUG_SERIAL
if ((incoming_serial_byte > 96) && (incoming_serial_byte < 123)) { // uppercase it
incoming_serial_byte = incoming_serial_byte - 32;
}
#ifdef FEATURE_EASYCOM_EMULATION //Easycom uses spaces, linefeeds, and carriage returns as command delimiters----------
// Easycom only
if ((control_port_buffer[0] == '\\') or (control_port_buffer[0] == '/') or ((control_port_buffer_index == 0) && ((incoming_serial_byte == '\\') || (incoming_serial_byte == '/')))) {
// if it's a backslash command add it to the buffer if it's not a line feed or carriage return
if ((incoming_serial_byte != 10) && (incoming_serial_byte != 13)) {
control_port_buffer[control_port_buffer_index] = incoming_serial_byte;
control_port_buffer_index++;
}
} else {
// if it's an easycom command add it to the buffer if it's not a line feed, carriage return, or space
if ((incoming_serial_byte != 10) && (incoming_serial_byte != 13) && (incoming_serial_byte != 32)) {
control_port_buffer[control_port_buffer_index] = incoming_serial_byte;
control_port_buffer_index++;
}
}
// if it is an Easycom command and we have a space, line feed, or carriage return, process it
if (((incoming_serial_byte == 10) || (incoming_serial_byte == 13) || (incoming_serial_byte == 32)) && (control_port_buffer[0] != '\\') && (control_port_buffer[0] != '/')){
if (control_port_buffer_index > 1){
process_easycom_command(control_port_buffer,control_port_buffer_index,CONTROL_PORT0,return_string);
control_port->println(return_string);
}
clear_command_buffer();
} else {
// if it is a backslash command, process it if we have a carriage return
if ((incoming_serial_byte == 13) && ((control_port_buffer[0] == '\\') or (control_port_buffer[0] == '/'))){
process_backslash_command(control_port_buffer, control_port_buffer_index, CONTROL_PORT0, return_string);
control_port->println(return_string);
clear_command_buffer();
}
}
#else //FEATURE_EASYCOM_EMULATION ------------------------------------------------------
// Yaesu, Remote Slave
if ((incoming_serial_byte != 10) && (incoming_serial_byte != 13)) { // add it to the buffer if it's not a line feed or carriage return
control_port_buffer[control_port_buffer_index] = incoming_serial_byte;
control_port_buffer_index++;
}
if (incoming_serial_byte == 13) { // do we have a carriage return?
if ((control_port_buffer[0] == '\\') or (control_port_buffer[0] == '/')) {
process_backslash_command(control_port_buffer, control_port_buffer_index, CONTROL_PORT0, return_string);
} else {
#ifdef FEATURE_YAESU_EMULATION
process_yaesu_command(control_port_buffer,control_port_buffer_index,CONTROL_PORT0,return_string);
#endif //FEATURE_YAESU_EMULATION
#ifdef FEATURE_REMOTE_UNIT_SLAVE
process_remote_slave_command(control_port_buffer,control_port_buffer_index,CONTROL_PORT0,return_string);
#endif //FEATURE_REMOTE_UNIT_SLAVE
}
control_port->println(return_string);
clear_command_buffer();
}
#endif //FEATURE_EASYCOM_EMULATION--------------------------
} // if (control_port->available())
#endif // defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
// remote unit port servicing
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
if (remote_unit_port->available()) {
incoming_serial_byte = remote_unit_port->read();
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
// if (serial_read_event_flag[1]) {
// control_port->print("EVS1");
// control_port->write(incoming_serial_byte);
// control_port->println();
// }
if (remote_port_rx_sniff) {
control_port->write(incoming_serial_byte);
}
#endif //defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
if ((incoming_serial_byte != 10) && (remote_unit_port_buffer_index < COMMAND_BUFFER_SIZE)) {
// incoming_serial_byte = toupper(incoming_serial_byte);
remote_unit_port_buffer[remote_unit_port_buffer_index] = incoming_serial_byte;
remote_unit_port_buffer_index++;
if ((incoming_serial_byte == 13) || (remote_unit_port_buffer_index == COMMAND_BUFFER_SIZE)) {
remote_unit_port_buffer_carriage_return_flag = 1;
}
}
serial1_last_receive_time = millis();
}
#endif // defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
#ifdef FEATURE_GPS
if (gps_port->available()) {
byte gps_port_read = gps_port->read();
#ifdef GPS_MIRROR_PORT
gps_mirror_port->write(gps_port_read);
#endif //GPS_MIRROR_PORT
#ifdef DEBUG_GPS_SERIAL
debug_print_char(gps_port_read);
//port_flush();
#endif //DEBUG_GPS_SERIAL
if (gps.encode(gps_port_read)) {
gps_data_available = 1;
}
}
#endif // FEATURE_GPS
#if defined(GPS_MIRROR_PORT) && defined(FEATURE_GPS)
if (gps_mirror_port->available()) {
gps_port->write(gps_mirror_port->read());
}
#endif //defined(GPS_MIRROR_PORT) && defined(FEATURE_GPS)
} /* check_serial */
// --------------------------------------------------------------
void check_buttons(){
#ifdef FEATURE_ADAFRUIT_BUTTONS
int buttons = 0;
buttons = lcd.readButtons();
if (buttons & BUTTON_RIGHT) {
#else
if (button_cw && (digitalReadEnhanced(button_cw) == BUTTON_ACTIVE_STATE)) {
#endif // FEATURE_ADAFRUIT_BUTTONS
if (azimuth_button_was_pushed == 0) {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: button_cw pushed");
#endif // DEBUG_BUTTONS
#ifdef OPTION_AZ_MANUAL_ROTATE_LIMITS
if (raw_azimuth < (AZ_MANUAL_ROTATE_CW_LIMIT * HEADING_MULTIPLIER)) {
#endif
submit_request(AZ, REQUEST_CW, 0, 61);
azimuth_button_was_pushed = 1;
#ifdef OPTION_AZ_MANUAL_ROTATE_LIMITS
} else {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: exceeded AZ_MANUAL_ROTATE_CW_LIMIT");
#endif // DEBUG_BUTTONS
}
#endif
}
} else {
#ifdef FEATURE_ADAFRUIT_BUTTONS
if (buttons & BUTTON_LEFT) {
#else
if (button_ccw && (digitalReadEnhanced(button_ccw) == BUTTON_ACTIVE_STATE)) {
#endif // FEATURE_ADAFRUIT_BUTTONS
if (azimuth_button_was_pushed == 0) {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: button_ccw pushed");
#endif // DEBUG_BUTTONS
#ifdef OPTION_AZ_MANUAL_ROTATE_LIMITS
if (raw_azimuth > (AZ_MANUAL_ROTATE_CCW_LIMIT * HEADING_MULTIPLIER)) {
#endif
submit_request(AZ, REQUEST_CCW, 0, 62);
azimuth_button_was_pushed = 1;
#ifdef OPTION_AZ_MANUAL_ROTATE_LIMITS
} else {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: exceeded AZ_MANUAL_ROTATE_CCW_LIMIT");
#endif // DEBUG_BUTTONS
}
#endif // OPTION_AZ_MANUAL_ROTATE_LIMITS
}
}
}
#ifdef FEATURE_ADAFRUIT_BUTTONS
if ((azimuth_button_was_pushed) && (!(buttons & 0x12))) {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: no button depressed");
#endif // DEBUG_BUTTONS
submit_request(AZ, REQUEST_STOP, 0, 63);
azimuth_button_was_pushed = 0;
}
#else
if ((azimuth_button_was_pushed) && (digitalReadEnhanced(button_ccw) == BUTTON_INACTIVE_STATE) && (digitalReadEnhanced(button_cw) == BUTTON_INACTIVE_STATE)) {
delay(200);
if ((digitalReadEnhanced(button_ccw) == BUTTON_INACTIVE_STATE) && (digitalReadEnhanced(button_cw) == BUTTON_INACTIVE_STATE)) {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: no AZ button depressed");
#endif // DEBUG_BUTTONS
#ifndef OPTION_BUTTON_RELEASE_NO_SLOWDOWN
submit_request(AZ, REQUEST_STOP, 0, 64);
#else
submit_request(AZ, REQUEST_KILL, 0, 65);
#endif // OPTION_BUTTON_RELEASE_NO_SLOWDOWN
azimuth_button_was_pushed = 0;
}
}
#endif // FEATURE_ADAFRUIT_BUTTONS
#ifdef FEATURE_ELEVATION_CONTROL
#ifdef FEATURE_ADAFRUIT_BUTTONS
if (buttons & 0x08) {
#else
if (button_up && (digitalReadEnhanced(button_up) == BUTTON_ACTIVE_STATE)) {
#endif // FEATURE_ADAFRUIT_BUTTONS
if (elevation_button_was_pushed == 0) {
submit_request(EL, REQUEST_UP, 0, 66);
elevation_button_was_pushed = 1;
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: button_up pushed");
#endif // DEBUG_BUTTONS
}
} else {
#ifdef FEATURE_ADAFRUIT_BUTTONS
if (buttons & 0x04) {
#else
if (button_down && (digitalReadEnhanced(button_down) == BUTTON_ACTIVE_STATE)) {
#endif // FEATURE_ADAFRUIT_BUTTONS
if (elevation_button_was_pushed == 0) {
submit_request(EL, REQUEST_DOWN, 0, 67);
elevation_button_was_pushed = 1;
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: button_down pushed");
#endif // DEBUG_BUTTONS
}
}
}
#ifdef FEATURE_ADAFRUIT_BUTTONS
if ((elevation_button_was_pushed) && (!(buttons & 0x0C))) {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: no EL button depressed");
#endif // DEBUG_BUTTONS
#ifndef OPTION_BUTTON_RELEASE_NO_SLOWDOWN
submit_request(EL, REQUEST_STOP, 0, 68);
#else
submit_request(EL, REQUEST_KILL, 0, 69);
#endif // OPTION_BUTTON_RELEASE_NO_SLOWDOWN
elevation_button_was_pushed = 0;
}
#else
if ((elevation_button_was_pushed) && (digitalReadEnhanced(button_up) == BUTTON_INACTIVE_STATE) && (digitalReadEnhanced(button_down) == BUTTON_INACTIVE_STATE)) {
delay(200);
if ((digitalReadEnhanced(button_up) == BUTTON_INACTIVE_STATE) && (digitalReadEnhanced(button_down) == BUTTON_INACTIVE_STATE)) {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: no EL button depressed");
#endif // DEBUG_BUTTONS
#ifndef OPTION_BUTTON_RELEASE_NO_SLOWDOWN
submit_request(EL, REQUEST_STOP, 0, 70);
#else
submit_request(EL, REQUEST_KILL, 0, 71);
#endif // OPTION_BUTTON_RELEASE_NO_SLOWDOWN
elevation_button_was_pushed = 0;
}
}
#endif // FEATURE_ADAFRUIT_BUTTONS
#endif // FEATURE_ELEVATION_CONTROL
#ifdef FEATURE_PARK
static byte park_button_pushed = 0;
static unsigned long last_time_park_button_pushed = 0;
if (button_park) {
if ((digitalReadEnhanced(button_park) == BUTTON_ACTIVE_STATE)) {
park_button_pushed = 1;
last_time_park_button_pushed = millis();
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: button_park pushed");
#endif // DEBUG_BUTTONS
} else {
if ((park_button_pushed) && ((millis() - last_time_park_button_pushed) >= 250)) {
if (park_status != PARK_INITIATED) {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: executing park");
#endif // DEBUG_BUTTONS
initiate_park();
} else {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: park aborted");
#endif // DEBUG_BUTTONS
submit_request(AZ, REQUEST_KILL, 0, 72);
#ifdef FEATURE_ELEVATION_CONTROL
submit_request(EL, REQUEST_KILL, 0, 73);
#endif // FEATURE_ELEVATION_CONTROL
}
park_button_pushed = 0;
}
}
}
#endif /* ifdef FEATURE_PARK */
if (button_stop) {
if ((digitalReadEnhanced(button_stop) == BUTTON_ACTIVE_STATE)) {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: button_stop pushed");
#endif // DEBUG_BUTTONS
#ifndef OPTION_BUTTON_RELEASE_NO_SLOWDOWN
submit_request(AZ, REQUEST_STOP, 0, 74);
#else
submit_request(AZ, REQUEST_KILL, 0, 75);
#endif // OPTION_BUTTON_RELEASE_NO_SLOWDOWN
#ifdef FEATURE_ELEVATION_CONTROL
#ifndef OPTION_BUTTON_RELEASE_NO_SLOWDOWN
submit_request(EL, REQUEST_STOP, 0, 76);
#else
submit_request(EL, REQUEST_KILL, 0, 77);
#endif // OPTION_BUTTON_RELEASE_NO_SLOWDOWN
#endif // FEATURE_ELEVATION_CONTROL
}
}
#ifdef FEATURE_MOON_TRACKING
static byte moon_tracking_button_pushed = 0;
static unsigned long last_time_moon_tracking_button_pushed = 0;
if (moon_tracking_button) {
if ((digitalReadEnhanced(moon_tracking_button) == BUTTON_ACTIVE_STATE)) {
moon_tracking_button_pushed = 1;
last_time_moon_tracking_button_pushed = millis();
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: moon_tracking_button pushed");
#endif // DEBUG_BUTTONS
} else {
if ((moon_tracking_button_pushed) && ((millis() - last_time_moon_tracking_button_pushed) >= 250)) {
if (!moon_tracking_active) {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: moon tracking on");
#endif // DEBUG_BUTTONS
moon_tracking_active = 1;
} else {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: moon tracking off");
#endif // DEBUG_BUTTONS
moon_tracking_active = 0;
}
moon_tracking_button_pushed = 0;
}
}
}
#endif // FEATURE_MOON_TRACKING
#ifdef FEATURE_SUN_TRACKING
static byte sun_tracking_button_pushed = 0;
static unsigned long last_time_sun_tracking_button_pushed = 0;
if (sun_tracking_button) {
if ((digitalReadEnhanced(sun_tracking_button) == BUTTON_ACTIVE_STATE)) {
sun_tracking_button_pushed = 1;
last_time_sun_tracking_button_pushed = millis();
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: sun_tracking_button pushed");
#endif // DEBUG_BUTTONS
} else {
if ((sun_tracking_button_pushed) && ((millis() - last_time_sun_tracking_button_pushed) >= 250)) {
if (!sun_tracking_active) {
#ifdef DEBUG_BUTTONS
debug_println("check_buttons: sun tracking on");
#endif // DEBUG_BUTTONS
sun_tracking_active = 1;
} else {
#ifdef DEBUG_BUTTONS
debug_print("check_buttons: sun tracking off");
#endif // DEBUG_BUTTONS
sun_tracking_active = 0;
}
sun_tracking_button_pushed = 0;
}
}
}
#endif // FEATURE_SUN_TRACKING
} /* check_buttons */
// --------------------------------------------------------------
#ifdef FEATURE_LCD_DISPLAY
char * idle_status(){
#ifdef OPTION_DISPLAY_DIRECTION_STATUS
return azimuth_direction(azimuth);
#endif //OPTION_DISPLAY_DIRECTION_STATUS
return("");
}
#endif //FEATURE_LCD_DISPLAY
// --------------------------------------------------------------
#if defined(FEATURE_LCD_DISPLAY) && defined(OPTION_DISPLAY_DIRECTION_STATUS)
char * azimuth_direction(int azimuth_in){
azimuth_in = azimuth_in / HEADING_MULTIPLIER;
if (azimuth_in > 348) {
return N_STRING;
}
if (azimuth_in > 326) {
return NNW_STRING;
}
if (azimuth_in > 303) {
return NW_STRING;
}
if (azimuth_in > 281) {
return WNW_STRING;
}
if (azimuth_in > 258) {
return W_STRING;
}
if (azimuth_in > 236) {
return WNW_STRING;
}
if (azimuth_in > 213) {
return SW_STRING;
}
if (azimuth_in > 191) {
return SSW_STRING;
}
if (azimuth_in > 168) {
return S_STRING;
}
if (azimuth_in > 146) {
return SSE_STRING;
}
if (azimuth_in > 123) {
return SE_STRING;
}
if (azimuth_in > 101) {
return ESE_STRING;
}
if (azimuth_in > 78) {
return E_STRING;
}
if (azimuth_in > 56) {
return ENE_STRING;
}
if (azimuth_in > 33) {
return NE_STRING;
}
if (azimuth_in > 11) {
return NNE_STRING;
}
return N_STRING;
} /* azimuth_direction */
#endif /* ifdef FEATURE_LCD_DISPLAY */
// --------------------------------------------------------------
#if defined(FEATURE_LCD_DISPLAY)
void update_display(){
// update the LCD display
static byte lcd_state_row_0 = 0;
static byte lcd_state_row_1 = 0;
String row_0_string;
static int last_azimuth = -1;
char workstring[10] = "";
unsigned int target = 0;
#ifdef FEATURE_ELEVATION_CONTROL
static int last_elevation = -1;
static int last_target_elevation = 0;
static byte last_el_state = 999;
#endif
byte decimal_places = 0;
static byte last_az_state = 999;
if ((lcd_state_row_0 == 0) && (lcd_state_row_1 == 0)){
if (millis() < SPLASH_SCREEN_TIME){
return;
} else {
lcd.clear();
lcd_state_row_0 = LCD_IDLE_STATUS;
}
}
// row 0 ------------------------------------------------------------
#ifndef FEATURE_ELEVATION_CONTROL
if (((millis() - last_lcd_update) > LCD_UPDATE_TIME) || (push_lcd_update) || (az_state != last_az_state)) {
#else
if (((millis() - last_lcd_update) > LCD_UPDATE_TIME) || (push_lcd_update) || (az_state != last_el_state) || (el_state != last_el_state)) {
#endif
#ifndef FEATURE_ELEVATION_CONTROL
#ifdef FEATURE_AZ_PRESET_ENCODER
target = az_encoder_raw_degrees;
if (target > (359 * LCD_HEADING_MULTIPLIER)) {
target = target - (360 * LCD_HEADING_MULTIPLIER);
}
if (target > (359 * LCD_HEADING_MULTIPLIER)) {
target = target - (360 * LCD_HEADING_MULTIPLIER);
}
if (preset_encoders_state == ENCODER_AZ_PENDING) {
clear_display_row(0); // Show Target Deg on upper line
row_0_string = TARGET_STRING;
dtostrf(target / LCD_HEADING_MULTIPLIER, 1, LCD_DECIMAL_PLACES, workstring);
row_0_string.concat(workstring);
row_0_string.concat(char(223));
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_TARGET_AZ;
#ifdef DEBUG_DISPLAY
if (debug_mode) {
control_port->print(F("update_display: "));
control_port->println(row_0_string);
}
#endif // DEBUG_DISPLAY
} else {
#endif // FEATURE_AZ_PRESET_ENCODER
if (last_az_state != az_state){
if (az_state != IDLE) {
if (az_request_queue_state == IN_PROGRESS_TO_TARGET) {
clear_display_row(0);
row_0_string = ROTATING_TO_STRING;
dtostrf(target_azimuth / LCD_HEADING_MULTIPLIER, 1, LCD_DECIMAL_PLACES, workstring);
row_0_string.concat(workstring);
// row_0_string.concat(int(target_azimuth / LCD_HEADING_MULTIPLIER));
row_0_string.concat(char(223));
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_ROTATING_TO;
#ifdef DEBUG_DISPLAY
if (debug_mode) {
control_port->print(F("update_display: "));
control_port->println(row_0_string);
}
#endif // DEBUG_DISPLAY
} else {
if ((az_state == SLOW_START_CW) || (az_state == NORMAL_CW) || (az_state == SLOW_DOWN_CW) || (az_state == TIMED_SLOW_DOWN_CW)) {
if (lcd_state_row_0 != LCD_ROTATING_CW) {
clear_display_row(0);
row_0_string = ROTATING_CW_STRING;
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_ROTATING_CW;
#ifdef DEBUG_DISPLAY
if (debug_mode) {
control_port->print(F("update_display: "));
control_port->println(row_0_string);
}
#endif // DEBUG_DISPLAY
}
} else {
if (lcd_state_row_0 != LCD_ROTATING_CCW) {
clear_display_row(0);
row_0_string = ROTATING_CCW_STRING;
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_ROTATING_CCW;
#ifdef DEBUG_DISPLAY
if (debug_mode) {
control_port->print(F("update_display: "));
control_port->println(row_0_string);
}
#endif // DEBUG_DISPLAY
}
}
}
} else { // az_state == IDLE
#ifndef FEATURE_PARK // ---------
if ((last_azimuth != azimuth) || (lcd_state_row_0 != LCD_IDLE_STATUS)) {
row_0_string.concat(idle_status());
if ((last_row_0_string == row_0_string) || (lcd_state_row_0 != LCD_IDLE_STATUS)) {
clear_display_row(0);
lcd_state_row_0 = LCD_IDLE_STATUS;
#ifdef OPTION_DISPLAY_DIRECTION_STATUS
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
#ifdef DEBUG_DISPLAY
if (debug_mode) {
control_port->print(F("update_display: "));
control_port->println(row_0_string);
}
#endif // DEBUG_DISPLAY
#endif //OPTION_DISPLAY_DIRECTION_STATUS
} else {
#ifdef OPTION_DISPLAY_DIRECTION_STATUS
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2) - 1, 0);
lcd.print(" ");
lcd.print(row_0_string);
lcd.print(" ");
#ifdef DEBUG_DISPLAY
if (debug_mode) {
control_port->print(F("update_display: "));
control_port->println(row_0_string);
}
#endif // DEBUG_DISPLAY
#endif //OPTION_DISPLAY_DIRECTION_STATUS
}
}
#else // FEATURE_PARK-----------
if (park_status == PARKED) {
if (lcd_state_row_0 != LCD_PARKED) {
row_0_string = PARKED_STRING;
clear_display_row(0);
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_PARKED;
}
} else {
if ((last_azimuth != azimuth) || (lcd_state_row_0 != LCD_IDLE_STATUS)) {
row_0_string.concat(idle_status());
if ((last_row_0_string == row_0_string) || (lcd_state_row_0 != LCD_IDLE_STATUS)) {
clear_display_row(0);
lcd_state_row_0 = LCD_IDLE_STATUS;
#ifdef OPTION_DISPLAY_DIRECTION_STATUS
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
#ifdef DEBUG_DISPLAY
if (debug_mode) {
control_port->print(F("update_display: "));
control_port->println(row_0_string);
}
#endif // DEBUG_DISPLAY
#endif //OPTION_DISPLAY_DIRECTION_STATUS
} else {
#ifdef OPTION_DISPLAY_DIRECTION_STATUS
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2) - 1, 0);
lcd.print(" ");
lcd.print(row_0_string);
lcd.print(" ");
#ifdef DEBUG_DISPLAY
if (debug_mode) {
control_port->print(F("update_display: "));
control_port->println(row_0_string);
}
#endif // DEBUG_DISPLAY
#endif //OPTION_DISPLAY_DIRECTION_STATUS
}
}
}
#endif // FEATURE_PARK ---------
} // (az_state != IDLE)
}//<---
#ifdef FEATURE_AZ_PRESET_ENCODER
} // (preset_encoders_state == ENCODER_AZ_PENDING)
#endif // FEATURE_AZ_PRESET_ENCODER
#endif /* ifndef FEATURE_ELEVATION_CONTROL */
// ------------ AZ & EL -----------------------------------------------
#ifdef FEATURE_ELEVATION_CONTROL
#ifdef FEATURE_AZ_PRESET_ENCODER
#ifndef FEATURE_EL_PRESET_ENCODER
unsigned int target = az_encoder_raw_degrees;
if (target > (359 * LCD_HEADING_MULTIPLIER)) {
target = target - (360 * LCD_HEADING_MULTIPLIER);
}
if (target > (359 * LCD_HEADING_MULTIPLIER)) {
target = target - (360 * LCD_HEADING_MULTIPLIER);
}
if (preset_encoders_state == ENCODER_AZ_PENDING) {
clear_display_row(0); // Show Target Deg on upper line
row_0_string = TARGET_STRING;
dtostrf(target / LCD_HEADING_MULTIPLIER, 1, LCD_DECIMAL_PLACES, workstring);
row_0_string.concat(workstring);
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_TARGET_AZ;
#ifdef DEBUG_DISPLAY
if (debug_mode) {
control_port->print(F("update_display: "));
control_port->println(row_0_string);
}
#endif // DEBUG_DISPLAY
} else {
#endif // ndef FEATURE_EL_PRESET_ENCODER
#endif // FEATURE_AZ_PRESET_ENCODER
#ifdef FEATURE_EL_PRESET_ENCODER
unsigned int target = az_encoder_raw_degrees;
if (target > (359 * LCD_HEADING_MULTIPLIER)) {
target = target - (360 * LCD_HEADING_MULTIPLIER);
}
if (target > (359 * LCD_HEADING_MULTIPLIER)) {
target = target - (360 * LCD_HEADING_MULTIPLIER);
}
if (preset_encoders_state != ENCODER_IDLE) {
switch (preset_encoders_state) {
case ENCODER_AZ_PENDING:
clear_display_row(0); // Show Target Deg on upper line
row_0_string = AZ_TARGET_STRING;
dtostrf(target / LCD_HEADING_MULTIPLIER, 1, LCD_DECIMAL_PLACES, workstring);
row_0_string.concat(workstring);
row_0_string.concat(char(223));
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_TARGET_AZ;
break;
case ENCODER_EL_PENDING:
clear_display_row(0); // Show Target Deg on upper line
row_0_string = EL_TARGET_STRING;
dtostrf(el_encoder_degrees / LCD_HEADING_MULTIPLIER, 1, LCD_DECIMAL_PLACES, workstring);
row_0_string.concat(workstring);
row_0_string.concat(char(223));
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_TARGET_EL;
break;
case ENCODER_AZ_EL_PENDING:
clear_display_row(0); // Show Target Deg on upper line
row_0_string = TARGET_STRING;
dtostrf(target / LCD_HEADING_MULTIPLIER, 1, LCD_DECIMAL_PLACES, workstring);
row_0_string.concat(workstring);
row_0_string.concat(char(223));
dtostrf(el_encoder_degrees / LCD_HEADING_MULTIPLIER, 1, LCD_DECIMAL_PLACES, workstring);
row_0_string.concat(" ");
row_0_string.concat(workstring);
row_0_string.concat(char(223));
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_TARGET_AZ_EL;
break;
} /* switch */
} else { // (preset_encoders_state != ENCODER_IDLE)
#endif // FEATURE_EL_PRESET_ENCODER
if ((az_state != last_az_state) || (el_state != last_el_state) || push_lcd_update){
if ((az_state != IDLE) && (el_state == IDLE)) {
if (az_request_queue_state == IN_PROGRESS_TO_TARGET) {
clear_display_row(0);
row_0_string = ROTATING_TO_STRING;
dtostrf(target_azimuth / LCD_HEADING_MULTIPLIER, 1, LCD_DECIMAL_PLACES, workstring);
row_0_string.concat(workstring);
row_0_string.concat(char(223));
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_ROTATING_TO;
} else {
if ((az_state == SLOW_START_CW) || (az_state == NORMAL_CW) || (az_state == SLOW_DOWN_CW) || (az_state == TIMED_SLOW_DOWN_CW)) {
clear_display_row(0);
row_0_string = ROTATING_CW_STRING;
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_ROTATING_CW;
} else {
clear_display_row(0);
row_0_string = ROTATING_CCW_STRING;
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_ROTATING_CCW;
}
}
} // ((az_state != IDLE) && (el_state == IDLE))
if ((az_state == IDLE) && (el_state != IDLE)) {
// if ((el_request_queue_state == IN_PROGRESS_TO_TARGET) && ((lcd_state_row_0 != LCD_ELEVATING_TO) || (target_elevation != last_target_elevation))){
if (el_request_queue_state == IN_PROGRESS_TO_TARGET) {
if ((lcd_state_row_0 != LCD_ELEVATING_TO) || (target_elevation != last_target_elevation)) {
clear_display_row(0);
row_0_string = ELEVATING_TO_STRING;
dtostrf(target_elevation / LCD_HEADING_MULTIPLIER, 1, LCD_DECIMAL_PLACES, workstring);
row_0_string.concat(workstring);
row_0_string.concat(char(223));
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_ELEVATING_TO;
}
} else {
if (((el_state == SLOW_START_UP) || (el_state == NORMAL_UP) || (el_state == SLOW_DOWN_UP) || (el_state == TIMED_SLOW_DOWN_UP)) && (lcd_state_row_0 != LCD_ELEVATING_UP)) {
clear_display_row(0);
row_0_string = ELEVATING_UP_STRING;
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_ELEVATING_UP;
}
if (((el_state == SLOW_START_DOWN) || (el_state == NORMAL_DOWN) || (el_state == SLOW_DOWN_DOWN) || (el_state == TIMED_SLOW_DOWN_DOWN)) && (lcd_state_row_0 != LCD_ELEVATING_DOWN)) {
clear_display_row(0);
row_0_string = ELEVATING_DOWN_STRING;
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_ELEVATING_DOWN;
}
}
} // ((az_state == IDLE) && (el_state != IDLE))
if ((az_state != IDLE) && (el_state != IDLE) && (lcd_state_row_0 != LCD_ROTATING_AZ_EL)) {
clear_display_row(0);
row_0_string = ROTATING_STRING;
if (az_request_queue_state == NONE) {
if (current_az_state() == ROTATING_CW) {
row_0_string.concat(CW_STRING);
} else {
row_0_string.concat(CCW_STRING);
}
} else {
//row_0_string.concat(int(target_azimuth / LCD_HEADING_MULTIPLIER));
if ((target_azimuth / LCD_HEADING_MULTIPLIER) < 100){decimal_places = LCD_DECIMAL_PLACES;} else {decimal_places = 0;}
dtostrf(target_azimuth / LCD_HEADING_MULTIPLIER, 1, decimal_places, workstring);
row_0_string.concat(workstring);
}
row_0_string.concat(" ");
if (el_request_queue_state == NONE) {
if (current_el_state() == ROTATING_UP) {
row_0_string.concat(UP_STRING);
} else {
row_0_string.concat(DOWN_STRING);
}
} else {
if ((target_elevation / LCD_HEADING_MULTIPLIER) < 100){decimal_places = LCD_DECIMAL_PLACES;} else {decimal_places = 0;}
dtostrf(target_elevation / LCD_HEADING_MULTIPLIER, 1, decimal_places, workstring);
row_0_string.concat(workstring);
}
lcd_state_row_0 = LCD_ROTATING_AZ_EL;
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
} // ((az_state != IDLE) && (el_state != IDLE))
if ((az_state == IDLE) && (el_state == IDLE)) {
#ifndef FEATURE_PARK
if ((last_azimuth != azimuth) || (lcd_state_row_0 != LCD_IDLE_STATUS)) {
row_0_string.concat(idle_status());
if ((last_row_0_string != row_0_string) || (lcd_state_row_0 != LCD_IDLE_STATUS)) {
clear_display_row(0);
lcd_state_row_0 = LCD_IDLE_STATUS;
#ifdef OPTION_DISPLAY_DIRECTION_STATUS
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
#endif //OPTION_DISPLAY_DIRECTION_STATUS
} else {
#ifdef OPTION_DISPLAY_DIRECTION_STATUS
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2) - 1, 0);
lcd.print(" ");
lcd.print(row_0_string);
lcd.print(" ");
#endif //OPTION_DISPLAY_DIRECTION_STATUS
}
}
#else // FEATURE_PARK
if (park_status == PARKED) {
if (lcd_state_row_0 != LCD_PARKED) {
row_0_string = PARKED_STRING;
clear_display_row(0);
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
lcd_state_row_0 = LCD_PARKED;
}
} else {
if ((last_azimuth != azimuth) || (lcd_state_row_0 != LCD_IDLE_STATUS)) {
row_0_string.concat(idle_status());
if ((last_row_0_string == row_0_string) || (lcd_state_row_0 != LCD_IDLE_STATUS)) {
clear_display_row(0);
lcd_state_row_0 = LCD_IDLE_STATUS;
#ifdef OPTION_DISPLAY_DIRECTION_STATUS
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 0);
lcd.print(row_0_string);
#endif //OPTION_DISPLAY_DIRECTION_STATUS
} else {
#ifdef OPTION_DISPLAY_DIRECTION_STATUS
lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2) - 1, 0);
lcd.print(" ");
lcd.print(row_0_string);
lcd.print(" ");
#endif //OPTION_DISPLAY_DIRECTION_STATUS
}
}
}
#endif // FEATURE_PARK
} // ((az_state == IDLE) && (el_state == IDLE))
#ifdef FEATURE_EL_PRESET_ENCODER
} // (preset_encoders_state != ENCODER_IDLE)
#endif // FEATURE_EL_PRESET_ENCODER
#ifdef FEATURE_AZ_PRESET_ENCODER
#ifndef FEATURE_EL_PRESET_ENCODER
}
#endif // ndef FEATURE_EL_PRESET_ENCODER
#endif // FEATURE_AZ_PRESET_ENCODER
} //<--
#endif // FEATURE_ELEVATION_CONTROL
push_lcd_update = 0;
last_az_state = az_state;
#ifdef FEATURE_ELEVATION_CONTROL
last_el_state = el_state;
#endif // FEATURE_ELEVATION_CONTROL
}
// row 1 --------------------------------------------
if ((millis() - last_lcd_update) > LCD_UPDATE_TIME) {
#ifndef FEATURE_ELEVATION_CONTROL // ---------------- az only -----------------------------------
if (last_azimuth != azimuth) {
//clear_display_row(1);
row_0_string = AZIMUTH_STRING;
dtostrf(azimuth / LCD_HEADING_MULTIPLIER, 1, LCD_DECIMAL_PLACES, workstring);
row_0_string.concat(workstring);
row_0_string.concat(char(223));
//lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 1);
lcd.setCursor(0,1);
int x = LCD_COLUMNS - row_0_string.length();
byte y = 0;
while (x > 0){
if ((y%2) != 0){
row_0_string = " " + row_0_string;
} else {
row_0_string.concat(" ");
}
y++;
x--;
}
lcd.print(row_0_string);
last_azimuth = azimuth;
lcd_state_row_1 = LCD_HEADING;
}
#endif // FEATURE_ELEVATION_CONTROL---------------------------------------------------------------
#ifdef FEATURE_ELEVATION_CONTROL // --------------------az & el---------------------------------
if ((last_azimuth != azimuth) || (last_elevation != elevation)) {
//clear_display_row(1);
#if defined(FEATURE_ONE_DECIMAL_PLACE_HEADINGS) || defined(FEATURE_TWO_DECIMAL_PLACE_HEADINGS)
if ((azimuth >= 1000) && (elevation >= 1000)) {
row_0_string = AZ_STRING;
} else {
row_0_string = AZ_SPACE_STRING;
}
#else
row_0_string = AZ_SPACE_STRING;
#endif // efined(FEATURE_ONE_DECIMAL_PLACE_HEADINGS) || defined(FEATURE_TWO_DECIMAL_PLACE_HEADINGS)
dtostrf(azimuth/ LCD_HEADING_MULTIPLIER, 3, LCD_DECIMAL_PLACES, workstring);
row_0_string.concat(workstring);
#if !defined(FEATURE_ONE_DECIMAL_PLACE_HEADINGS) && !defined(FEATURE_TWO_DECIMAL_PLACE_HEADINGS)
if (LCD_COLUMNS > 14) {
row_0_string.concat(char(223));
}
#else
if ((LCD_COLUMNS > 18) || ((azimuth < 100) && (elevation < 100))) {
row_0_string.concat(char(223));
}
#endif
#if defined(FEATURE_ONE_DECIMAL_PLACE_HEADINGS) || defined(FEATURE_TWO_DECIMAL_PLACE_HEADINGS)
if ((elevation >= 1000) && (azimuth >= 1000)) {
row_0_string.concat(SPACE_EL_STRING);
} else {
row_0_string.concat(SPACE_EL_SPACE_STRING);
}
#else
row_0_string.concat(SPACE_EL_SPACE_STRING);
#endif // defined(FEATURE_ONE_DECIMAL_PLACE_HEADINGS) || defined(FEATURE_TWO_DECIMAL_PLACE_HEADINGS)
dtostrf(elevation / LCD_HEADING_MULTIPLIER, 1, LCD_DECIMAL_PLACES, workstring);
row_0_string.concat(workstring);
#if !defined(FEATURE_ONE_DECIMAL_PLACE_HEADINGS) && !defined(FEATURE_TWO_DECIMAL_PLACE_HEADINGS)
if (LCD_COLUMNS > 14) {
row_0_string.concat(char(223));
}
#else
if ((LCD_COLUMNS > 18) || ((azimuth < 100) && (elevation < 100))) {
row_0_string.concat(char(223));
}
#endif
lcd.setCursor(0,1);
int x = LCD_COLUMNS - row_0_string.length();
byte y = 0;
while (x > 0){
if ((y%2) != 0){
row_0_string = " " + row_0_string;
} else {
row_0_string.concat(" ");
}
y++;
x--;
}
//lcd.setCursor(((LCD_COLUMNS - row_0_string.length()) / 2), 1);
lcd.print(row_0_string);
last_azimuth = azimuth;
last_elevation = elevation;
lcd_state_row_1 = LCD_HEADING;
}
#endif // FEATURE_ELEVATION_CONTROL //------------------------------------------------------------
}
char temp_string[10] = "";
// clock display -- small ----------------------------------------------------------
#if defined(OPTION_DISPLAY_HHMMSS_CLOCK) && defined(FEATURE_CLOCK)
char clock_temp_string[9] = "";
static byte last_clock_seconds = 0;
static byte last_clock_lcd_row_state = 0;
byte clock_digits = 0;
update_time();
if (((last_clock_seconds != clock_seconds) || (last_clock_lcd_row_state != LCD_IDLE_STATUS)) && (lcd_state_row_0 == LCD_IDLE_STATUS)){
#ifdef OPTION_CLOCK_ALWAYS_HAVE_HOUR_LEADING_ZERO
if (clock_hours < 10) {
strcat(clock_temp_string, "0");
}
dtostrf(clock_hours, 0, 0, temp_string);
strcat(clock_temp_string,temp_string);
#else
dtostrf(clock_hours, 0, 0, temp_string);
strcpy(clock_temp_string,temp_string);
#endif //OPTION_CLOCK_ALWAYS_HAVE_HOUR_LEADING_ZERO
strcat(clock_temp_string,":");
if (clock_minutes < 10) {
strcat(clock_temp_string, "0");
}
if (clock_hours > 9){
clock_digits = 1;
}
dtostrf(clock_minutes, 0, 0, temp_string);
strcat(clock_temp_string,temp_string);
strcat(clock_temp_string,":");
if (clock_seconds < 10) {
strcat(clock_temp_string, "0");
}
dtostrf(clock_seconds, 0, 0, temp_string);
strcat(clock_temp_string,temp_string);
if (LCD_HHMMSS_CLOCK_POSITION == LEFT){
lcd.setCursor(0,0);
} else {
lcd.setCursor(LCD_COLUMNS-(7+clock_digits),0);
}
lcd.print(clock_temp_string);
if ((clock_minutes == 0) && (clock_hours == 0)) {
if (LCD_HHMMSS_CLOCK_POSITION == RIGHT){
lcd.setCursor(LCD_COLUMNS-(9+clock_digits),0);
}
lcd.print(" ");
}
last_clock_seconds = clock_seconds;
}
last_clock_lcd_row_state = lcd_state_row_0;
#endif //defined(OPTION_DISPLAY_HHMMSS_CLOCK) && defined(FEATURE_CLOCK)
// clock display -- small ----------------------------------------------------------
#if defined(OPTION_DISPLAY_HHMM_CLOCK) && defined(FEATURE_CLOCK)
char clock_temp_string[10] = "";
static byte last_clock_minutes = 0;
static byte last_clock_lcd_row_state = 0;
byte clock_digits = 0;
update_time();
if (((last_clock_minutes != clock_minutes) || (last_clock_lcd_row_state != LCD_IDLE_STATUS)) && (lcd_state_row_0 == LCD_IDLE_STATUS)){
#ifdef OPTION_CLOCK_ALWAYS_HAVE_HOUR_LEADING_ZERO
if (clock_hours < 10) {
strcat(clock_temp_string, "0");
}
dtostrf(clock_hours, 0, 0, temp_string);
strcat(clock_temp_string,temp_string);
#else
dtostrf(clock_hours, 0, 0, temp_string);
strcpy(clock_temp_string,temp_string);
#endif //OPTION_CLOCK_ALWAYS_HAVE_HOUR_LEADING_ZERO
strcat(clock_temp_string,":");
if (clock_minutes < 10) {
strcat(clock_temp_string, "0");
}
if (clock_hours > 9){
clock_digits = 1;
}
dtostrf(clock_minutes, 0, 0, temp_string);
strcat(clock_temp_string,temp_string);
if (LCD_HHMM_CLOCK_POSITION == LEFT){
lcd.setCursor(0,0);
} else {
lcd.setCursor(LCD_COLUMNS-(4+clock_digits),0);
}
lcd.print(clock_temp_string);
if ((clock_minutes == 0) && (clock_hours == 0)) {
if (LCD_HHMM_CLOCK_POSITION == RIGHT){
lcd.setCursor(LCD_COLUMNS-(6+clock_digits),0);
}
lcd.print(" ");
}
last_clock_minutes = clock_minutes;
}
last_clock_lcd_row_state = lcd_state_row_0;
#endif //defined(OPTION_DISPLAY_HHMM_CLOCK) && defined(FEATURE_CLOCK)
// alternating H:MM clock and maidenhead display ------------------------------------------------------------
#if defined(OPTION_DISPLAY_ALT_HHMM_CLOCK_AND_MAIDENHEAD) && defined(FEATURE_CLOCK)
char clock_temp_string[10] = "";
static byte last_clock_minutes = 0;
static byte last_clock_seconds = 0;
static byte last_clock_lcd_row_state = 0;
byte clock_digits = 0;
static byte displaying_clock = 1;
if ((lcd_state_row_0 != LCD_UNDEF) && ((lcd_state_row_0 == LCD_IDLE_STATUS) || ((LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_ROW-1)!= 0))){
update_time();
if (((last_clock_seconds != clock_seconds) || ((((LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_ROW-1)== 0))) && (last_clock_lcd_row_state != LCD_IDLE_STATUS)) && ((lcd_state_row_0 == LCD_IDLE_STATUS) || ((LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_ROW-1)!= 0))){
if (((clock_seconds % 5) == 0) || (((LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_ROW-1)== 0) && (last_clock_lcd_row_state != LCD_IDLE_STATUS))) {
if (displaying_clock){
if (LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_POSITION == LEFT){
lcd.setCursor(0,LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_ROW-1);
} else {
lcd.setCursor(LCD_COLUMNS-6,LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_ROW-1);
}
lcd.print(coordinates_to_maidenhead(latitude,longitude));
displaying_clock = 0;
} else {
displaying_clock = 2; // switch to the clock (2 == print the clock regardless of time)
}
}
last_clock_seconds = clock_seconds;
}
if (((displaying_clock && (last_clock_minutes != clock_minutes)) || (displaying_clock == 2)) && ((lcd_state_row_0 == LCD_IDLE_STATUS) || ((LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_ROW-1)!= 0))){
#ifdef OPTION_CLOCK_ALWAYS_HAVE_HOUR_LEADING_ZERO
if (clock_hours < 10) {
strcpy(clock_temp_string, "0");
}
dtostrf(clock_hours, 0, 0, temp_string);
strcat(clock_temp_string,temp_string);
#else
dtostrf(clock_hours, 0, 0, temp_string);
strcpy(clock_temp_string,temp_string);
#endif //OPTION_CLOCK_ALWAYS_HAVE_HOUR_LEADING_ZERO
strcat(clock_temp_string,":");
if (clock_minutes < 10) {
strcat(clock_temp_string, "0");
}
if (clock_hours > 9){
clock_digits = 1;
}
dtostrf(clock_minutes, 0, 0, temp_string);
strcat(clock_temp_string,temp_string);
if (LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_POSITION == LEFT){
lcd.setCursor(0,LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_ROW-1);
} else {
lcd.setCursor(LCD_COLUMNS-(4+clock_digits),LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_ROW-1);
}
lcd.print(clock_temp_string);
if (LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_POSITION == RIGHT){
lcd.setCursor(LCD_COLUMNS-(6+clock_digits),LCD_ALT_HHMM_CLOCK_AND_MAIDENHEAD_ROW-1);
}
lcd.print(" ");
last_clock_minutes = clock_minutes;
displaying_clock = 1;
}
last_clock_lcd_row_state = lcd_state_row_0;
}
#endif //defined(OPTION_DISPLAY_ALT_HHMM_CLOCK_AND_MAIDENHEAD) && defined(FEATURE_CLOCK)
// constant HH:MM:SS clock and maidenhead display ----------------------------------------------------------
#if defined(OPTION_DISPLAY_CONSTANT_HHMMSS_CLOCK_AND_MAIDENHEAD) && defined(FEATURE_CLOCK)
char clock_temp_string[14] = "";
static byte last_clock_minutes = 0;
static byte last_clock_seconds = 0;
static byte last_clock_lcd_row_state = 0;
byte clock_digits = 0;
if ((lcd_state_row_0 != LCD_UNDEF) && ((lcd_state_row_0 == LCD_IDLE_STATUS) || ((LCD_CONSTANT_HHMMSS_CLOCK_AND_MAIDENHEAD_ROW-1)!= 0))){
update_time();
if (((last_clock_seconds != clock_seconds) || ((((LCD_CONSTANT_HHMMSS_CLOCK_AND_MAIDENHEAD_ROW-1)== 0))) && (last_clock_lcd_row_state != LCD_IDLE_STATUS)) && ((lcd_state_row_0 == LCD_IDLE_STATUS) || ((LCD_CONSTANT_HHMMSS_CLOCK_AND_MAIDENHEAD_ROW-1)!= 0))){
if (LCD_CONSTANT_HHMMSS_CLOCK_AND_MAIDENHEAD_POSITION == LEFT){
lcd.setCursor(0,LCD_CONSTANT_HHMMSS_CLOCK_AND_MAIDENHEAD_ROW-1);
} else {
lcd.setCursor(LCD_COLUMNS-14,LCD_CONSTANT_HHMMSS_CLOCK_AND_MAIDENHEAD_ROW-1);
}
#ifdef OPTION_CLOCK_ALWAYS_HAVE_HOUR_LEADING_ZERO
if (clock_hours < 10) {
strcpy(clock_temp_string, "0");
}
dtostrf(clock_hours, 0, 0, temp_string);
strcat(clock_temp_string,temp_string);
#else
dtostrf(clock_hours, 0, 0, temp_string);
strcpy(clock_temp_string,temp_string);
#endif //OPTION_CLOCK_ALWAYS_HAVE_HOUR_LEADING_ZERO
strcat(clock_temp_string,":");
if (clock_minutes < 10) {
strcat(clock_temp_string, "0");
}
if (clock_hours > 9){
clock_digits = 1;
}
dtostrf(clock_minutes, 0, 0, temp_string);
strcat(clock_temp_string,temp_string);
strcat(clock_temp_string,":");
if (clock_seconds < 10) {
strcat(clock_temp_string, "0");
}
dtostrf(clock_seconds, 0, 0, temp_string);
strcat(clock_temp_string,temp_string);
lcd.print(clock_temp_string);
lcd.print(" ");
lcd.print(coordinates_to_maidenhead(latitude,longitude));
last_clock_seconds = clock_seconds;
}
last_clock_lcd_row_state = lcd_state_row_0;
}
#endif //defined(OPTION_DISPLAY_CONSTANT_HHMMSS_CLOCK_AND_MAIDENHEAD) && defined(FEATURE_CLOCK)
// gps indicator -------------------------------------------------------------------------
#if defined(OPTION_DISPLAY_GPS_INDICATOR) && defined(FEATURE_GPS) && defined(FEATURE_CLOCK)
static byte last_clock_status = FREE_RUNNING;
static byte last_gps_lcd_row_state = 0;
if ((lcd_state_row_0 != LCD_UNDEF) && ((lcd_state_row_0 == LCD_IDLE_STATUS) || ((LCD_GPS_INDICATOR_ROW-1)!= 0))){
if ((last_clock_status != clock_status) || ((LCD_GPS_INDICATOR_ROW == 1) && (last_gps_lcd_row_state != lcd_state_row_0))) {
if (LCD_GPS_INDICATOR_POSITION == LEFT){
lcd.setCursor(0,LCD_GPS_INDICATOR_ROW-1);
} else {
lcd.setCursor(LCD_COLUMNS-3,LCD_GPS_INDICATOR_ROW-1);
}
if (clock_status == GPS_SYNC){
lcd.print(GPS_STRING);
} else {
lcd.print(" ");
}
}
last_clock_status = clock_status;
}
last_gps_lcd_row_state = lcd_state_row_0;
#endif //defined(OPTION_DISPLAY_GPS_INDICATOR) && defined(FEATURE_GPS) && defined(FEATURE_CLOCK)
#if (defined(OPTION_DISPLAY_MOON_TRACKING_CONTINUOUSLY) && defined(FEATURE_MOON_TRACKING)) || (defined(OPTION_DISPLAY_SUN_TRACKING_CONTINUOUSLY) && defined(FEATURE_SUN_TRACKING)) || defined(OPTION_DISPLAY_MOON_OR_SUN_TRACKING_CONDITIONAL)
char trackingstring[LCD_COLUMNS+2] = "";
char temptrackingstring[LCD_COLUMNS+2] = "";
#endif
// moon tracking ----------------------------------------------------------
#if defined(OPTION_DISPLAY_MOON_TRACKING_CONTINUOUSLY) && defined(FEATURE_MOON_TRACKING)
static unsigned long last_moon_tracking_check_time = 0;
static byte last_strlen_moon = 0;
if ((lcd_state_row_0 != 0) && (lcd_state_row_1 != 0) && ((millis()-last_moon_tracking_check_time) > LCD_MOON_TRACKING_UPDATE_INTERVAL)) {
update_moon_position();
strcpy(trackingstring,"");
if (moon_tracking_active){
if (moon_visible){
strcat(trackingstring,TRACKING_ACTIVE_CHAR);
} else {
strcat(trackingstring,"-");
}
}
strcat(trackingstring,MOON_STRING);
dtostrf(moon_azimuth,0,LCD_DECIMAL_PLACES,temp_string);
strcat(trackingstring,temp_string);
if ((LCD_COLUMNS>16) && ((moon_azimuth < 100) || (abs(moon_elevation)<100))) {strcat(trackingstring,"\xDF");}
strcat(trackingstring," ");
dtostrf(moon_elevation,0,LCD_DECIMAL_PLACES,temp_string);
strcat(trackingstring,temp_string);
if ((LCD_COLUMNS>16) && ((moon_azimuth < 100) || (abs(moon_elevation)<100))) {strcat(trackingstring,"\xDF");}
if (moon_tracking_active){
if (moon_visible){
strcat(trackingstring,TRACKING_ACTIVE_CHAR);
} else {
strcat(trackingstring,TRACKING_INACTIVE_CHAR);
}
}
// if (strlen(trackingstring) < last_strlen_moon){
// clear_display_row(LCD_MOON_TRACKING_ROW-1);
// }
// last_strlen_moon = strlen(trackingstring);
// lcd.setCursor((LCD_COLUMNS-strlen(trackingstring))/2,LCD_MOON_TRACKING_ROW-1);
lcd.setCursor(0,LCD_MOON_TRACKING_ROW-1);
int x = LCD_COLUMNS - strlen(trackingstring);
byte y = 0;
while (x > 0){
if ((y%2) != 0){
strcpy(temptrackingstring," ");
strcat(temptrackingstring,trackingstring);
strcpy(trackingstring,temptrackingstring);
} else {
strcat(trackingstring," ");
}
y++;
x--;
}
lcd.print(trackingstring);
last_moon_tracking_check_time = millis();
}
#endif //defined(OPTION_DISPLAY_MOON_TRACKING_CONTINUOUSLY) && defined(FEATURE_MOON_TRACKING)
// sun tracking ----------------------------------------------------------
#if defined(OPTION_DISPLAY_SUN_TRACKING_CONTINUOUSLY) && defined(FEATURE_SUN_TRACKING)
static unsigned long last_sun_tracking_check_time = 0;
static byte last_strlen_sun = 0;
if ((lcd_state_row_0 != 0) && (lcd_state_row_1 != 0) && ((millis()-last_sun_tracking_check_time) > LCD_SUN_TRACKING_UPDATE_INTERVAL)) {
update_sun_position();
strcpy(trackingstring,"");
if (sun_tracking_active){
if (sun_visible){
strcat(trackingstring,TRACKING_ACTIVE_CHAR);
} else {
strcat(trackingstring,TRACKING_INACTIVE_CHAR);
}
}
strcat(trackingstring,SUN_STRING);
dtostrf(sun_azimuth,0,LCD_DECIMAL_PLACES,temp_string);
strcat(trackingstring,temp_string);
if ((LCD_COLUMNS>16) && ((sun_azimuth < 100) || (abs(sun_elevation)<100))) {strcat(trackingstring,"\xDF");}
strcat(trackingstring," ");
dtostrf(sun_elevation,0,LCD_DECIMAL_PLACES,temp_string);
strcat(trackingstring,temp_string);
if ((LCD_COLUMNS>16) && ((sun_azimuth < 100) || (abs(sun_elevation)<100))) {strcat(trackingstring,"\xDF");}
if (sun_tracking_active){
if (sun_visible){
strcat(trackingstring,TRACKING_ACTIVE_CHAR);
} else {
strcat(trackingstring,TRACKING_INACTIVE_CHAR);
}
}
// if (strlen(trackingstring) < last_strlen_sun){
// clear_display_row(LCD_SUN_TRACKING_ROW-1);
// }
// last_strlen_sun = strlen(trackingstring);
// lcd.setCursor((LCD_COLUMNS-strlen(trackingstring))/2,LCD_SUN_TRACKING_ROW-1);
lcd.setCursor(0,LCD_SUN_TRACKING_ROW-1);
int x = LCD_COLUMNS - strlen(trackingstring);
byte y = 0;
while (x > 0){
if ((y%2) != 0){
strcpy(temptrackingstring," ");
strcat(temptrackingstring,trackingstring);
strcpy(trackingstring,temptrackingstring);
} else {
strcat(trackingstring," ");
}
y++;
x--;
}
lcd.print(trackingstring);
last_sun_tracking_check_time = millis();
}
#endif //defined(OPTION_DISPLAY_SUN_TRACKING_CONTINUOUSLY) && defined(FEATURE_SUN_TRACKING)
// moon and/or sun tracking conditional ------------------------------------------------------------------------
#ifdef OPTION_DISPLAY_MOON_OR_SUN_TRACKING_CONDITIONAL
// moon tracking ----
#if defined(FEATURE_MOON_TRACKING)
static unsigned long last_moon_tracking_check_time = 0;
static byte last_strlen_moon = 0;
static byte last_moon_tracking_state = 0;
if ((lcd_state_row_0 != 0) && (lcd_state_row_1 != 0) && ((millis()-last_moon_tracking_check_time) > LCD_MOON_TRACKING_UPDATE_INTERVAL) && moon_tracking_active) {
update_moon_position();
strcpy(trackingstring,"");
strcat(trackingstring,MOON_STRING);
dtostrf(moon_azimuth,0,LCD_DECIMAL_PLACES,temp_string);
strcat(trackingstring,temp_string);
if ((LCD_COLUMNS>16) && ((moon_azimuth < 100) || (abs(moon_elevation)<100))) {strcat(trackingstring,"\xDF");}
strcat(trackingstring," ");
dtostrf(moon_elevation,0,LCD_DECIMAL_PLACES,temp_string);
strcat(trackingstring,temp_string);
if ((LCD_COLUMNS>16) && ((moon_azimuth < 100) || (abs(moon_elevation)<100))) {strcat(trackingstring,"\xDF");}
if (strlen(trackingstring) < last_strlen_moon){
clear_display_row(LCD_MOON_OR_SUN_TRACKING_CONDITIONAL_ROW-1);
}
last_strlen_moon = strlen(trackingstring);
lcd.setCursor((LCD_COLUMNS-strlen(trackingstring))/2,LCD_MOON_OR_SUN_TRACKING_CONDITIONAL_ROW-1);
lcd.print(trackingstring);
last_moon_tracking_check_time = millis();
last_moon_tracking_state = 1;
}
if (!moon_tracking_active && last_moon_tracking_state){
clear_display_row(LCD_MOON_OR_SUN_TRACKING_CONDITIONAL_ROW-1);
last_moon_tracking_state = 0;
}
#endif //defined(OPTION_DISPLAY_MOON_TRACKING_CONTINUOUSLY) && defined(FEATURE_MOON_TRACKING)
// sun tracking ----------------------------------------------------------
#if defined(FEATURE_SUN_TRACKING)
static unsigned long last_sun_tracking_check_time = 0;
static byte last_strlen_sun = 0;
static byte last_sun_tracking_state = 0;
if ((lcd_state_row_0 != 0) && (lcd_state_row_1 != 0) && ((millis()-last_sun_tracking_check_time) > LCD_SUN_TRACKING_UPDATE_INTERVAL) && sun_tracking_active) {
update_sun_position();
strcpy(trackingstring,"");
strcat(trackingstring,SUN_STRING);
dtostrf(sun_azimuth,0,LCD_DECIMAL_PLACES,temp_string);
strcat(trackingstring,temp_string);
if ((LCD_COLUMNS>16) && ((sun_azimuth < 100) || (abs(sun_elevation)<100))) {strcat(trackingstring,"\xDF");}
strcat(trackingstring," ");
dtostrf(sun_elevation,0,LCD_DECIMAL_PLACES,temp_string);
strcat(trackingstring,temp_string);
if ((LCD_COLUMNS>16) && ((sun_azimuth < 100) || (abs(sun_elevation)<100))) {strcat(trackingstring,"\xDF");}
if (strlen(trackingstring) < last_strlen_sun){
clear_display_row(LCD_MOON_OR_SUN_TRACKING_CONDITIONAL_ROW-1);
}
last_strlen_sun = strlen(trackingstring);
lcd.setCursor((LCD_COLUMNS-strlen(trackingstring))/2,LCD_MOON_OR_SUN_TRACKING_CONDITIONAL_ROW-1);
lcd.print(trackingstring);
last_sun_tracking_check_time = millis();
last_sun_tracking_state = 1;
}
if (!sun_tracking_active && last_sun_tracking_state){
clear_display_row(LCD_MOON_OR_SUN_TRACKING_CONDITIONAL_ROW-1);
last_sun_tracking_state = 0;
}
#endif //defined(FEATURE_SUN_TRACKING)
#endif //OPTION_DISPLAY_MOON_OR_SUN_TRACKING_CONDITIONAL
// end of moon and/or sun conditional -----
if ((millis() - last_lcd_update) > LCD_UPDATE_TIME) {
last_lcd_update = millis();
}
last_row_0_string = row_0_string;
// clock display --- big clock ---------------------------------------------------------
/* this is outside the normal LCD refresh timing so the seconds update as soon as possible */
#if defined(OPTION_DISPLAY_BIG_CLOCK) && defined(FEATURE_CLOCK)
char clock_big_temp_string[22] = "";
static byte last_clock_big_seconds = 0;
static byte last_clock_big_minutes = 0;
static byte printed_z = 0;
update_time();
if ((last_clock_big_seconds != clock_seconds) && (lcd_state_row_0 != 0) && (lcd_state_row_1 != 0)){
sprintf(clock_big_temp_string, "%s", clock_string());
//clock_big_temp_string[20]
if (last_clock_big_minutes == clock_minutes){ // if the minutes didn't change, don't send the whole string to the LCD
if ((int(float(last_clock_big_seconds)/10.0)) != (int(float(clock_seconds)/10.0))){
lcd.setCursor(((LCD_COLUMNS-20)/2)+17,LCD_BIG_CLOCK_ROW-1);
lcd.print(clock_big_temp_string[17]);
} else {
lcd.setCursor(((LCD_COLUMNS-20)/2)+18,LCD_BIG_CLOCK_ROW-1);
}
lcd.print(clock_big_temp_string[18]);
last_clock_big_seconds = clock_seconds;
} else { // print the whole clock
lcd.setCursor((LCD_COLUMNS-20)/2,LCD_BIG_CLOCK_ROW-1);
if (!printed_z){clock_big_temp_string[20] = 0;} // I put this in to fix mysterious characters that appear at 0,0 for no reason
lcd.print(clock_big_temp_string);
last_clock_big_seconds = clock_seconds;
last_clock_big_minutes = clock_minutes;
printed_z = 1;
}
}
#endif //defined(OPTION_DISPLAY_BIG_CLOCK) && defined(FEATURE_CLOCK)
// end clock display --- big clock ---------------------------------------------------------
} /* update_display */
#endif /* ifdef FEATURE_LCD_DISPLAY */
// --------------------------------------------------------------
#ifdef FEATURE_LCD_DISPLAY
void clear_display_row(byte row_number){
lcd.setCursor(0, row_number);
for (byte x = 0; x < LCD_COLUMNS; x++) {
lcd.print(" ");
}
}
#endif
// --------------------------------------------------------------
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
void get_keystroke(){
while (control_port->available() == 0) {
}
while (control_port->available() > 0)
incoming_serial_byte = control_port->read();
}
#endif // defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
// --------------------------------------------------------------
#ifdef FEATURE_YAESU_EMULATION
void print_wrote_to_memory(){
control_port->println(F("Wrote to memory"));
}
#endif // FEATURE_YAESU_EMULATION
// --------------------------------------------------------------
#ifdef FEATURE_YAESU_EMULATION
void clear_serial_buffer(){
delay(200);
while (control_port->available()) incoming_serial_byte = control_port->read();
}
#endif // FEATURE_YAESU_EMULATION
// --------------------------------------------------------------
void read_settings_from_eeprom(){
byte * p = (byte *)(void *)&configuration;
unsigned int i;
int ee = 0;
for (i = 0; i < sizeof(configuration); i++) {
*p++ = EEPROM.read(ee++);
}
if (configuration.magic_number == EEPROM_MAGIC_NUMBER) {
#ifdef DEBUG_EEPROM
if (debug_mode) {
debug_println("read_settings_from_eeprom: reading settings from eeprom: ");
debug_print("\nanalog_az_full_ccw");
debug_print_int(configuration.analog_az_full_ccw);
debug_print("\nanalog_az_full_cw");
debug_print_int(configuration.analog_az_full_cw);
debug_print("\nanalog_el_0_degrees");
debug_print_int(configuration.analog_el_0_degrees);
debug_print("\nanalog_el_max_elevation");
debug_print_int(configuration.analog_el_max_elevation);
debug_print("\nlast_azimuth:");
debug_print_float(configuration.last_azimuth, 1);
debug_print("\nlast_elevation:");
debug_print_float(configuration.last_elevation, 1);
debug_print("\nlast_az_incremental_encoder_position:");
debug_print_int(configuration.last_az_incremental_encoder_position);
debug_print("\nlast_el_incremental_encoder_position:");
debug_print_int(configuration.last_el_incremental_encoder_position);
debug_print("\naz_offset:");
debug_print_float(configuration.azimuth_offset,2);
debug_print("\nel_offset:");
debug_print_float(configuration.elevation_offset,2);
debug_println("");
}
#endif // DEBUG_EEPROM
#if defined(FEATURE_AZ_POSITION_INCREMENTAL_ENCODER)
az_incremental_encoder_position = configuration.last_az_incremental_encoder_position;
#endif
#if defined(FEATURE_ELEVATION_CONTROL) && defined(FEATURE_EL_POSITION_INCREMENTAL_ENCODER)
el_incremental_encoder_position = configuration.last_el_incremental_encoder_position;
#endif
#if defined(FEATURE_AZ_POSITION_ROTARY_ENCODER)
raw_azimuth = int(configuration.last_azimuth * HEADING_MULTIPLIER);
if (raw_azimuth >= (360 * HEADING_MULTIPLIER)) {
azimuth = raw_azimuth - (360 * HEADING_MULTIPLIER);
} else {
azimuth = raw_azimuth;
}
#endif // defined(FEATURE_AZ_POSITION_ROTARY_ENCODER)
#if defined(FEATURE_ELEVATION_CONTROL) && defined(FEATURE_EL_POSITION_ROTARY_ENCODER)
elevation = int(configuration.last_elevation * HEADING_MULTIPLIER);
#endif // defined(FEATURE_EL_POSITION_ROTARY_ENCODER)
#ifdef FEATURE_AZ_POSITION_PULSE_INPUT
raw_azimuth = int(configuration.last_azimuth * HEADING_MULTIPLIER);
if (raw_azimuth >= (360 * HEADING_MULTIPLIER)) {
azimuth = raw_azimuth - (360 * HEADING_MULTIPLIER);
} else {
azimuth = raw_azimuth;
}
az_position_pulse_input_azimuth = configuration.last_azimuth;
#endif // FEATURE_AZ_POSITION_PULSE_INPUT
#if defined(FEATURE_ELEVATION_CONTROL) && defined(FEATURE_EL_POSITION_PULSE_INPUT)
elevation = int(configuration.last_elevation * HEADING_MULTIPLIER);
el_position_pulse_input_elevation = configuration.last_elevation;
#endif // FEATURE_EL_POSITION_PULSE_INPUT
#if defined(FEATURE_AZ_POSITION_PULSE_INPUT) || defined(FEATURE_AZ_POSITION_ROTARY_ENCODER)
configuration.azimuth_offset = 0;
#endif
#if defined(FEATURE_EL_POSITION_PULSE_INPUT) || defined(FEATURE_EL_POSITION_ROTARY_ENCODER)
configuration.elevation_offset = 0;
#endif
} else { // initialize eeprom with default values
#ifdef DEBUG_EEPROM
debug_println("read_settings_from_eeprom: uninitialized eeprom, calling initialize_eeprom_with_defaults()");
#endif // DEBUG_EEPROM
initialize_eeprom_with_defaults();
}
} /* read_settings_from_eeprom */
// --------------------------------------------------------------
void initialize_eeprom_with_defaults(){
#ifdef DEBUG_EEPROM
debug_println("initialize_eeprom_with_defaults: writing eeprom");
#endif // DEBUG_EEPROM
configuration.analog_az_full_ccw = ANALOG_AZ_FULL_CCW;
configuration.analog_az_full_cw = ANALOG_AZ_FULL_CW;
configuration.analog_el_0_degrees = ANALOG_EL_0_DEGREES;
configuration.analog_el_max_elevation = ANALOG_EL_MAX_ELEVATION;
// azimuth_starting_point = AZIMUTH_STARTING_POINT_DEFAULT;
// azimuth_rotation_capability = AZIMUTH_ROTATION_CAPABILITY_DEFAULT;
configuration.last_azimuth = raw_azimuth;
configuration.last_az_incremental_encoder_position = 0;
configuration.last_el_incremental_encoder_position = 0;
configuration.azimuth_offset = 0;
configuration.elevation_offset = 0;
#ifdef FEATURE_ELEVATION_CONTROL
configuration.last_elevation = elevation;
#else
configuration.last_elevation = 0;
#endif
write_settings_to_eeprom();
} /* initialize_eeprom_with_defaults */
// --------------------------------------------------------------
void write_settings_to_eeprom(){
#ifdef DEBUG_EEPROM
debug_println("write_settings_to_eeprom: writing settings to eeprom");
#endif // DEBUG_EEPROM
configuration.magic_number = EEPROM_MAGIC_NUMBER;
const byte * p = (const byte *)(const void *)&configuration;
unsigned int i;
int ee = 0;
for (i = 0; i < sizeof(configuration); i++) {
EEPROM.write(ee++, *p++);
}
// EEPROM_writeAnything(0,configuration);
configuration_dirty = 0;
}
// --------------------------------------------------------------
void az_check_operation_timeout(){
// check if the last executed rotation operation has been going on too long
if (((millis() - az_last_rotate_initiation) > OPERATION_TIMEOUT) && (az_state != IDLE)) {
submit_request(AZ, REQUEST_KILL, 0, 78);
#ifdef DEBUG_AZ_CHECK_OPERATION_TIMEOUT
debug_println("az_check_operation_timeout: timeout reached, aborting rotation");
#endif // DEBUG_AZ_CHECK_OPERATION_TIMEOUT
}
}
// --------------------------------------------------------------
#ifdef FEATURE_TIMED_BUFFER
void clear_timed_buffer(){
timed_buffer_status = EMPTY;
timed_buffer_number_entries_loaded = 0;
timed_buffer_entry_pointer = 0;
}
#endif // FEATURE_TIMED_BUFFER
// --------------------------------------------------------------
// #ifdef FEATURE_YAESU_EMULATION
// void yaesu_m_command(){
// int parsed_azimuth = 0;
// // parse out M command
// if (control_port_buffer_index > 4) { // if there are more than 4 characters in the command buffer, we got a timed interval command
// #ifdef FEATURE_TIMED_BUFFER
// yaesu_az_load_timed_intervals();
// #else
// control_port->println(F("Feature not activated ?>"));
// #endif // FEATURE_TIMED_BUFFER
// return;
// } else { // if there are four characters, this is just a single direction setting
// if (control_port_buffer_index == 4) {
// parsed_azimuth = ((int(control_port_buffer[1]) - 48) * 100) + ((int(control_port_buffer[2]) - 48) * 10) + (int(control_port_buffer[3]) - 48);
// #ifdef FEATURE_TIMED_BUFFER
// clear_timed_buffer();
// #endif // FEATURE_TIMED_BUFFER
// if ((parsed_azimuth > -1) && (parsed_azimuth <= (azimuth_starting_point + azimuth_rotation_capability))) {
// submit_request(AZ, REQUEST_AZIMUTH, (parsed_azimuth * HEADING_MULTIPLIER));
// return;
// }
// }
// }
// control_port->println(F("?>"));
// } /* yaesu_m_command */
// #endif // FEATURE_YAESU_EMULATION
// --------------------------------------------------------------
#ifdef FEATURE_TIMED_BUFFER
void initiate_timed_buffer(byte source_port){
if (timed_buffer_status == LOADED_AZIMUTHS) {
timed_buffer_status = RUNNING_AZIMUTHS;
submit_request(AZ, REQUEST_AZIMUTH, timed_buffer_azimuths[1], 79);
last_timed_buffer_action_time = millis();
timed_buffer_entry_pointer = 2;
#ifdef DEBUG_TIMED_BUFFER
debug_println("initiate_timed_buffer: changing state to RUNNING_AZIMUTHS");
#endif // DEBUG_TIMED_BUFFER
} else {
#ifdef FEATURE_ELEVATION_CONTROL
if (timed_buffer_status == LOADED_AZIMUTHS_ELEVATIONS) {
timed_buffer_status = RUNNING_AZIMUTHS_ELEVATIONS;
submit_request(AZ, REQUEST_AZIMUTH, timed_buffer_azimuths[1], 80);
submit_request(EL, REQUEST_ELEVATION, timed_buffer_elevations[1], 81);
last_timed_buffer_action_time = millis();
timed_buffer_entry_pointer = 2;
#ifdef DEBUG_TIMED_BUFFER
debug_println("initiate_timed_buffer: changing state to RUNNING_AZIMUTHS_ELEVATIONS");
#endif // DEBUG_TIMED_BUFFER
} else {
print_to_port(">",source_port); // error
}
#endif
}
} /* initiate_timed_buffer */
#endif // FEATURE_TIMED_BUFFER
// --------------------------------------------------------------
#ifdef FEATURE_TIMED_BUFFER
void print_timed_buffer_empty_message(){
#ifdef DEBUG_TIMED_BUFFER
debug_println("check_timed_interval: completed timed buffer; changing state to EMPTY");
#endif // DEBUG_TIMED_BUFFER
}
#endif // FEATURE_TIMED_BUFFER
// --------------------------------------------------------------
#ifdef FEATURE_TIMED_BUFFER
void check_timed_interval(){
if ((timed_buffer_status == RUNNING_AZIMUTHS) && (((millis() - last_timed_buffer_action_time) / 1000) > timed_buffer_interval_value_seconds)) {
timed_buffer_entry_pointer++;
#ifdef DEBUG_TIMED_BUFFER
debug_println("check_timed_interval: executing next timed interval step - azimuths");
#endif // DEBUG_TIMED_BUFFER
submit_request(AZ, REQUEST_AZIMUTH, timed_buffer_azimuths[timed_buffer_entry_pointer - 1], 82);
last_timed_buffer_action_time = millis();
if (timed_buffer_entry_pointer == timed_buffer_number_entries_loaded) {
clear_timed_buffer();
print_timed_buffer_empty_message();
}
}
#ifdef FEATURE_ELEVATION_CONTROL
if ((timed_buffer_status == RUNNING_AZIMUTHS_ELEVATIONS) && (((millis() - last_timed_buffer_action_time) / 1000) > timed_buffer_interval_value_seconds)) {
timed_buffer_entry_pointer++;
#ifdef DEBUG_TIMED_BUFFER
debug_println("check_timed_interval: executing next timed interval step - az and el");
#endif // DEBUG_TIMED_BUFFER
submit_request(AZ, REQUEST_AZIMUTH, timed_buffer_azimuths[timed_buffer_entry_pointer - 1], 83);
submit_request(EL, REQUEST_ELEVATION, timed_buffer_elevations[timed_buffer_entry_pointer - 1], 84);
last_timed_buffer_action_time = millis();
if (timed_buffer_entry_pointer == timed_buffer_number_entries_loaded) {
clear_timed_buffer();
print_timed_buffer_empty_message();
}
}
#endif
} /* check_timed_interval */
#endif // FEATURE_TIMED_BUFFER
// --------------------------------------------------------------
void read_azimuth(byte force_read){
unsigned int previous_raw_azimuth = raw_azimuth;
static unsigned long last_measurement_time = 0;
#ifdef FEATURE_AZ_POSITION_INCREMENTAL_ENCODER
static unsigned int incremental_encoder_previous_raw_azimuth = raw_azimuth;
#endif // FEATURE_AZ_POSITION_INCREMENTAL_ENCODER
if (heading_reading_inhibit_pin) {
if (digitalReadEnhanced(heading_reading_inhibit_pin)) {
return;
}
}
#ifdef DEBUG_HEADING_READING_TIME
static unsigned long last_time = 0;
static unsigned long last_print_time = 0;
static float average_read_time = 0;
#endif // DEBUG_HEADING_READING_TIME
#ifdef DEBUG_HH12
static unsigned long last_hh12_debug = 0;
#endif
#ifndef FEATURE_AZ_POSITION_GET_FROM_REMOTE_UNIT
if (((millis() - last_measurement_time) > AZIMUTH_MEASUREMENT_FREQUENCY_MS) || (force_read)) {
#else
if (1) {
#endif
#ifdef FEATURE_AZ_POSITION_POTENTIOMETER
analog_az = analogReadEnhanced(rotator_analog_az);
raw_azimuth = map(analog_az, configuration.analog_az_full_ccw, configuration.analog_az_full_cw, (azimuth_starting_point * HEADING_MULTIPLIER), ((azimuth_starting_point + azimuth_rotation_capability) * HEADING_MULTIPLIER));
//raw_azimuth = map(analog_az* HEADING_MULTIPLIER, configuration.analog_az_full_ccw* HEADING_MULTIPLIER, configuration.analog_az_full_cw* HEADING_MULTIPLIER, (azimuth_starting_point * HEADING_MULTIPLIER), ((azimuth_starting_point + azimuth_rotation_capability) * HEADING_MULTIPLIER));
#ifdef FEATURE_AZIMUTH_CORRECTION
raw_azimuth = (correct_azimuth(raw_azimuth / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_AZIMUTH_CORRECTION
raw_azimuth = raw_azimuth + (configuration.azimuth_offset * HEADING_MULTIPLIER);
if (AZIMUTH_SMOOTHING_FACTOR > 0) {
raw_azimuth = (raw_azimuth * (1 - (AZIMUTH_SMOOTHING_FACTOR / 100.))) + (previous_raw_azimuth * (AZIMUTH_SMOOTHING_FACTOR / 100.));
}
if (raw_azimuth >= (360 * HEADING_MULTIPLIER)) {
azimuth = raw_azimuth - (360 * HEADING_MULTIPLIER);
if (azimuth >= (360 * HEADING_MULTIPLIER)) {
azimuth = azimuth - (360 * HEADING_MULTIPLIER);
}
} else {
if (raw_azimuth < 0) {
azimuth = raw_azimuth + (360 * HEADING_MULTIPLIER);
} else {
azimuth = raw_azimuth;
}
}
#endif // FEATURE_AZ_POSITION_POTENTIOMETER
#ifdef FEATURE_AZ_POSITION_GET_FROM_REMOTE_UNIT
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
static unsigned long last_remote_unit_az_query_time = 0;
// do we have a command result waiting for us?
if (remote_unit_command_results_available == REMOTE_UNIT_AZ_COMMAND) {
#ifdef DEBUG_HEADING_READING_TIME
average_read_time = (average_read_time + (millis() - last_time)) / 2.0;
last_time = millis();
if (debug_mode) {
if ((millis() - last_print_time) > 1000) {
debug_println("read_azimuth: avg read frequency: ");
debug_print_float(average_read_time, 2);
debug_println("");
last_print_time = millis();
}
}
#endif // DEBUG_HEADING_READING_TIME
raw_azimuth = remote_unit_command_result_float * HEADING_MULTIPLIER;
#ifdef FEATURE_AZIMUTH_CORRECTION
raw_azimuth = (correct_azimuth(raw_azimuth / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_AZIMUTH_CORRECTION
raw_azimuth = raw_azimuth + (configuration.azimuth_offset * HEADING_MULTIPLIER);
if (AZIMUTH_SMOOTHING_FACTOR > 0) {
raw_azimuth = (raw_azimuth * (1 - (AZIMUTH_SMOOTHING_FACTOR / 100))) + (previous_raw_azimuth * (AZIMUTH_SMOOTHING_FACTOR / 100));
}
if (raw_azimuth >= (360 * HEADING_MULTIPLIER)) {
azimuth = raw_azimuth - (360 * HEADING_MULTIPLIER);
if (azimuth >= (360 * HEADING_MULTIPLIER)) {
azimuth = azimuth - (360 * HEADING_MULTIPLIER);
}
} else {
if (raw_azimuth < 0) {
azimuth = raw_azimuth + (360 * HEADING_MULTIPLIER);
} else {
azimuth = raw_azimuth;
}
}
remote_unit_command_results_available = 0;
} else {
// is it time to request the azimuth?
if ((millis() - last_remote_unit_az_query_time) > AZ_REMOTE_UNIT_QUERY_TIME_MS) {
if (submit_remote_command(REMOTE_UNIT_AZ_COMMAND, 0, 0)) {
last_remote_unit_az_query_time = millis();
}
}
}
#endif // defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
#endif // FEATURE_AZ_POSITION_GET_FROM_REMOTE_UNIT
#ifdef FEATURE_AZ_POSITION_ROTARY_ENCODER
static byte az_position_encoder_state = 0;
az_position_encoder_state = ttable[az_position_encoder_state & 0xf][((digitalReadEnhanced(az_rotary_position_pin2) << 1) | digitalReadEnhanced(az_rotary_position_pin1))];
byte az_position_encoder_result = az_position_encoder_state & 0x30;
if (az_position_encoder_result) {
if (az_position_encoder_result == DIR_CW) {
configuration.last_azimuth = configuration.last_azimuth + AZ_POSITION_ROTARY_ENCODER_DEG_PER_PULSE;
#ifdef DEBUG_POSITION_ROTARY_ENCODER
debug_println("read_azimuth: AZ_POSITION_ROTARY_ENCODER: CW");
#endif // DEBUG_POSITION_ROTARY_ENCODER
}
if (az_position_encoder_result == DIR_CCW) {
configuration.last_azimuth = configuration.last_azimuth - AZ_POSITION_ROTARY_ENCODER_DEG_PER_PULSE;
#ifdef DEBUG_POSITION_ROTARY_ENCODER
debug_println("read_azimuth: AZ_POSITION_ROTARY_ENCODER: CCW");
#endif // DEBUG_POSITION_ROTARY_ENCODER
}
#ifdef OPTION_AZ_POSITION_ROTARY_ENCODER_HARD_LIMIT
if (configuration.last_azimuth < azimuth_starting_point) {
configuration.last_azimuth = azimuth_starting_point;
}
if (configuration.last_azimuth > (azimuth_starting_point + azimuth_rotation_capability)) {
configuration.last_azimuth = (azimuth_starting_point + azimuth_rotation_capability);
}
#else
if (configuration.last_azimuth < 0) {
configuration.last_azimuth += 360;
}
if (configuration.last_azimuth >= 360) {
configuration.last_azimuth -= 360;
}
#endif // OPTION_AZ_POSITION_ROTARY_ENCODER_HARD_LIMIT
raw_azimuth = int(configuration.last_azimuth * HEADING_MULTIPLIER);
#ifdef FEATURE_AZIMUTH_CORRECTION
raw_azimuth = (correct_azimuth(raw_azimuth / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_AZIMUTH_CORRECTION
if (raw_azimuth >= (360 * HEADING_MULTIPLIER)) {
azimuth = raw_azimuth - (360 * HEADING_MULTIPLIER);
} else {
azimuth = raw_azimuth;
}
configuration_dirty = 1;
}
#endif // FEATURE_AZ_POSITION_ROTARY_ENCODER
#ifdef FEATURE_AZ_POSITION_HMC5883L
MagnetometerScaled scaled = compass.ReadScaledAxis(); // scaled values from compass.
#ifdef DEBUG_HMC5883L
debug_print("read_azimuth: HMC5883L x:");
debug_print_float(scaled.XAxis,4);
debug_print(" y:");
debug_print_float(scaled.YAxis,4);
debug_println("");
#endif //DEBUG_HMC5883L
float heading = atan2(scaled.YAxis, scaled.XAxis);
// heading += declinationAngle;
// Correct for when signs are reversed.
if (heading < 0) heading += 2 * PI;
if (heading > 2 * PI) heading -= 2 * PI;
raw_azimuth = (heading * RAD_TO_DEG) * HEADING_MULTIPLIER; // radians to degree
if (AZIMUTH_SMOOTHING_FACTOR > 0) {
raw_azimuth = (raw_azimuth * (1 - (AZIMUTH_SMOOTHING_FACTOR / 100))) + (previous_raw_azimuth * (AZIMUTH_SMOOTHING_FACTOR / 100));
}
#ifdef FEATURE_AZIMUTH_CORRECTION
raw_azimuth = (correct_azimuth(raw_azimuth / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_AZIMUTH_CORRECTION
raw_azimuth = raw_azimuth + (configuration.azimuth_offset * HEADING_MULTIPLIER);
azimuth = raw_azimuth;
#endif // FEATURE_AZ_POSITION_HMC5883L
#ifdef FEATURE_AZ_POSITION_LSM303
lsm.read();
float heading = atan2(lsm.magData.y, lsm.magData.x);
// heading += declinationAngle;
// Correct for when signs are reversed.
if (heading < 0) heading += 2 * PI;
if (heading > 2 * PI) heading -= 2 * PI;
raw_azimuth = (heading * RAD_TO_DEG) * HEADING_MULTIPLIER; // radians to degree
#ifdef FEATURE_AZIMUTH_CORRECTION
raw_azimuth = (correct_azimuth(raw_azimuth / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_AZIMUTH_CORRECTION
raw_azimuth = raw_azimuth + (configuration.azimuth_offset * HEADING_MULTIPLIER);
if (AZIMUTH_SMOOTHING_FACTOR > 0) {
raw_azimuth = (raw_azimuth * (1 - (AZIMUTH_SMOOTHING_FACTOR / 100))) + (previous_raw_azimuth * (AZIMUTH_SMOOTHING_FACTOR / 100));
}
azimuth = raw_azimuth;
#endif // FEATURE_AZ_POSITION_LSM303
#ifdef FEATURE_AZ_POSITION_PULSE_INPUT
#ifdef DEBUG_POSITION_PULSE_INPUT
// if (az_position_pule_interrupt_handler_flag) {
// control_port->print(F("read_azimuth: az_position_pusle_interrupt_handler_flag: "));
// control_port->println(az_position_pule_interrupt_handler_flag);
// az_position_pule_interrupt_handler_flag = 0;
// }
#endif // DEBUG_POSITION_PULSE_INPUT
static float last_az_position_pulse_input_azimuth = az_position_pulse_input_azimuth;
if (az_position_pulse_input_azimuth != last_az_position_pulse_input_azimuth) {
#ifdef DEBUG_POSITION_PULSE_INPUT
// if (debug_mode){
// control_port->print(F("read_azimuth: last_az_position_pulse_input_azimuth:"));
// control_port->print(last_az_position_pulse_input_azimuth);
// control_port->print(F(" az_position_pulse_input_azimuth:"));
// control_port->print(az_position_pulse_input_azimuth);
// control_port->print(F(" az_pulse_counter:"));
// control_port->println(az_pulse_counter);
// }
#endif // DEBUG_POSITION_PULSE_INPUT
configuration.last_azimuth = az_position_pulse_input_azimuth;
configuration_dirty = 1;
last_az_position_pulse_input_azimuth = az_position_pulse_input_azimuth;
raw_azimuth = int(configuration.last_azimuth * HEADING_MULTIPLIER);
#ifdef FEATURE_AZIMUTH_CORRECTION
raw_azimuth = (correct_azimuth(raw_azimuth / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_AZIMUTH_CORRECTION
raw_azimuth = raw_azimuth + (configuration.azimuth_offset * HEADING_MULTIPLIER);
if (raw_azimuth >= (360 * HEADING_MULTIPLIER)) {
azimuth = raw_azimuth - (360 * HEADING_MULTIPLIER);
} else {
azimuth = raw_azimuth;
}
}
#endif // FEATURE_AZ_POSITION_PULSE_INPUT
#ifdef FEATURE_AZ_POSITION_HH12_AS5045_SSI
raw_azimuth = int(azimuth_hh12.heading() * HEADING_MULTIPLIER);
#ifdef DEBUG_HH12
if ((millis() - last_hh12_debug) > 5000) {
control_port->print(F("read_azimuth: HH-12 raw: "));
control_port->println(raw_azimuth);
last_hh12_debug = millis();
}
#endif // DEBUG_HH12
#ifdef FEATURE_AZIMUTH_CORRECTION
raw_azimuth = (correct_azimuth(raw_azimuth / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_AZIMUTH_CORRECTION
raw_azimuth = raw_azimuth + (configuration.azimuth_offset * HEADING_MULTIPLIER);
azimuth = raw_azimuth;
#endif // FEATURE_AZ_POSITION_HH12_AS5045_SSI
#ifdef FEATURE_AZ_POSITION_INCREMENTAL_ENCODER
if (AZIMUTH_STARTING_POINT_DEFAULT == 0) {
raw_azimuth = (((((az_incremental_encoder_position) / (AZ_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.)) * 360.0)) * HEADING_MULTIPLIER);
} else {
if (az_incremental_encoder_position > (AZ_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.)) {
raw_azimuth = (((((az_incremental_encoder_position - (AZ_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.)) / (AZ_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.)) * 360.0)) * HEADING_MULTIPLIER);
} else {
raw_azimuth = (((((az_incremental_encoder_position + (AZ_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.)) / (AZ_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.)) * 360.0)) * HEADING_MULTIPLIER);
}
}
#ifdef FEATURE_AZIMUTH_CORRECTION
raw_azimuth = (correct_azimuth(raw_azimuth / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_AZIMUTH_CORRECTION
raw_azimuth = raw_azimuth + (configuration.azimuth_offset * HEADING_MULTIPLIER);
if (raw_azimuth >= (360 * HEADING_MULTIPLIER)) {
azimuth = raw_azimuth - (360 * HEADING_MULTIPLIER);
} else {
azimuth = raw_azimuth;
}
if (raw_azimuth != incremental_encoder_previous_raw_azimuth) {
configuration.last_az_incremental_encoder_position = az_incremental_encoder_position;
configuration_dirty = 1;
incremental_encoder_previous_raw_azimuth = raw_azimuth;
}
#endif // FEATURE_AZ_POSITION_INCREMENTAL_ENCODER
last_measurement_time = millis();
}
} /* read_azimuth */
// --------------------------------------------------------------
void output_debug(){
#ifdef DEBUG_DUMP
char tempstring[32] = "";
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
if (((millis() - last_debug_output_time) >= 3000) && (debug_mode)) {
#ifdef DEBUG_GPS_SERIAL
debug_println("");
#endif //DEBUG_GPS_SERIAL
//port_flush();
debug_print("debug: \t");
debug_print(CODE_VERSION);
debug_print("\t\t");
#ifdef FEATURE_CLOCK
update_time();
sprintf(tempstring, "%s", clock_string());
debug_print(tempstring);
#else // FEATURE_CLOCK
dtostrf((millis() / 1000),0,0,tempstring);
debug_print(tempstring);
#endif // FEATURE_CLOCK
#if defined(FEATURE_GPS) || defined(FEATURE_RTC) || (defined(FEATURE_CLOCK) && defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE))
debug_print("\t");
debug_print(clock_status_string());
#endif // defined(FEATURE_GPS) || defined(FEATURE_RTC) || (defined(FEATURE_CLOCK) && defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE))
#if defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
debug_print("\t");
sprintf(tempstring, "%s", coordinate_string());
debug_print(tempstring);
debug_print(" ");
debug_print(coordinates_to_maidenhead(latitude,longitude));
#endif
debug_print("\t\t");
#ifdef DEBUG_MEMORY
void * HP = malloc(4);
if (HP) {free(HP);}
unsigned long free = (unsigned long)SP - (unsigned long)HP;
sprintf(tempstring,"%lu",(unsigned long)free);
debug_print(tempstring);
debug_print("b free");
#endif //DEBUG_MEMORY
#ifdef FEATURE_YAESU_EMULATION
debug_print("\t\tGS-232");
#ifdef OPTION_GS_232B_EMULATION
debug_print("B");
#else
debug_print("A");
#endif
#endif // FEATURE_YAESU_EMULATION
#ifdef FEATURE_PARK
switch (park_status) {
case NOT_PARKED: debug_print("\tNOT_PARKED"); break;
case PARK_INITIATED: debug_print("\tPARK_INITIATED"); break;
case PARKED: debug_print("\tPARKED"); break;
}
#endif // FEATURE_PARK
debug_print("\n");
debug_print("\tAZ: ");
switch (az_state) {
case IDLE: debug_print("IDLE"); break;
#ifndef HARDWARE_EA4TX_ARS_USB
case SLOW_START_CW: debug_print("SLOW_START_CW"); break;
case SLOW_START_CCW: debug_print("SLOW_START_CCW"); break;
#endif //ifndef HARDWARE_EA4TX_ARS_USB
case NORMAL_CW: debug_print("NORMAL_CW"); break;
case NORMAL_CCW: debug_print("NORMAL_CCW"); break;
#ifndef HARDWARE_EA4TX_ARS_USB
case SLOW_DOWN_CW: debug_print("SLOW_DOWN_CW"); break;
case SLOW_DOWN_CCW: debug_print("SLOW_DOWN_CCW"); break;
case INITIALIZE_SLOW_START_CW: debug_print("INITIALIZE_SLOW_START_CW"); break;
case INITIALIZE_SLOW_START_CCW: debug_print("INITIALIZE_SLOW_START_CCW"); break;
case INITIALIZE_TIMED_SLOW_DOWN_CW: debug_print("INITIALIZE_TIMED_SLOW_DOWN_CW"); break;
case INITIALIZE_TIMED_SLOW_DOWN_CCW: debug_print("INITIALIZE_TIMED_SLOW_DOWN_CCW"); break;
case TIMED_SLOW_DOWN_CW: debug_print("TIMED_SLOW_DOWN_CW"); break;
case TIMED_SLOW_DOWN_CCW: debug_print("TIMED_SLOW_DOWN_CCW"); break;
case INITIALIZE_DIR_CHANGE_TO_CW: debug_print("INITIALIZE_DIR_CHANGE_TO_CW"); break;
case INITIALIZE_DIR_CHANGE_TO_CCW: debug_print("INITIALIZE_DIR_CHANGE_TO_CCW"); break;
case INITIALIZE_NORMAL_CW: debug_print("INITIALIZE_NORMAL_CW"); break;
case INITIALIZE_NORMAL_CCW: debug_print("INITIALIZE_NORMAL_CCW"); break;
#endif //ifndef HARDWARE_EA4TX_ARS_USB
}
debug_print("\tQ: ");
switch (az_request_queue_state) {
case NONE: debug_print("-"); break;
case IN_QUEUE: debug_print("IN_QUEUE"); break;
case IN_PROGRESS_TIMED: debug_print("IN_PROGRESS_TIMED"); break;
case IN_PROGRESS_TO_TARGET: debug_print("IN_PROGRESS_TO_TARGET"); break;
}
debug_print(" AZ: ");
debug_print_float((azimuth / LCD_HEADING_MULTIPLIER), LCD_DECIMAL_PLACES);
debug_print(" (raw: ");
debug_print_float((raw_azimuth / LCD_HEADING_MULTIPLIER), LCD_DECIMAL_PLACES);
debug_print(")");
if (az_state != IDLE) {
debug_print(" Target: ");
debug_print_float((target_azimuth / LCD_HEADING_MULTIPLIER), LCD_DECIMAL_PLACES);
debug_print(" (raw: ");
debug_print_float((target_raw_azimuth / LCD_HEADING_MULTIPLIER), LCD_DECIMAL_PLACES);
debug_print(")");
debug_print(" Secs_left: ");
debug_print_int((OPERATION_TIMEOUT - (millis() - az_last_rotate_initiation)) / 1000);
}
#ifdef FEATURE_AZ_POSITION_POTENTIOMETER
debug_print(" Analog: ");
dtostrf(analog_az,0,0,tempstring);
debug_print(tempstring);
debug_print(" (");
dtostrf(configuration.analog_az_full_ccw,0,0,tempstring);
debug_print(tempstring);
debug_print("-");
dtostrf(configuration.analog_az_full_cw,0,0,tempstring);
debug_print(tempstring);
debug_print(") ");
#endif // FEATURE_AZ_POSITION_POTENTIOMETER
debug_print("\t[");
debug_print_int(azimuth_starting_point);
debug_print("+");
debug_print_int(azimuth_rotation_capability);
debug_print("]");
#ifndef HARDWARE_EA4TX_ARS_USB
debug_print(" AZ Speed Norm: ");
debug_print_int(normal_az_speed_voltage);
debug_print(" Current: ");
debug_print_int(current_az_speed_voltage);
if (az_speed_pot) {
debug_print(" AZ Speed Pot: ");
debug_print_int(analogReadEnhanced(az_speed_pot));
}
if (az_preset_pot) {
debug_print(" AZ Preset Pot Analog: ");
debug_print_int(analogReadEnhanced(az_preset_pot));
debug_print(" AZ Preset Pot Setting: ");
dtostrf((map(analogReadEnhanced(az_preset_pot), AZ_PRESET_POT_FULL_CW, AZ_PRESET_POT_FULL_CCW, AZ_PRESET_POT_FULL_CW_MAP, AZ_PRESET_POT_FULL_CCW_MAP)),0,0,tempstring);
debug_print(tempstring);
}
debug_print("\tOffset: ");
dtostrf(configuration.azimuth_offset,0,2,tempstring);
debug_print(tempstring);
#endif // ndef HARDWARE_EA4TX_ARS_USB
debug_println("");
#ifdef FEATURE_ELEVATION_CONTROL
debug_print("\tEL: ");
switch (el_state) {
case IDLE: debug_print("IDLE"); break;
#ifndef HARDWARE_EA4TX_ARS_USB
case SLOW_START_UP: debug_print("SLOW_START_UP"); break;
case SLOW_START_DOWN: debug_print("SLOW_START_DOWN"); break;
#endif //ifndef HARDWARE_EA4TX_ARS_USB
case NORMAL_UP: debug_print("NORMAL_UP"); break;
case NORMAL_DOWN: debug_print("NORMAL_DOWN"); break;
#ifndef HARDWARE_EA4TX_ARS_USB
case SLOW_DOWN_DOWN: debug_print("SLOW_DOWN_DOWN"); break;
case SLOW_DOWN_UP: debug_print("SLOW_DOWN_UP"); break;
case TIMED_SLOW_DOWN_UP: debug_print("TIMED_SLOW_DOWN_UP"); break;
case TIMED_SLOW_DOWN_DOWN: debug_print("TIMED_SLOW_DOWN_DOWN"); break;
#endif //ifndef HARDWARE_EA4TX_ARS_USB
}
debug_print("\tQ: ");
switch (el_request_queue_state) {
case NONE: debug_print("-"); break;
case IN_QUEUE: debug_print("IN_QUEUE"); break;
case IN_PROGRESS_TIMED: debug_print("IN_PROGRESS_TIMED"); break;
case IN_PROGRESS_TO_TARGET: debug_print("IN_PROGRESS_TO_TARGET"); break;
}
debug_print(" EL: ");
dtostrf(elevation / LCD_HEADING_MULTIPLIER, 0, LCD_DECIMAL_PLACES,tempstring);
debug_print(tempstring);
if (el_state != IDLE) {
debug_print("\tTarget: ");
dtostrf(target_elevation / LCD_HEADING_MULTIPLIER, 0, LCD_DECIMAL_PLACES,tempstring);
debug_print(tempstring);
}
#ifdef FEATURE_EL_POSITION_POTENTIOMETER
debug_print("\tEL Analog: ");
dtostrf(analog_el,0,0,tempstring);
debug_print(tempstring);
debug_print(" (");
dtostrf(configuration.analog_el_0_degrees,0,0,tempstring);
debug_print(tempstring);
debug_print("-");
dtostrf(configuration.analog_el_max_elevation,0,0,tempstring);
debug_print(tempstring);
debug_print(") ");
#endif // FEATURE_EL_POSITION_POTENTIOMETER
#ifndef HARDWARE_EA4TX_ARS_USB
debug_print(" EL Speed Norm: ");
debug_print_int(normal_el_speed_voltage);
debug_print(" Current: ");
debug_print_int(current_el_speed_voltage);
debug_print("\tOffset: ");
debug_print_float(configuration.elevation_offset, 2);
#endif //ifndef HARDWARE_EA4TX_ARS_USB
debug_println("");
#endif // FEATURE_ELEVATION_CONTROL
//port_flush();
#ifdef FEATURE_TIMED_BUFFER
if (timed_buffer_status != EMPTY) {
debug_print("\tTimed interval buff: ");
switch (timed_buffer_status) {
// case EMPTY: debug_print("EMPTY"); break;
case LOADED_AZIMUTHS: debug_print("LOADED_AZIMUTHS"); break;
case RUNNING_AZIMUTHS: debug_print("RUNNING_AZIMUTHS"); break;
#ifdef FEATURE_ELEVATION_CONTROL
case LOADED_AZIMUTHS_ELEVATIONS: debug_print("LOADED_AZIMUTHS_ELEVATIONS"); break;
case RUNNING_AZIMUTHS_ELEVATIONS: debug_print("RUNNING_AZIMUTHS_ELEVATIONS"); break;
#endif
}
debug_print("\tInterval (secs): ");
debug_print_int(timed_buffer_interval_value_seconds);
debug_print("\tEntries: ");
debug_print_int(timed_buffer_number_entries_loaded);
debug_print("\tEntry ptr: ");
debug_print_int(timed_buffer_entry_pointer);
debug_print("\tSecs since last action: ");
debug_print_int((millis() - last_timed_buffer_action_time) / 1000);
if (timed_buffer_number_entries_loaded > 0) {
for (int x = 0; x < timed_buffer_number_entries_loaded; x++) {
debug_print_int(x + 1);
debug_print("\t:");
debug_print_int(timed_buffer_azimuths[x] / HEADING_MULTIPLIER);
#ifdef FEATURE_ELEVATION_CONTROL
debug_print("\t- ");
debug_print_int(timed_buffer_elevations[x] / HEADING_MULTIPLIER);
#endif
debug_print("\n");
}
debug_println("");
}
} // if (timed_buffer_status != EMPTY)
#endif // FEATURE_TIMED_BUFFER
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
/*debug_print("\tRemote Slave: Command: ");
debug_print_int(remote_unit_command_submitted);*/
debug_print("\tRemote Slave: Good: ");
debug_print_float(remote_unit_good_results,0);
debug_print(" Bad: ");
debug_print_int(remote_unit_bad_results);
/*debug_print(" Index: ");
debug_print_int(remote_unit_port_buffer_index);*/
debug_print(" CmdTouts: ");
debug_print_int(remote_unit_command_timeouts);
debug_print(" BuffTouts: ");
debug_print_int(remote_unit_incoming_buffer_timeouts);
/*debug_print(" Result: ");
debug_print_float(remote_unit_command_result_float,2);*/
debug_println("");
#endif // defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
#if defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
debug_print("\tEthernet Slave TCP Link State: ");
switch(ethernetslavelinkclient0_state){
case ETHERNET_SLAVE_DISCONNECTED: debug_print("DIS");
case ETHERNET_SLAVE_CONNECTED: debug_print("CONNECTED");
}
debug_print(" Reconnects: ");
debug_print_int(ethernet_slave_reconnects);
debug_println("");
#endif // defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
#ifdef DEBUG_POSITION_PULSE_INPUT
static unsigned long last_pulse_count_time = 0;
static unsigned long last_az_pulse_counter = 0;
static unsigned long last_el_pulse_counter = 0;
debug_print("\tPulse counters: AZ: ");
debug_print_int(az_pulse_counter);
debug_print(" AZ Ambiguous: ");
debug_print_int(az_pulse_counter_ambiguous);
debug_print(" EL: ");
debug_print_int(el_pulse_counter);
debug_print(" EL Ambiguous: ");
debug_print_int(el_pulse_counter_ambiguous);
debug_print(" Rate per sec: AZ: ");
debug_print_float(((az_pulse_counter - last_az_pulse_counter) / ((millis() - last_pulse_count_time) / 1000.0)),2);
debug_print(" EL: ");
debug_print_float(((el_pulse_counter - last_el_pulse_counter) / ((millis() - last_pulse_count_time) / 1000.0)),2);
debug_println("");
last_az_pulse_counter = az_pulse_counter;
last_el_pulse_counter = el_pulse_counter;
last_pulse_count_time = millis();
#endif // DEBUG_POSITION_PULSE_INPUT
#if defined(FEATURE_AZ_POSITION_INCREMENTAL_ENCODER) && defined(DEBUG_AZ_POSITION_INCREMENTAL_ENCODER)
debug_print("\taz_position_incremental_encoder_interrupt: ");
debug_print_int(az_position_incremental_encoder_interrupt);
debug_print("\taz_incremental_encoder_position: ");
debug_print_int(az_incremental_encoder_position);
#endif // DEBUG_AZ_POSITION_INCREMENTAL_ENCODER
#if defined(FEATURE_EL_POSITION_INCREMENTAL_ENCODER) && defined(DEBUG_EL_POSITION_INCREMENTAL_ENCODER)
debug_print("\n\tel_position_incremental_encoder_interrupt: ");
debug_print_int(el_position_incremental_encoder_interrupt);
debug_print("\tel_incremental_encoder_position: ");
debug_print(el_incremental_encoder_position);
#endif // DEBUG_EL_POSITION_INCREMENTAL_ENCODER
#if (defined(FEATURE_AZ_POSITION_INCREMENTAL_ENCODER) && defined(DEBUG_AZ_POSITION_INCREMENTAL_ENCODER)) || (defined(FEATURE_EL_POSITION_INCREMENTAL_ENCODER) && defined(DEBUG_EL_POSITION_INCREMENTAL_ENCODER))
debug_println("");
#endif
#ifdef FEATURE_MOON_TRACKING
update_moon_position();
debug_print(moon_status_string());
#endif // FEATURE_MOON_TRACKING
#ifdef FEATURE_SUN_TRACKING
update_sun_position();
debug_print(sun_status_string());
#endif // FEATURE_SUN_TRACKING
#if defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
debug_println("");
#endif //defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
#ifdef FEATURE_GPS
unsigned long gps_chars = 0;
unsigned short gps_good_sentences = 0;
unsigned short gps_failed_checksum = 0;
char gps_temp_string[12] = "";
float gps_lat_temp = 0;
float gps_long_temp = 0;
debug_print("\tGPS: satellites: ");
gps_chars = gps.satellites();
if (gps_chars == 255){gps_chars = 0;}
dtostrf(gps_chars,0,0,gps_temp_string);
debug_print(gps_temp_string);
unsigned long gps_fix_age_temp = 0;
gps.f_get_position(&gps_lat_temp,&gps_long_temp,&gps_fix_age_temp);
debug_print(" lat: ");
debug_print_float(gps_lat_temp,4);
debug_print(" long: ");
debug_print_float(gps_long_temp,4);
debug_print(" fix age (mS): ");
dtostrf(gps_fix_age_temp,0,0,gps_temp_string);
debug_print(gps_temp_string);
gps.stats(&gps_chars,&gps_good_sentences,&gps_failed_checksum);
debug_print(" data chars: ");
dtostrf(gps_chars,0,0,gps_temp_string);
debug_print(gps_temp_string);
debug_print(" good sentences: ");
dtostrf(gps_good_sentences,0,0,gps_temp_string);
debug_print(gps_temp_string);
debug_print(" failed checksum: ");
dtostrf(gps_failed_checksum,0,0,gps_temp_string);
debug_print(gps_temp_string);
debug_println("");
#endif //FEATURE_GPS
debug_println("\n\n\n");
//port_flush();
last_debug_output_time = millis();
#endif //DEBUG_DUMP
}
#endif // defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
} /* output_debug */
// --------------------------------------------------------------
// void report_current_azimuth() {
// #ifdef FEATURE_YAESU_EMULATION
// // The C command that reports azimuth
// String azimuth_string;
// #ifndef OPTION_GS_232B_EMULATION
// control_port->print(F("+0"));
// #endif
// #ifdef OPTION_GS_232B_EMULATION
// control_port->print(F("AZ="));
// #endif
// // control_port->write("report_current_azimith: azimuth=");
// // control_port->println(azimuth);
// azimuth_string = String(int(azimuth / HEADING_MULTIPLIER), DEC);
// if (azimuth_string.length() == 1) {
// control_port->print(F("00"));
// } else {
// if (azimuth_string.length() == 2) {
// control_port->print(F("0"));
// }
// }
// control_port->print(azimuth_string);
// #ifdef FEATURE_ELEVATION_CONTROL
// #ifndef OPTION_C_COMMAND_SENDS_AZ_AND_EL
// if ((control_port_buffer[1] == '2') && (control_port_buffer_index > 1)) { // did we get the C2 command?
// #endif
// report_current_elevation();
// #ifndef OPTION_C_COMMAND_SENDS_AZ_AND_EL
// } else {
// control_port->println();
// }
// #endif // OPTION_C_COMMAND_SENDS_AZ_AND_EL
// #endif // FEATURE_ELEVATION_CONTROL
// #ifndef FEATURE_ELEVATION_CONTROL
// if ((control_port_buffer[1] == '2') && (control_port_buffer_index > 1)) { // did we get the C2 command?
// #ifndef OPTION_GS_232B_EMULATION
// control_port->println(F("+0000")); // return a dummy elevation since we don't have the elevation feature turned on
// #else
// control_port->println(F("EL=000"));
// #endif
// } else {
// control_port->println();
// }
// #endif // FEATURE_ELEVATION_CONTROL
// #endif // FEATURE_YAESU_EMULATION
// }
// --------------------------------------------------------------
void print_to_port(char * print_this,byte port){
switch(port){
case CONTROL_PORT0: control_port->println(print_this);break;
#ifdef FEATURE_ETHERNET
case ETHERNET_PORT0: ethernetclient0.print(print_this); break;
#ifdef ETHERNET_TCP_PORT_1
case ETHERNET_PORT1: ethernetclient1.print(print_this); break;
#endif //ETHERNET_TCP_PORT_1
#endif //FEATURE_ETHERNET
}
}
// --------------------------------------------------------------
void print_help(byte port){
// The H command
#if defined(OPTION_SERIAL_HELP_TEXT) && defined(FEATURE_YAESU_EMULATION)
print_to_port("R Rotate Azimuth Clockwise\n",port);
print_to_port("L Rotate Azimuth Counter Clockwise\n",port);
print_to_port("A Stop\n",port);
print_to_port("C Report Azimuth in Degrees\n",port);
print_to_port("M### Rotate to ### degrees\n",port);
print_to_port("MTTT XXX XXX XXX ... Timed Interval Direction Setting (TTT = Step value in seconds, XXX = Azimuth in degrees)\n",port);
print_to_port("T Start Timed Interval Tracking\n",port);
print_to_port("N Report Total Number of M Timed Interval Azimuths\n",port);
print_to_port("X1 Horizontal Rotation Low Speed\n",port);
print_to_port("X2 Horizontal Rotation Middle 1 Speed\n",port);
print_to_port("X3 Horizontal Rotation Middle 2 Speed\n",port);
print_to_port("X4 Horizontal Rotation High Speed\n",port);
print_to_port("S Stop\n",port);
print_to_port("O Offset Calibration\n",port);
print_to_port("F Full Scale Calibration\n",port);
#ifdef FEATURE_ELEVATION_CONTROL
print_to_port("U Rotate Elevation Up\n",port);
print_to_port("D Rotate Elevation Down\n",port);
print_to_port("E Stop Elevation Rotation\n",port);
print_to_port("B Report Elevation in Degrees\n",port);
print_to_port("Wxxx yyy Rotate Azimuth to xxx Degrees and Elevation to yyy Degrees\n",port);
print_to_port("O2 Elevation Offset Calibration (0 degrees)\n",port);
print_to_port("F2 Elevation Full Scale Calibration (180 degrees (or maximum))\n",port);
#endif // FEATURE_ELEVATION_CONTROL
#endif // defined(OPTION_SERIAL_HELP_TEXT) && defined(FEATURE_YAESU_EMULATION)
} /* print_help */
// --------------- Elevation -----------------------
#ifdef FEATURE_ELEVATION_CONTROL
void el_check_operation_timeout(){
// check if the last executed rotation operation has been going on too long
if (((millis() - el_last_rotate_initiation) > OPERATION_TIMEOUT) && (el_state != IDLE)) {
submit_request(EL, REQUEST_KILL, 0, 85);
#ifdef DEBUG_EL_CHECK_OPERATION_TIMEOUT
if (debug_mode) {
control_port->println(F("el_check_operation_timeout: timeout reached, aborting rotation"));
}
#endif // DEBUG_EL_CHECK_OPERATION_TIMEOUT
}
}
#endif
// --------------------------------------------------------------
// #ifdef FEATURE_YAESU_EMULATION
// void yaesu_w_command(){
// // parse out W command
// // Short Format: WXXX YYY = azimuth YYY = elevation
// // Long Format : WSSS XXX YYY SSS = timed interval XXX = azimuth YYY = elevation
// int parsed_elevation = 0;
// int parsed_azimuth = 0;
// #ifdef FEATURE_TIMED_BUFFER
// int parsed_value1 = 0;
// int parsed_value2 = 0;
// #endif //FEATURE_TIMED_BUFFER
// if (control_port_buffer_index > 8) { // if there are more than 4 characters in the command buffer, we got a timed interval command
// #if defined(FEATURE_TIMED_BUFFER) && defined(FEATURE_ELEVATION_CONTROL)
// parsed_value1 = ((int(control_port_buffer[1]) - 48) * 100) + ((int(control_port_buffer[2]) - 48) * 10) + (int(control_port_buffer[3]) - 48);
// if ((parsed_value1 > 0) && (parsed_value1 < 1000)) {
// timed_buffer_interval_value_seconds = parsed_value1;
// for (int x = 5; x < control_port_buffer_index; x = x + 8) {
// parsed_value1 = ((int(control_port_buffer[x]) - 48) * 100) + ((int(control_port_buffer[x + 1]) - 48) * 10) + (int(control_port_buffer[x + 2]) - 48);
// parsed_value2 = ((int(control_port_buffer[x + 4]) - 48) * 100) + ((int(control_port_buffer[x + 5]) - 48) * 10) + (int(control_port_buffer[x + 6]) - 48);
// if ((parsed_value1 > -1) && (parsed_value1 < 361) && (parsed_value2 > -1) && (parsed_value2 < 181)) { // is it a valid azimuth?
// timed_buffer_azimuths[timed_buffer_number_entries_loaded] = (parsed_value1 * HEADING_MULTIPLIER);
// timed_buffer_elevations[timed_buffer_number_entries_loaded] = (parsed_value2 * HEADING_MULTIPLIER);
// timed_buffer_number_entries_loaded++;
// timed_buffer_status = LOADED_AZIMUTHS_ELEVATIONS;
// if (timed_buffer_number_entries_loaded > TIMED_INTERVAL_ARRAY_SIZE) { // is the array full?
// x = control_port_buffer_index; // array is full, go to the first azimuth and elevation
// }
// } else { // we hit an invalid bearing
// timed_buffer_status = EMPTY;
// timed_buffer_number_entries_loaded = 0;
// control_port->println(F("?>")); // error
// return;
// }
// }
// }
// timed_buffer_entry_pointer = 1; // go to the first bearings
// parsed_azimuth = timed_buffer_azimuths[0];
// parsed_elevation = timed_buffer_elevations[0];
// #else /* ifdef FEATURE_TIMED_BUFFER */
// control_port->println(F("Feature not activated ?>"));
// #endif // FEATURE_TIMED_BUFFER
// } else {
// // this is a short form W command, just parse the azimuth and elevation and initiate rotation
// parsed_azimuth = (((int(control_port_buffer[1]) - 48) * 100) + ((int(control_port_buffer[2]) - 48) * 10) + (int(control_port_buffer[3]) - 48)) * HEADING_MULTIPLIER;
// parsed_elevation = (((int(control_port_buffer[5]) - 48) * 100) + ((int(control_port_buffer[6]) - 48) * 10) + (int(control_port_buffer[7]) - 48)) * HEADING_MULTIPLIER;
// }
// if ((parsed_azimuth >= 0) && (parsed_azimuth <= (360 * HEADING_MULTIPLIER))) {
// submit_request(AZ, REQUEST_AZIMUTH, parsed_azimuth);
// } else {
// #ifdef DEBUG_YAESU
// if (debug_mode) {
// control_port->println(F("yaesu_w_command: W command elevation error"));
// }
// #endif // DEBUG_YAESU
// control_port->println(F("?>")); // bogus elevation - return and error and don't do anything
// return;
// }
// #ifdef FEATURE_ELEVATION_CONTROL
// if ((parsed_elevation >= 0) && (parsed_elevation <= (180 * HEADING_MULTIPLIER))) {
// submit_request(EL, REQUEST_ELEVATION, parsed_elevation);
// } else {
// #ifdef DEBUG_YAESU
// if (debug_mode) {
// control_port->println(F("yaesu_w_command: W command elevation error"));
// }
// #endif // DEBUG_YAESU
// control_port->println(F("?>")); // bogus elevation - return and error and don't do anything
// return;
// }
// #endif // FEATURE_ELEVATION_CONTROL
// control_port->println();
// } /* yaesu_w_command */
// #endif // FEATURE_YAESU_EMULATION
// --------------------------------------------------------------
#ifdef FEATURE_ELEVATION_CONTROL
void read_elevation(byte force_read){
// read analog input and convert it to degrees
unsigned int previous_elevation = elevation;
static unsigned long last_measurement_time = 0;
#ifdef FEATURE_EL_POSITION_INCREMENTAL_ENCODER
static unsigned int incremental_encoder_previous_elevation = elevation;
#endif
if (heading_reading_inhibit_pin) {
if (digitalReadEnhanced(heading_reading_inhibit_pin)) {
return;
}
}
#ifdef DEBUG_HEADING_READING_TIME
static unsigned long last_time = 0;
static unsigned long last_print_time = 0;
static float average_read_time = 0;
#endif // DEBUG_HEADING_READING_TIME
#ifdef DEBUG_HH12
static unsigned long last_hh12_debug = 0;
#endif // DEBUG_HH12
#ifndef FEATURE_EL_POSITION_GET_FROM_REMOTE_UNIT
if (((millis() - last_measurement_time) > ELEVATION_MEASUREMENT_FREQUENCY_MS) || (force_read)) {
#else
if (1) {
#endif
#ifdef FEATURE_EL_POSITION_POTENTIOMETER
analog_el = analogReadEnhanced(rotator_analog_el);
elevation = (map(analog_el, configuration.analog_el_0_degrees, configuration.analog_el_max_elevation, 0, (ELEVATION_MAXIMUM_DEGREES * HEADING_MULTIPLIER)));
#ifdef FEATURE_ELEVATION_CORRECTION
elevation = (correct_elevation(elevation / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_ELEVATION_CORRECTION
elevation = elevation + (configuration.elevation_offset * HEADING_MULTIPLIER);
if (ELEVATION_SMOOTHING_FACTOR > 0) {
elevation = (elevation * (1 - (ELEVATION_SMOOTHING_FACTOR / 100))) + (previous_elevation * (ELEVATION_SMOOTHING_FACTOR / 100));
}
if (elevation < 0) {
elevation = 0;
}
#endif // FEATURE_EL_POSITION_POTENTIOMETER
#ifdef FEATURE_EL_POSITION_ROTARY_ENCODER
static byte el_position_encoder_state = 0;
el_position_encoder_state = ttable[el_position_encoder_state & 0xf][((digitalReadEnhanced(el_rotary_position_pin2) << 1) | digitalReadEnhanced(el_rotary_position_pin1))];
byte el_position_encoder_result = el_position_encoder_state & 0x30;
if (el_position_encoder_result) {
if (el_position_encoder_result == DIR_CW) {
configuration.last_elevation = configuration.last_elevation + EL_POSITION_ROTARY_ENCODER_DEG_PER_PULSE;
#ifdef DEBUG_POSITION_ROTARY_ENCODER
if (debug_mode) {
control_port->println(F("read_elevation: EL_POSITION_ROTARY_ENCODER: CW/UP"));
}
#endif // DEBUG_POSITION_ROTARY_ENCODER
}
if (el_position_encoder_result == DIR_CCW) {
configuration.last_elevation = configuration.last_elevation - EL_POSITION_ROTARY_ENCODER_DEG_PER_PULSE;
#ifdef DEBUG_POSITION_ROTARY_ENCODER
if (debug_mode) {
control_port->println(F("read_elevation: EL_POSITION_ROTARY_ENCODER: CCW/DWN"));
}
#endif // DEBUG_POSITION_ROTARY_ENCODER
}
#ifdef OPTION_EL_POSITION_ROTARY_ENCODER_HARD_LIMIT
if (configuration.last_elevation < 0) {
configuration.last_elevation = 0;
}
if (configuration.last_elevation > ELEVATION_MAXIMUM_DEGREES) {
configuration.last_elevation = ELEVATION_MAXIMUM_DEGREES;
}
#endif
elevation = int(configuration.last_elevation * HEADING_MULTIPLIER);
#ifdef FEATURE_ELEVATION_CORRECTION
elevation = (correct_elevation(elevation / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_ELEVATION_CORRECTION
configuration_dirty = 1;
}
#endif // FEATURE_EL_POSITION_ROTARY_ENCODER
#ifdef FEATURE_EL_POSITION_ADXL345_USING_LOVE_ELECTRON_LIB
AccelerometerRaw raw = accel.ReadRawAxis();
AccelerometerScaled scaled = accel.ReadScaledAxis();
#ifdef DEBUG_ACCEL
if (debug_mode) {
control_port->print(F("read_elevation: raw.ZAxis: "));
control_port->println(raw.ZAxis);
}
#endif // DEBUG_ACCEL
elevation = (atan2(scaled.YAxis, scaled.ZAxis) * 180 * HEADING_MULTIPLIER) / M_PI;
#ifdef FEATURE_ELEVATION_CORRECTION
elevation = (correct_elevation(elevation / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_ELEVATION_CORRECTION
elevation = elevation + (configuration.elevation_offset * HEADING_MULTIPLIER);
if (ELEVATION_SMOOTHING_FACTOR > 0) {
elevation = (elevation * (1 - (ELEVATION_SMOOTHING_FACTOR / 100))) + (previous_elevation * (ELEVATION_SMOOTHING_FACTOR / 100));
}
#endif // FEATURE_EL_POSITION_ADXL345_USING_LOVE_ELECTRON_LIB
#ifdef FEATURE_EL_POSITION_ADXL345_USING_ADAFRUIT_LIB
sensors_event_t event;
accel.getEvent(&event);
#ifdef DEBUG_ACCEL
if (debug_mode) {
control_port->print(F("read_elevation: event.acceleration.z: "));
control_port->println(event.acceleration.z);
}
#endif // DEBUG_ACCEL
elevation = (atan2(event.acceleration.y, event.acceleration.z) * 180 * HEADING_MULTIPLIER) / M_PI;
#ifdef FEATURE_ELEVATION_CORRECTION
elevation = (correct_elevation(elevation / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_ELEVATION_CORRECTION
elevation = elevation + (configuration.elevation_offset * HEADING_MULTIPLIER);
#endif // FEATURE_EL_POSITION_ADXL345_USING_ADAFRUIT_LIB
#ifdef FEATURE_EL_POSITION_LSM303
lsm.read();
#ifdef DEBUG_ACCEL
if (debug_mode) {
control_port->print(F("read_elevation: lsm.accelData.y: "));
control_port->print(lsm.accelData.y);
control_port->print(F(" lsm.accelData.z: "));
control_port->println(lsm.accelData.z);
}
#endif // DEBUG_ACCEL
elevation = (atan2(lsm.accelData.y, lsm.accelData.z) * 180 * HEADING_MULTIPLIER) / M_PI;
#ifdef FEATURE_ELEVATION_CORRECTION
elevation = (correct_elevation(elevation / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_ELEVATION_CORRECTION
elevation = elevation + (configuration.elevation_offset * HEADING_MULTIPLIER);
#endif // FEATURE_EL_POSITION_LSM303
#ifdef FEATURE_EL_POSITION_PULSE_INPUT
#ifdef DEBUG_POSITION_PULSE_INPUT
// if (el_position_pule_interrupt_handler_flag) {
// control_port->print(F("read_elevation: el_position_pule_interrupt_handler_flag: "));
// control_port->println(el_position_pule_interrupt_handler_flag);
// el_position_pule_interrupt_handler_flag = 0;
// }
#endif // DEBUG_POSITION_PULSE_INPUT
static float last_el_position_pulse_input_elevation = el_position_pulse_input_elevation;
if (el_position_pulse_input_elevation != last_el_position_pulse_input_elevation) {
#ifdef DEBUG_POSITION_PULSE_INPUT
// if (debug_mode){
// control_port->print(F("read_elevation: el_position_pulse_input_elevation:"));
// control_port->println(el_position_pulse_input_elevation);
// }
#endif // DEBUG_POSITION_PULSE_INPUT
configuration.last_elevation = el_position_pulse_input_elevation;
configuration_dirty = 1;
last_el_position_pulse_input_elevation = el_position_pulse_input_elevation;
elevation = int(configuration.last_elevation * HEADING_MULTIPLIER);
#ifdef FEATURE_ELEVATION_CORRECTION
elevation = (correct_elevation(elevation / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif FEATURE_ELEVATION_CORRECTION
elevation = elevation + (configuration.elevation_offset * HEADING_MULTIPLIER);
}
#endif // FEATURE_EL_POSITION_PULSE_INPUT
#ifdef FEATURE_EL_POSITION_GET_FROM_REMOTE_UNIT
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
static unsigned long last_remote_unit_el_query_time = 0;
// do we have a command result waiting for us?
if (remote_unit_command_results_available == REMOTE_UNIT_EL_COMMAND) {
#ifdef DEBUG_HEADING_READING_TIME
average_read_time = (average_read_time + (millis() - last_time)) / 2.0;
last_time = millis();
if (debug_mode) {
if ((millis() - last_print_time) > 1000) {
control_port->print(F("read_elevation: avg read frequency: "));
control_port->println(average_read_time, 2);
last_print_time = millis();
}
}
#endif // DEBUG_HEADING_READING_TIME
elevation = remote_unit_command_result_float * HEADING_MULTIPLIER;
#ifdef FEATURE_ELEVATION_CORRECTION
elevation = (correct_elevation(elevation / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_ELEVATION_CORRECTION
elevation = elevation + (configuration.elevation_offset * HEADING_MULTIPLIER);
if (ELEVATION_SMOOTHING_FACTOR > 0) {
elevation = (elevation * (1 - (ELEVATION_SMOOTHING_FACTOR / 100))) + (previous_elevation * (ELEVATION_SMOOTHING_FACTOR / 100));
}
remote_unit_command_results_available = 0;
} else {
// is it time to request the elevation?
if ((millis() - last_remote_unit_el_query_time) > EL_REMOTE_UNIT_QUERY_TIME_MS) {
if (submit_remote_command(REMOTE_UNIT_EL_COMMAND, 0, 0)) {
last_remote_unit_el_query_time = millis();
}
}
}
#endif // defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
#endif // FEATURE_EL_POSITION_GET_FROM_REMOTE_UNIT
#ifdef FEATURE_EL_POSITION_HH12_AS5045_SSI
elevation = int(elevation_hh12.heading() * HEADING_MULTIPLIER);
#ifdef DEBUG_HH12
if ((millis() - last_hh12_debug) > 5000) {
control_port->print(F("read_elevation: HH-12 raw: "));
control_port->println(elevation);
last_hh12_debug = millis();
}
#endif // DEBUG_HH12
if (elevation > (180 * HEADING_MULTIPLIER)) {
elevation = elevation - (360 * HEADING_MULTIPLIER);
}
#ifdef FEATURE_ELEVATION_CORRECTION
elevation = (correct_elevation(elevation / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_ELEVATION_CORRECTION
elevation = elevation + (configuration.elevation_offset * HEADING_MULTIPLIER);
#endif // FEATURE_EL_POSITION_HH12_AS5045_SSI
#ifdef FEATURE_EL_POSITION_INCREMENTAL_ENCODER
elevation = ((((el_incremental_encoder_position) / (EL_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.)) * 360.0) * HEADING_MULTIPLIER);
#ifdef FEATURE_ELEVATION_CORRECTION
elevation = (correct_elevation(elevation / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif // FEATURE_ELEVATION_CORRECTION
if (incremental_encoder_previous_elevation != elevation) {
configuration.last_el_incremental_encoder_position = el_incremental_encoder_position;
configuration_dirty = 1;
incremental_encoder_previous_elevation = elevation;
}
elevation = elevation + (configuration.elevation_offset * HEADING_MULTIPLIER);
#endif // FEATURE_EL_POSITION_INCREMENTAL_ENCODER
#ifdef FEATURE_EL_POSITION_MEMSIC_2125
unsigned int pulseY = pulseIn(pin_memsic_2125_y,HIGH,250000);
pulseY = pulseIn(pin_memsic_2125_y,HIGH,250000);
double Yangle = (asin(((( pulseY / 10. ) - 500.) * 8.) / 1000.0 )) * (360. / (2. * M_PI));
#ifdef DEBUG_MEMSIC_2125
debug_print("read_elevation: memsic2125 pulseY:");
debug_print_int(pulseY);
debug_println("");
#endif //DEBUG_MEMSIC_2125
elevation = Yangle * HEADING_MULTIPLIER;
#ifdef FEATURE_ELEVATION_CORRECTION
elevation = (correct_elevation(elevation / HEADING_MULTIPLIER) * HEADING_MULTIPLIER);
#endif //FEATURE_ELEVATION_CORRECTION
#endif //FEATURE_EL_POSITION_MEMSIC_2125
last_measurement_time = millis();
}
} /* read_elevation */
#endif /* ifdef FEATURE_ELEVATION_CONTROL */
// --------------------------------------------------------------
#ifdef FEATURE_ELEVATION_CONTROL
void update_el_variable_outputs(byte speed_voltage){
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print("update_el_variable_outputs: speed_voltage: ");
debug_print_int(speed_voltage);
#endif // DEBUG_VARIABLE_OUTPUTS
if (((el_state == SLOW_START_UP) || (el_state == NORMAL_UP) || (el_state == SLOW_DOWN_UP) || (el_state == TIMED_SLOW_DOWN_UP)) && (rotate_up_pwm)) {
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print("\trotate_up_pwm");
#endif // DEBUG_VARIABLE_OUTPUTS
analogWriteEnhanced(rotate_up_pwm, speed_voltage);
}
if (((el_state == SLOW_START_DOWN) || (el_state == NORMAL_DOWN) || (el_state == SLOW_DOWN_DOWN) || (el_state == TIMED_SLOW_DOWN_DOWN)) && (rotate_down_pwm)) {
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print("\trotate_down_pwm");
#endif // DEBUG_VARIABLE_OUTPUTS
analogWriteEnhanced(rotate_down_pwm, speed_voltage);
}
if (((el_state == SLOW_START_DOWN) || (el_state == NORMAL_DOWN) || (el_state == SLOW_DOWN_DOWN) || (el_state == TIMED_SLOW_DOWN_DOWN) ||
(el_state == SLOW_START_UP) || (el_state == NORMAL_UP) || (el_state == SLOW_DOWN_UP) || (el_state == TIMED_SLOW_DOWN_UP)) && (rotate_up_down_pwm)) {
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print("\trotate_up_down_pwm");
#endif // DEBUG_VARIABLE_OUTPUTS
analogWriteEnhanced(rotate_up_down_pwm, speed_voltage);
}
if (((el_state == SLOW_START_UP) || (el_state == NORMAL_UP) || (el_state == SLOW_DOWN_UP) || (el_state == TIMED_SLOW_DOWN_UP)) && (rotate_up_freq)) {
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print("\trotate_up_freq");
#endif // DEBUG_VARIABLE_OUTPUTS
tone(rotate_up_freq, map(speed_voltage, 0, 255, EL_VARIABLE_FREQ_OUTPUT_LOW, EL_VARIABLE_FREQ_OUTPUT_HIGH));
}
if (((el_state == SLOW_START_DOWN) || (el_state == NORMAL_DOWN) || (el_state == SLOW_DOWN_DOWN) || (el_state == TIMED_SLOW_DOWN_DOWN)) && (rotate_down_freq)) {
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print("\trotate_down_freq");
#endif // DEBUG_VARIABLE_OUTPUTS
tone(rotate_down_freq, map(speed_voltage, 0, 255, EL_VARIABLE_FREQ_OUTPUT_LOW, EL_VARIABLE_FREQ_OUTPUT_HIGH));
}
#ifdef FEATURE_STEPPER_MOTOR
unsigned int el_tone = 0;
if (((el_state == SLOW_START_UP) || (el_state == NORMAL_UP) || (el_state == SLOW_DOWN_UP) || (el_state == TIMED_SLOW_DOWN_UP) || (el_state == SLOW_START_DOWN) || (el_state == NORMAL_DOWN) || (el_state == SLOW_DOWN_DOWN) || (el_state == TIMED_SLOW_DOWN_DOWN)) && (el_stepper_motor_pulse)) {
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print("\tel_stepper_motor_pulse: ");
#endif // DEBUG_VARIABLE_OUTPUTS
el_tone = map(speed_voltage, 0, 255, EL_VARIABLE_FREQ_OUTPUT_LOW, EL_VARIABLE_FREQ_OUTPUT_HIGH);
if ((el_tone < 31) && (el_tone != 0)) {el_tone = 31;}
if (el_tone > 20000) {el_tone = 20000;}
if (el_tone > 0) {
tone(el_stepper_motor_pulse,el_tone);
} else {
noTone(el_stepper_motor_pulse);
}
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print_int(el_tone);
#endif // DEBUG_VARIABLE_OUTPUTS
//tone(el_stepper_motor_pulse, map(speed_voltage, 0, 255, EL_VARIABLE_FREQ_OUTPUT_LOW, EL_VARIABLE_FREQ_OUTPUT_HIGH));
}
#endif //FEATURE_STEPPER_MOTOR
if (elevation_speed_voltage) {
analogWriteEnhanced(elevation_speed_voltage, speed_voltage);
}
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_println("");
#endif // DEBUG_VARIABLE_OUTPUTS
current_el_speed_voltage = speed_voltage;
} /* update_el_variable_outputs */
#endif // FEATURE_ELEVATION_CONTROL
// --------------------------------------------------------------
void update_az_variable_outputs(byte speed_voltage){
#ifdef DEBUG_VARIABLE_OUTPUTS
int temp_int = 0;
debug_print("update_az_variable_outputs: az_state: ");
switch (az_state) {
case IDLE: debug_print("IDLE"); break;
case SLOW_START_CW: debug_print("SLOW_START_CW"); break;
case SLOW_START_CCW: debug_print("SLOW_START_CCW"); break;
case NORMAL_CW: debug_print("NORMAL_CW"); break;
case NORMAL_CCW: debug_print("NORMAL_CCW"); break;
case SLOW_DOWN_CW: debug_print("SLOW_DOWN_CW"); break;
case SLOW_DOWN_CCW: debug_print("SLOW_DOWN_CCW"); break;
case INITIALIZE_SLOW_START_CW: debug_print("INITIALIZE_SLOW_START_CW"); break;
case INITIALIZE_SLOW_START_CCW: debug_print("INITIALIZE_SLOW_START_CCW"); break;
case INITIALIZE_TIMED_SLOW_DOWN_CW: debug_print("INITIALIZE_TIMED_SLOW_DOWN_CW"); break;
case INITIALIZE_TIMED_SLOW_DOWN_CCW: debug_print("INITIALIZE_TIMED_SLOW_DOWN_CCW"); break;
case TIMED_SLOW_DOWN_CW: debug_print("TIMED_SLOW_DOWN_CW"); break;
case TIMED_SLOW_DOWN_CCW: debug_print("TIMED_SLOW_DOWN_CCW"); break;
case INITIALIZE_DIR_CHANGE_TO_CW: debug_print("INITIALIZE_DIR_CHANGE_TO_CW"); break;
case INITIALIZE_DIR_CHANGE_TO_CCW: debug_print("INITIALIZE_DIR_CHANGE_TO_CCW"); break;
case INITIALIZE_NORMAL_CW: debug_print("INITIALIZE_NORMAL_CW"); break;
case INITIALIZE_NORMAL_CCW: debug_print("INITIALIZE_NORMAL_CCW"); break;
default: debug_print("UNDEF"); break;
}
debug_print(" speed_voltage: ");
debug_print_int(speed_voltage);
#endif // DEBUG_VARIABLE_OUTPUTS
if (((az_state == SLOW_START_CW) || (az_state == NORMAL_CW) || (az_state == SLOW_DOWN_CW) || (az_state == TIMED_SLOW_DOWN_CW)) && (rotate_cw_pwm)) {
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print("\trotate_cw_pwm");
#endif // DEBUG_VARIABLE_OUTPUTS
analogWriteEnhanced(rotate_cw_pwm, speed_voltage);
}
if (((az_state == SLOW_START_CCW) || (az_state == NORMAL_CCW) || (az_state == SLOW_DOWN_CCW) || (az_state == TIMED_SLOW_DOWN_CCW)) && (rotate_ccw_pwm)) {
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print("\trotate_ccw_pwm");
#endif // DEBUG_VARIABLE_OUTPUTS
analogWriteEnhanced(rotate_ccw_pwm, speed_voltage);
}
if (((az_state == SLOW_START_CW) || (az_state == NORMAL_CW) || (az_state == SLOW_DOWN_CW) || (az_state == TIMED_SLOW_DOWN_CW) || (az_state == SLOW_START_CCW) || (az_state == NORMAL_CCW) || (az_state == SLOW_DOWN_CCW) || (az_state == TIMED_SLOW_DOWN_CCW)) && (rotate_cw_ccw_pwm)) {
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print("\trotate_cw_ccw_pwm");
#endif // DEBUG_VARIABLE_OUTPUTS
analogWriteEnhanced(rotate_cw_ccw_pwm, speed_voltage);
}
if (((az_state == SLOW_START_CW) || (az_state == NORMAL_CW) || (az_state == SLOW_DOWN_CW) || (az_state == TIMED_SLOW_DOWN_CW)) && (rotate_cw_freq)) {
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print("\trotate_cw_freq: ");
temp_int = map(speed_voltage, 0, 255, AZ_VARIABLE_FREQ_OUTPUT_LOW, AZ_VARIABLE_FREQ_OUTPUT_HIGH);
tone(rotate_cw_freq, temp_int);
debug_print_int(temp_int);
#else // DEBUG_VARIABLE_OUTPUTS
tone(rotate_cw_freq, map(speed_voltage, 0, 255, AZ_VARIABLE_FREQ_OUTPUT_LOW, AZ_VARIABLE_FREQ_OUTPUT_HIGH));
#endif // DEBUG_VARIABLE_OUTPUTS
}
if (((az_state == SLOW_START_CCW) || (az_state == NORMAL_CCW) || (az_state == SLOW_DOWN_CCW) || (az_state == TIMED_SLOW_DOWN_CCW)) && (rotate_ccw_freq)) {
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print("\trotate_ccw_freq: ");
temp_int = map(speed_voltage, 0, 255, AZ_VARIABLE_FREQ_OUTPUT_LOW, AZ_VARIABLE_FREQ_OUTPUT_HIGH);
tone(rotate_ccw_freq, temp_int);
debug_print_int(temp_int);
#else // DEBUG_VARIABLE_OUTPUTS
tone(rotate_ccw_freq, map(speed_voltage, 0, 255, AZ_VARIABLE_FREQ_OUTPUT_LOW, AZ_VARIABLE_FREQ_OUTPUT_HIGH));
#endif // DEBUG_VARIABLE_OUTPUTS
}
#ifdef FEATURE_STEPPER_MOTOR
unsigned int az_tone = 0;
if (((az_state == SLOW_START_CW) || (az_state == NORMAL_CW) || (az_state == SLOW_DOWN_CW) || (az_state == TIMED_SLOW_DOWN_CW) || (az_state == SLOW_START_CCW) || (az_state == NORMAL_CCW) || (az_state == SLOW_DOWN_CCW) || (az_state == TIMED_SLOW_DOWN_CCW)) && (az_stepper_motor_pulse)) {
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print("\taz_stepper_motor_pulse: ");
#endif // DEBUG_VARIABLE_OUTPUTS
az_tone = map(speed_voltage, 0, 255, AZ_VARIABLE_FREQ_OUTPUT_LOW, AZ_VARIABLE_FREQ_OUTPUT_HIGH);
if ((az_tone < 31) && (az_tone != 0)) {az_tone = 31;}
if (az_tone > 20000) {az_tone = 20000;}
if (az_tone > 0) {
tone(az_stepper_motor_pulse,az_tone);
} else {
noTone(az_stepper_motor_pulse);
}
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_print_int(az_tone);
#endif // DEBUG_VARIABLE_OUTPUTS
}
#endif //FEATURE_STEPPER_MOTOR
if (azimuth_speed_voltage) {
analogWriteEnhanced(azimuth_speed_voltage, speed_voltage);
}
#ifdef DEBUG_VARIABLE_OUTPUTS
debug_println("");
#endif // DEBUG_VARIABLE_OUTPUTS
current_az_speed_voltage = speed_voltage;
} /* update_az_variable_outputs */
// --------------------------------------------------------------
void rotator(byte rotation_action, byte rotation_type) {
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->flush();
control_port->print(F("rotator: rotation_action:"));
control_port->print(rotation_action);
control_port->print(F(" rotation_type:"));
control_port->flush();
control_port->print(rotation_type);
control_port->print(F("->"));
control_port->flush();
// delay(1000);
}
#endif // DEBUG_ROTATOR
switch (rotation_type) {
case CW:
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->print(F("CW ")); control_port->flush();
}
#endif // DEBUG_ROTATOR
if (rotation_action == ACTIVATE) {
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->println(F("ACTIVATE")); control_port->flush();
}
#endif // DEBUG_ROTATOR
brake_release(AZ, BRAKE_RELEASE_ON);
if (az_slowstart_active) {
if (rotate_cw_pwm) {
analogWriteEnhanced(rotate_cw_pwm, 0);
}
if (rotate_ccw_pwm) {
analogWriteEnhanced(rotate_ccw_pwm, 0); digitalWriteEnhanced(rotate_ccw_pwm, LOW);
}
if (rotate_cw_ccw_pwm) {
analogWriteEnhanced(rotate_cw_ccw_pwm, 0);
}
if (rotate_cw_freq) {
noTone(rotate_cw_freq);
}
if (rotate_ccw_freq) {
noTone(rotate_ccw_freq);
}
if (az_stepper_motor_pulse) {
noTone(az_stepper_motor_pulse);
digitalWriteEnhanced(az_stepper_motor_pulse, LOW);
}
} else {
if (rotate_cw_pwm) {
analogWriteEnhanced(rotate_cw_pwm, normal_az_speed_voltage);
}
if (rotate_ccw_pwm) {
analogWriteEnhanced(rotate_ccw_pwm, 0); digitalWriteEnhanced(rotate_ccw_pwm, LOW);
}
if (rotate_cw_ccw_pwm) {
analogWriteEnhanced(rotate_cw_ccw_pwm, normal_az_speed_voltage);
}
if (rotate_cw_freq) {
tone(rotate_cw_freq, map(normal_az_speed_voltage, 0, 255, AZ_VARIABLE_FREQ_OUTPUT_LOW, AZ_VARIABLE_FREQ_OUTPUT_HIGH));
}
if (rotate_ccw_freq) {
noTone(rotate_ccw_freq);
}
if (az_stepper_motor_pulse) {
tone(az_stepper_motor_pulse, map(normal_az_speed_voltage, 0, 255, AZ_VARIABLE_FREQ_OUTPUT_LOW, AZ_VARIABLE_FREQ_OUTPUT_HIGH));
}
}
if (rotate_cw) {
digitalWriteEnhanced(rotate_cw, ROTATE_PIN_ACTIVE_VALUE);
}
if (rotate_ccw) {
digitalWriteEnhanced(rotate_ccw, ROTATE_PIN_INACTIVE_VALUE);
}
if (rotate_cw_ccw){
digitalWriteEnhanced(rotate_cw_ccw, ROTATE_PIN_ACTIVE_VALUE);
}
#ifdef FEATURE_STEPPER_MOTOR
if (az_stepper_motor_direction){
if (az_stepper_motor_last_direction != STEPPER_CW){
if (az_stepper_motor_last_pin_state == LOW){
digitalWriteEnhanced(az_stepper_motor_direction,HIGH);
az_stepper_motor_last_pin_state = HIGH;
} else {
digitalWriteEnhanced(az_stepper_motor_direction,LOW);
az_stepper_motor_last_pin_state = LOW;
}
az_stepper_motor_last_direction = STEPPER_CW;
}
}
#endif //FEATURE_STEPPER_MOTOR
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->print(F("rotator: normal_az_speed_voltage:"));
control_port->println(normal_az_speed_voltage);
//control_port->flush();
}
#endif // DEBUG_ROTATOR
} else {
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->println(F("DEACTIVATE")); //control_port->flush();
}
#endif // DEBUG_ROTATOR
if (rotate_cw_pwm) {
analogWriteEnhanced(rotate_cw_pwm, 0); digitalWriteEnhanced(rotate_cw_pwm, LOW);
}
if (rotate_cw_ccw_pwm) {
analogWriteEnhanced(rotate_cw_ccw_pwm, 0);
}
if (rotate_cw) {
digitalWriteEnhanced(rotate_cw, ROTATE_PIN_INACTIVE_VALUE);
}
if (rotate_cw_ccw){
digitalWriteEnhanced(rotate_cw_ccw, ROTATE_PIN_INACTIVE_VALUE);
}
if (rotate_cw_freq) {
noTone(rotate_cw_freq);
}
#ifdef FEATURE_STEPPER_MOTOR
if (az_stepper_motor_pulse) {
noTone(az_stepper_motor_pulse);
digitalWriteEnhanced(az_stepper_motor_pulse, HIGH);
}
#endif //FEATURE_STEPPER_MOTOR
}
break;
case CCW:
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->print(F("CCW ")); control_port->flush();
}
#endif // DEBUG_ROTATOR
if (rotation_action == ACTIVATE) {
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->println(F("ACTIVATE")); control_port->flush();
}
#endif // DEBUG_ROTATOR
brake_release(AZ, BRAKE_RELEASE_ON);
if (az_slowstart_active) {
if (rotate_cw_pwm) {
analogWriteEnhanced(rotate_cw_pwm, 0); digitalWriteEnhanced(rotate_cw_pwm, LOW);
}
if (rotate_ccw_pwm) {
analogWriteEnhanced(rotate_ccw_pwm, 0);
}
if (rotate_cw_ccw_pwm) {
analogWriteEnhanced(rotate_cw_ccw_pwm, 0);
}
if (rotate_cw_freq) {
noTone(rotate_cw_freq);
}
if (rotate_ccw_freq) {
noTone(rotate_ccw_freq);
}
#ifdef FEATURE_STEPPER_MOTOR
if (az_stepper_motor_pulse) {
noTone(az_stepper_motor_pulse);
digitalWriteEnhanced(az_stepper_motor_pulse, LOW);
}
#endif //FEATURE_STEPPER_MOTOR
} else {
if (rotate_cw_pwm) {
analogWriteEnhanced(rotate_cw_pwm, 0); digitalWriteEnhanced(rotate_cw_pwm, LOW);
}
if (rotate_ccw_pwm) {
analogWriteEnhanced(rotate_ccw_pwm, normal_az_speed_voltage);
}
if (rotate_cw_ccw_pwm) {
analogWriteEnhanced(rotate_cw_ccw_pwm, normal_az_speed_voltage);
}
if (rotate_cw_freq) {
noTone(rotate_cw_freq);
}
if (rotate_ccw_freq) {
tone(rotate_ccw_freq, map(normal_az_speed_voltage, 0, 255, AZ_VARIABLE_FREQ_OUTPUT_LOW, AZ_VARIABLE_FREQ_OUTPUT_HIGH));
}
#ifdef FEATURE_STEPPER_MOTOR
if (az_stepper_motor_pulse) {
tone(az_stepper_motor_pulse, map(normal_az_speed_voltage, 0, 255, AZ_VARIABLE_FREQ_OUTPUT_LOW, AZ_VARIABLE_FREQ_OUTPUT_HIGH));
}
#endif //FEATURE_STEPPER_MOTOR
}
if (rotate_cw) {
digitalWriteEnhanced(rotate_cw, ROTATE_PIN_INACTIVE_VALUE);
}
if (rotate_ccw) {
digitalWriteEnhanced(rotate_ccw, ROTATE_PIN_ACTIVE_VALUE);
}
if (rotate_cw_ccw){
digitalWriteEnhanced(rotate_cw_ccw, ROTATE_PIN_ACTIVE_VALUE);
}
#ifdef FEATURE_STEPPER_MOTOR
if (az_stepper_motor_direction){
if (az_stepper_motor_last_direction != STEPPER_CCW){
if (az_stepper_motor_last_pin_state == LOW){
digitalWriteEnhanced(az_stepper_motor_direction,HIGH);
az_stepper_motor_last_pin_state = HIGH;
} else {
digitalWriteEnhanced(az_stepper_motor_direction,LOW);
az_stepper_motor_last_pin_state = LOW;
}
az_stepper_motor_last_direction = STEPPER_CCW;
}
}
#endif //FEATURE_STEPPER_MOTOR
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->print(F("rotator: normal_az_speed_voltage:"));
control_port->println(normal_az_speed_voltage);
control_port->flush();
}
#endif // DEBUG_ROTATOR
} else {
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->println(F("DEACTIVATE")); control_port->flush();
}
#endif // DEBUG_ROTATOR
if (rotate_ccw_pwm) {
analogWriteEnhanced(rotate_ccw_pwm, 0); digitalWriteEnhanced(rotate_ccw_pwm, LOW);
}
if (rotate_ccw) {
digitalWriteEnhanced(rotate_ccw, ROTATE_PIN_INACTIVE_VALUE);
}
if (rotate_ccw_freq) {
noTone(rotate_ccw_freq);
}
}
break;
#ifdef FEATURE_ELEVATION_CONTROL
case UP:
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->print(F("ROTATION_UP ")); control_port->flush();
}
#endif // DEBUG_ROTATOR
if (rotation_action == ACTIVATE) {
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->println(F("ACTIVATE")); control_port->flush();
}
#endif // DEBUG_ROTATOR
brake_release(EL, BRAKE_RELEASE_ON);
if (el_slowstart_active) {
if (rotate_up_pwm) {
analogWriteEnhanced(rotate_up_pwm, 0);
}
if (rotate_down_pwm) {
analogWriteEnhanced(rotate_down_pwm, 0); digitalWriteEnhanced(rotate_down_pwm, LOW);
}
if (rotate_up_down_pwm) {
analogWriteEnhanced(rotate_up_down_pwm, 0);
}
if (rotate_up_freq) {
noTone(rotate_up_freq);
}
if (rotate_down_freq) {
noTone(rotate_down_freq);
}
#ifdef FEATURE_STEPPER_MOTOR
if (el_stepper_motor_pulse) {
noTone(el_stepper_motor_pulse);
digitalWriteEnhanced(el_stepper_motor_pulse,LOW);
}
#endif //FEATURE_STEPPER_MOTOR
} else {
if (rotate_up_pwm) {
analogWriteEnhanced(rotate_up_pwm, normal_el_speed_voltage);
}
if (rotate_down_pwm) {
analogWriteEnhanced(rotate_down_pwm, 0); digitalWriteEnhanced(rotate_down_pwm, LOW);
}
if (rotate_up_down_pwm) {
analogWriteEnhanced(rotate_up_down_pwm, normal_el_speed_voltage);
}
if (rotate_up_freq) {
tone(rotate_up_freq, map(normal_el_speed_voltage, 0, 255, EL_VARIABLE_FREQ_OUTPUT_LOW, EL_VARIABLE_FREQ_OUTPUT_HIGH));
}
#ifdef FEATURE_STEPPER_MOTOR
if (el_stepper_motor_pulse) {
tone(el_stepper_motor_pulse, map(normal_el_speed_voltage, 0, 255, EL_VARIABLE_FREQ_OUTPUT_LOW, EL_VARIABLE_FREQ_OUTPUT_HIGH));
}
#endif //FEATURE_STEPPER_MOTOR
if (rotate_down_freq) {
noTone(rotate_down_freq);
}
}
if (rotate_up) {
digitalWriteEnhanced(rotate_up, ROTATE_PIN_ACTIVE_VALUE);
}
if (rotate_down) {
digitalWriteEnhanced(rotate_down, ROTATE_PIN_INACTIVE_VALUE);
}
if (rotate_up_or_down) {
digitalWriteEnhanced(rotate_up_or_down, ROTATE_PIN_ACTIVE_VALUE);
}
#ifdef FEATURE_STEPPER_MOTOR
if (el_stepper_motor_direction){
if (el_stepper_motor_last_direction != STEPPER_UP){
if (el_stepper_motor_last_pin_state == LOW){
digitalWriteEnhanced(el_stepper_motor_direction,HIGH);
el_stepper_motor_last_pin_state = HIGH;
} else {
digitalWriteEnhanced(el_stepper_motor_direction,LOW);
el_stepper_motor_last_pin_state = LOW;
}
el_stepper_motor_last_direction = STEPPER_UP;
}
}
#endif //FEATURE_STEPPER_MOTOR
} else {
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->println(F("DEACTIVATE")); control_port->flush();
}
#endif // DEBUG_ROTATOR
if (rotate_up) {
digitalWriteEnhanced(rotate_up, ROTATE_PIN_INACTIVE_VALUE);
}
if (rotate_up_pwm) {
analogWriteEnhanced(rotate_up_pwm, 0); digitalWriteEnhanced(rotate_up_pwm, LOW);
}
if (rotate_up_down_pwm) {
analogWriteEnhanced(rotate_up_down_pwm, 0);
}
if (rotate_up_freq) {
noTone(rotate_up_freq);
}
if (rotate_up_or_down) {
digitalWriteEnhanced(rotate_up_or_down, ROTATE_PIN_INACTIVE_VALUE);
}
#ifdef FEATURE_STEPPER_MOTOR
if (el_stepper_motor_pulse) {
noTone(el_stepper_motor_pulse);
digitalWriteEnhanced(el_stepper_motor_pulse,HIGH);
}
#endif //FEATURE_STEPPER_MOTOR
}
break;
case DOWN:
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->print(F("ROTATION_DOWN ")); control_port->flush();
}
#endif // DEBUG_ROTATOR
if (rotation_action == ACTIVATE) {
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->println(F("ACTIVATE")); control_port->flush();
}
#endif // DEBUG_ROTATOR
brake_release(EL, BRAKE_RELEASE_ON);
if (el_slowstart_active) {
if (rotate_down_pwm) {
analogWriteEnhanced(rotate_down_pwm, 0);
}
if (rotate_up_pwm) {
analogWriteEnhanced(rotate_up_pwm, 0); digitalWriteEnhanced(rotate_up_pwm, LOW);
}
if (rotate_up_down_pwm) {
analogWriteEnhanced(rotate_up_down_pwm, 0);
}
if (rotate_up_freq) {
noTone(rotate_up_freq);
}
if (rotate_down_freq) {
noTone(rotate_down_freq);
}
#ifdef FEATURE_STEPPER_MOTOR
if (el_stepper_motor_pulse) {
noTone(el_stepper_motor_pulse);
digitalWriteEnhanced(el_stepper_motor_pulse,LOW);
}
#endif //FEATURE_STEPPER_MOTOR
} else {
if (rotate_down_pwm) {
analogWriteEnhanced(rotate_down_pwm, normal_el_speed_voltage);
}
if (rotate_up_pwm) {
analogWriteEnhanced(rotate_up_pwm, 0); digitalWriteEnhanced(rotate_up_pwm, LOW);
}
if (rotate_up_down_pwm) {
analogWriteEnhanced(rotate_up_down_pwm, normal_el_speed_voltage);
}
if (rotate_down_freq) {
tone(rotate_down_freq, map(normal_el_speed_voltage, 0, 255, EL_VARIABLE_FREQ_OUTPUT_LOW, EL_VARIABLE_FREQ_OUTPUT_HIGH));
}
if (rotate_up_freq) {
noTone(rotate_up_freq);
}
#ifdef FEATURE_STEPPER_MOTOR
if (el_stepper_motor_pulse) {
tone(el_stepper_motor_pulse, map(normal_el_speed_voltage, 0, 255, EL_VARIABLE_FREQ_OUTPUT_LOW, EL_VARIABLE_FREQ_OUTPUT_HIGH));
digitalWriteEnhanced(el_stepper_motor_pulse,LOW);
}
#endif //FEATURE_STEPPER_MOTOR
}
if (rotate_up) {
digitalWriteEnhanced(rotate_up, ROTATE_PIN_INACTIVE_VALUE);
}
if (rotate_down) {
digitalWriteEnhanced(rotate_down, ROTATE_PIN_ACTIVE_VALUE);
}
if (rotate_up_or_down) {
digitalWriteEnhanced(rotate_up_or_down, ROTATE_PIN_ACTIVE_VALUE);
}
#ifdef FEATURE_STEPPER_MOTOR
if (el_stepper_motor_direction){
if (el_stepper_motor_last_direction != STEPPER_DOWN){
if (el_stepper_motor_last_pin_state == LOW){
digitalWriteEnhanced(el_stepper_motor_direction,HIGH);
el_stepper_motor_last_pin_state = HIGH;
} else {
digitalWriteEnhanced(el_stepper_motor_direction,LOW);
el_stepper_motor_last_pin_state = LOW;
}
el_stepper_motor_last_direction = STEPPER_DOWN;
}
}
#endif //FEATURE_STEPPER_MOTOR
} else {
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->println(F("DEACTIVATE")); control_port->flush();
}
#endif // DEBUG_ROTATOR
if (rotate_down) {
digitalWriteEnhanced(rotate_down, ROTATE_PIN_INACTIVE_VALUE);
}
if (rotate_down_pwm) {
analogWriteEnhanced(rotate_down_pwm, 0); digitalWriteEnhanced(rotate_down_pwm, LOW);
}
if (rotate_up_down_pwm) {
analogWriteEnhanced(rotate_up_down_pwm, 0);
}
if (rotate_down_freq) {
noTone(rotate_down_freq);
}
if (rotate_up_or_down) {
digitalWriteEnhanced(rotate_up_or_down, ROTATE_PIN_INACTIVE_VALUE);
}
#ifdef FEATURE_STEPPER_MOTOR
if (el_stepper_motor_pulse) {
noTone(el_stepper_motor_pulse);
digitalWriteEnhanced(el_stepper_motor_pulse,HIGH);
}
#endif //FEATURE_STEPPER_MOTOR
}
break;
#endif // FEATURE_ELEVATION_CONTROL
} /* switch */
#ifdef DEBUG_ROTATOR
if (debug_mode) {
control_port->println(F("rotator: exiting"));
control_port->flush();
}
#endif // DEBUG_ROTATOR
} /* rotator */
// --------------------------------------------------------------
void initialize_interrupts(){
#ifdef FEATURE_AZ_POSITION_PULSE_INPUT
attachInterrupt(AZ_POSITION_PULSE_PIN_INTERRUPT, az_position_pulse_interrupt_handler, FALLING);
#endif // FEATURE_AZ_POSITION_PULSE_INPUT
#ifdef FEATURE_EL_POSITION_PULSE_INPUT
attachInterrupt(EL_POSITION_PULSE_PIN_INTERRUPT, el_position_pulse_interrupt_handler, FALLING);
#endif // FEATURE_EL_POSITION_PULSE_INPUT
}
// --------------------------------------------------------------
void initialize_pins(){
if (serial_led) {
pinModeEnhanced(serial_led, OUTPUT);
}
if (overlap_led) {
pinModeEnhanced(overlap_led, OUTPUT);
}
if (brake_az) {
pinModeEnhanced(brake_az, OUTPUT);
digitalWriteEnhanced(brake_az, LOW);
}
if (az_speed_pot) {
pinModeEnhanced(az_speed_pot, INPUT);
digitalWriteEnhanced(az_speed_pot, LOW);
}
if (az_preset_pot) {
pinModeEnhanced(az_preset_pot, INPUT);
digitalWriteEnhanced(az_preset_pot, LOW);
}
if (preset_start_button) {
pinModeEnhanced(preset_start_button, INPUT);
digitalWriteEnhanced(preset_start_button, HIGH);
}
if (button_stop) {
pinModeEnhanced(button_stop, INPUT);
digitalWriteEnhanced(button_stop, HIGH);
}
#ifdef FEATURE_ELEVATION_CONTROL
if (brake_el) {
pinModeEnhanced(brake_el, OUTPUT);
digitalWriteEnhanced(brake_el, LOW);
}
#endif // FEATURE_ELEVATION_CONTROL
if (rotate_cw) {
pinModeEnhanced(rotate_cw, OUTPUT);
}
if (rotate_ccw) {
pinModeEnhanced(rotate_ccw, OUTPUT);
}
if (rotate_cw_pwm) {
pinModeEnhanced(rotate_cw_pwm, OUTPUT);
}
if (rotate_ccw_pwm) {
pinModeEnhanced(rotate_ccw_pwm, OUTPUT);
}
if (rotate_cw_ccw_pwm) {
pinModeEnhanced(rotate_cw_ccw_pwm, OUTPUT);
}
if (rotate_cw_freq) {
pinModeEnhanced(rotate_cw_freq, OUTPUT);
}
if (rotate_ccw_freq) {
pinModeEnhanced(rotate_ccw_freq, OUTPUT);
}
rotator(DEACTIVATE, CW);
rotator(DEACTIVATE, CCW);
#ifndef FEATURE_AZ_POSITION_HMC5883L
pinModeEnhanced(rotator_analog_az, INPUT);
#endif
if (button_cw) {
pinModeEnhanced(button_cw, INPUT);
digitalWriteEnhanced(button_cw, HIGH);
}
if (button_ccw) {
pinModeEnhanced(button_ccw, INPUT);
digitalWriteEnhanced(button_ccw, HIGH);
}
normal_az_speed_voltage = PWM_SPEED_VOLTAGE_X4;
current_az_speed_voltage = PWM_SPEED_VOLTAGE_X4;
#ifdef FEATURE_ELEVATION_CONTROL
normal_el_speed_voltage = PWM_SPEED_VOLTAGE_X4;
current_el_speed_voltage = PWM_SPEED_VOLTAGE_X4;
#endif // FEATURE_ELEVATION_CONTROL
if (azimuth_speed_voltage) { // if azimuth_speed_voltage pin is configured, set it up for PWM output
analogWriteEnhanced(azimuth_speed_voltage, PWM_SPEED_VOLTAGE_X4);
}
#ifdef FEATURE_ELEVATION_CONTROL
pinModeEnhanced(rotate_up, OUTPUT);
pinModeEnhanced(rotate_down, OUTPUT);
if (rotate_up_or_down) {
pinModeEnhanced(rotate_up_or_down, OUTPUT);
}
if (rotate_up_pwm) {
pinModeEnhanced(rotate_up_pwm, OUTPUT);
}
if (rotate_down_pwm) {
pinModeEnhanced(rotate_down_pwm, OUTPUT);
}
if (rotate_up_down_pwm) {
pinModeEnhanced(rotate_up_down_pwm, OUTPUT);
}
if (rotate_up_freq) {
pinModeEnhanced(rotate_up_freq, OUTPUT);
}
if (rotate_down_freq) {
pinModeEnhanced(rotate_down_freq, OUTPUT);
}
rotator(DEACTIVATE, UP);
rotator(DEACTIVATE, DOWN);
#ifdef FEATURE_EL_POSITION_POTENTIOMETER
pinModeEnhanced(rotator_analog_el, INPUT);
#endif // FEATURE_EL_POSITION_POTENTIOMETER
if (button_up) {
pinModeEnhanced(button_up, INPUT);
digitalWriteEnhanced(button_up, HIGH);
}
if (button_down) {
pinModeEnhanced(button_down, INPUT);
digitalWriteEnhanced(button_down, HIGH);
}
if (elevation_speed_voltage) { // if elevation_speed_voltage pin is configured, set it up for PWM output
analogWriteEnhanced(elevation_speed_voltage, PWM_SPEED_VOLTAGE_X4);
normal_el_speed_voltage = PWM_SPEED_VOLTAGE_X4;
current_el_speed_voltage = PWM_SPEED_VOLTAGE_X4;
}
read_elevation(0);
#endif // FEATURE_ELEVATION_CONTROL
#ifdef FEATURE_AZ_POSITION_PULSE_INPUT
if (az_position_pulse_pin) {
pinModeEnhanced(az_position_pulse_pin, INPUT);
#ifdef OPTION_POSITION_PULSE_INPUT_PULLUPS
digitalWriteEnhanced(az_position_pulse_pin, HIGH);
#endif // OPTION_POSITION_PULSE_INPUT_PULLUPS
}
#endif // FEATURE_AZ_POSITION_PULSE_INPUT
#ifdef FEATURE_EL_POSITION_PULSE_INPUT
if (el_position_pulse_pin) {
pinModeEnhanced(el_position_pulse_pin, INPUT);
#ifdef OPTION_POSITION_PULSE_INPUT_PULLUPS
digitalWriteEnhanced(el_position_pulse_pin, HIGH);
#endif // OPTION_POSITION_PULSE_INPUT_PULLUPS
}
#endif // FEATURE_EL_POSITION_PULSE_INPUT
#ifdef FEATURE_PARK
if (button_park) {
pinModeEnhanced(button_park, INPUT);
digitalWriteEnhanced(button_park, HIGH);
}
#endif // FEATURE_PARK
#ifdef FEATURE_ROTATION_INDICATOR_PIN
if (rotation_indication_pin) {
pinModeEnhanced(rotation_indication_pin, OUTPUT);
digitalWriteEnhanced(rotation_indication_pin, ROTATION_INDICATOR_PIN_INACTIVE_STATE);
}
#endif // FEATURE_ROTATION_INDICATOR_PIN
#ifdef FEATURE_PARK
if (park_in_progress_pin) {
pinModeEnhanced(park_in_progress_pin, OUTPUT);
digitalWriteEnhanced(park_in_progress_pin, LOW);
}
if (parked_pin) {
pinModeEnhanced(parked_pin, OUTPUT);
digitalWriteEnhanced(parked_pin, LOW);
}
#endif // FEATURE_PARK
if (blink_led) {
pinModeEnhanced(blink_led, OUTPUT);
}
if (heading_reading_inhibit_pin) {
pinModeEnhanced(heading_reading_inhibit_pin, INPUT);
}
#ifdef FEATURE_LIMIT_SENSE
if (az_limit_sense_pin) {
pinModeEnhanced(az_limit_sense_pin, INPUT);
digitalWriteEnhanced(az_limit_sense_pin, HIGH);
}
#ifdef FEATURE_ELEVATION_CONTROL
if (el_limit_sense_pin) {
pinModeEnhanced(el_limit_sense_pin, INPUT);
digitalWriteEnhanced(el_limit_sense_pin, HIGH);
}
#endif // FEATURE_ELEVATION_CONTROL
#endif // FEATURE_LIMIT_SENSE
#ifdef FEATURE_MOON_TRACKING
if (moon_tracking_active_pin) {
pinModeEnhanced(moon_tracking_active_pin, OUTPUT);
digitalWriteEnhanced(moon_tracking_active_pin, LOW);
}
if (moon_tracking_activate_line) {
pinModeEnhanced(moon_tracking_activate_line, INPUT);
digitalWriteEnhanced(moon_tracking_activate_line, HIGH);
}
if (moon_tracking_button) {
pinModeEnhanced(moon_tracking_button, INPUT);
digitalWriteEnhanced(moon_tracking_button, HIGH);
}
#endif // FEATURE_MOON_TRACKING
#ifdef FEATURE_SUN_TRACKING
if (sun_tracking_active_pin) {
pinModeEnhanced(sun_tracking_active_pin, OUTPUT);
digitalWriteEnhanced(sun_tracking_active_pin, LOW);
}
if (sun_tracking_activate_line) {
pinModeEnhanced(sun_tracking_activate_line, INPUT);
digitalWriteEnhanced(sun_tracking_activate_line, HIGH);
}
if (sun_tracking_button) {
pinModeEnhanced(sun_tracking_button, INPUT);
digitalWriteEnhanced(sun_tracking_button, HIGH);
}
#endif // FEATURE_SUN_TRACKING
#ifdef FEATURE_GPS
if (gps_sync) {
pinModeEnhanced(gps_sync, OUTPUT);
digitalWriteEnhanced(gps_sync, LOW);
}
#endif //FEATURE_GPS
#ifdef FEATURE_POWER_SWITCH
pinModeEnhanced(power_switch, OUTPUT);
digitalWriteEnhanced(power_switch, HIGH);
#endif //FEATURE_POWER_SWITCH
#ifdef FEATURE_STEPPER_MOTOR
if (az_stepper_motor_pulse){
pinModeEnhanced(az_stepper_motor_pulse, OUTPUT);
digitalWriteEnhanced(az_stepper_motor_pulse, HIGH);
}
if (az_stepper_motor_direction){
pinModeEnhanced(az_stepper_motor_direction, OUTPUT);
digitalWriteEnhanced(az_stepper_motor_direction, LOW);
}
#ifdef FEATURE_ELEVATION_CONTROL
if (el_stepper_motor_pulse){
pinModeEnhanced(el_stepper_motor_pulse, OUTPUT);
digitalWriteEnhanced(el_stepper_motor_pulse, HIGH);
}
if (el_stepper_motor_direction){
pinModeEnhanced(el_stepper_motor_direction, OUTPUT);
digitalWriteEnhanced(el_stepper_motor_direction, LOW);
}
#endif //FEATURE_ELEVATION_CONTROL
#endif //FEATURE_STEPPER_MOTOR
#ifdef FEATURE_EL_POSITION_MEMSIC_2125
pinModeEnhanced(pin_memsic_2125_x, INPUT);
pinModeEnhanced(pin_memsic_2125_y, INPUT);
#endif //FEATURE_EL_POSITION_MEMSIC_2125
} /* initialize_pins */
// --------------------------------------------------------------
void initialize_serial(){
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION) || defined(FEATURE_CLOCK)
control_port = CONTROL_PORT_MAPPED_TO;
control_port->begin(CONTROL_PORT_BAUD_RATE);
#endif
#ifdef FEATURE_REMOTE_UNIT_SLAVE
control_port->print(F("CS"));
control_port->println(CODE_VERSION);
#endif // FEATURE_REMOTE_UNIT_SLAVE
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
remote_unit_port = REMOTE_PORT_MAPPED_TO;
remote_unit_port->begin(REMOTE_UNIT_PORT_BAUD_RATE);
#endif
#ifdef FEATURE_GPS
gps_port = GPS_PORT_MAPPED_TO;
gps_port->begin(GPS_PORT_BAUD_RATE);
#ifdef GPS_MIRROR_PORT
gps_mirror_port = GPS_MIRROR_PORT;
gps_mirror_port->begin(GPS_MIRROR_PORT_BAUD_RATE);
#endif //GPS_MIRROR_PORT
#endif //FEATURE_GPS
} /* initialize_serial */
// --------------------------------------------------------------
#ifdef FEATURE_LCD_DISPLAY
void initialize_display(){
byte start_row = 0;
lcd.begin(LCD_COLUMNS, LCD_ROWS);
#ifdef FEATURE_YOURDUINO_I2C_LCD
lcd.setBacklightPin(BACKLIGHT_PIN, POSITIVE);
lcd.setBacklight(I2C_LCD_COLOR);
#endif // FEATURE_YOURDUINO_I2C_LCD
#ifdef FEATURE_ADAFRUIT_I2C_LCD
lcd.setBacklight(I2C_LCD_COLOR);
#endif // FEATURE_ADAFRUIT_I2C_LCD
if (LCD_ROWS == 4){start_row = 1;}
lcd.setCursor(((LCD_COLUMNS - 4) / 2), start_row);
lcd.print("\x4B\x33\x4E\x47");
lcd.setCursor(((LCD_COLUMNS - 16) / 2), start_row + 1);
lcd.print("\x52\x6F\x74\x6F\x72\x20\x43\x6F\x6E\x74\x72\x6F\x6C\x6C\x65\x72");
last_lcd_update = millis();
} /* initialize_display */
#endif /* ifdef FEATURE_LCD_DISPLAY */
// --------------------------------------------------------------
void initialize_peripherals(){
#ifdef FEATURE_WIRE_SUPPORT
Wire.begin();
#endif
#ifdef FEATURE_AZ_POSITION_HMC5883L
compass = HMC5883L();
int error;
error = compass.SetScale(1.3); // Set the scale of the compass.
#ifndef OPTION_DISABLE_HMC5883L_ERROR_CHECKING
if (error != 0) {
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
control_port->print(F("setup: compass error:"));
control_port->println(compass.GetErrorText(error)); // check if there is an error, and print if so
#endif
}
#endif //OPTION_DISABLE_HMC5883L_ERROR_CHECKING
error = compass.SetMeasurementMode(Measurement_Continuous); // Set the measurement mode to Continuous
#ifndef OPTION_DISABLE_HMC5883L_ERROR_CHECKING
if (error != 0) {
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
control_port->print(F("setup: compass error:"));
control_port->println(compass.GetErrorText(error)); // check if there is an error, and print if so
#endif
}
#endif //OPTION_DISABLE_HMC5883L_ERROR_CHECKING
#endif // FEATURE_AZ_POSITION_HMC5883L
#ifdef FEATURE_EL_POSITION_ADXL345_USING_LOVE_ELECTRON_LIB
accel = ADXL345();
accel.SetRange(2, true);
accel.EnableMeasurements();
#endif // FEATURE_EL_POSITION_ADXL345_USING_LOVE_ELECTRON_LIB
#ifdef FEATURE_EL_POSITION_ADXL345_USING_ADAFRUIT_LIB
accel.begin();
#endif // FEATURE_EL_POSITION_ADXL345_USING_ADAFRUIT_LIB
#ifdef FEATURE_JOYSTICK_CONTROL
pinModeEnhanced(pin_joystick_x, INPUT);
pinModeEnhanced(pin_joystick_y, INPUT);
#endif // FEATURE_JOYSTICK_CONTROL
#if defined(FEATURE_EL_POSITION_LSM303) || defined(FEATURE_AZ_POSITION_LSM303)
if (!lsm.begin()) {
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
control_port->println(F("setup: LSM303 error"));
#endif
}
#endif // FEATURE_EL_POSITION_LSM303 || FEATURE_AZ_POSITION_LSM303
#ifdef FEATURE_AZ_POSITION_HH12_AS5045_SSI
azimuth_hh12.initialize(az_hh12_clock_pin, az_hh12_cs_pin, az_hh12_data_pin);
#endif // FEATURE_AZ_POSITION_HH12_AS5045_SSI
#ifdef FEATURE_EL_POSITION_HH12_AS5045_SSI
elevation_hh12.initialize(el_hh12_clock_pin, el_hh12_cs_pin, el_hh12_data_pin);
#endif // FEATURE_EL_POSITION_HH12_AS5045_SSI
#ifdef FEATURE_RTC_DS1307
rtc.begin();
#endif // FEATURE_RTC_DS1307
#ifdef FEATURE_ETHERNET
Ethernet.begin(mac, ip, gateway, subnet);
ethernetserver0.begin();
#endif //FEATURE_ETHERNET
} /* initialize_peripherals */
// --------------------------------------------------------------
void submit_request(byte axis, byte request, int parm, byte called_by){
#ifdef DEBUG_SUBMIT_REQUEST
debug_print("submit_request: ");
debug_print_int(called_by);
debug_print(" ");
#endif // DEBUG_SUBMIT_REQUEST
#ifdef FEATURE_PARK
park_status = NOT_PARKED;
#endif // FEATURE_PARK
if (axis == AZ) {
#ifdef DEBUG_SUBMIT_REQUEST
debug_print("AZ ");
#endif // DEBUG_SUBMIT_REQUEST
az_request = request;
az_request_parm = parm;
az_request_queue_state = IN_QUEUE;
}
#ifdef FEATURE_ELEVATION_CONTROL
if (axis == EL) {
#ifdef DEBUG_SUBMIT_REQUEST
debug_print("EL ");
#endif // DEBUG_SUBMIT_REQUEST
el_request = request;
el_request_parm = parm;
el_request_queue_state = IN_QUEUE;
}
#endif // FEATURE_ELEVATION_CONTROL
#ifdef DEBUG_SUBMIT_REQUEST
switch(request){
case 0: debug_print("REQUEST_STOP");break;
case 1: debug_print("REQUEST_AZIMUTH");break;
case 2: debug_print("REQUEST_AZIMUTH_RAW");break;
case 3: debug_print("REQUEST_CW");break;
case 4: debug_print("REQUEST_CCW");break;
case 5: debug_print("REQUEST_UP");break;
case 6: debug_print("REQUEST_DOWN");break;
case 7: debug_print("REQUEST_ELEVATION");break;
case 8: debug_print("REQUEST_KILL");break;
}
debug_print(" ");
debug_print_int(parm);
debug_println("");
#endif // DEBUG_SUBMIT_REQUEST
} /* submit_request */
// --------------------------------------------------------------
void service_rotation(){
static byte az_direction_change_flag = 0;
static byte az_initial_slow_down_voltage = 0;
#ifdef FEATURE_ELEVATION_CONTROL
static byte el_direction_change_flag = 0;
static byte el_initial_slow_down_voltage = 0;
#endif // FEATURE_ELEVATION_CONTROL
if (az_state == INITIALIZE_NORMAL_CW) {
update_az_variable_outputs(normal_az_speed_voltage);
rotator(ACTIVATE, CW);
az_state = NORMAL_CW;
}
if (az_state == INITIALIZE_NORMAL_CCW) {
update_az_variable_outputs(normal_az_speed_voltage);
rotator(ACTIVATE, CCW);
az_state = NORMAL_CCW;
}
if (az_state == INITIALIZE_SLOW_START_CW) {
update_az_variable_outputs(AZ_SLOW_START_STARTING_PWM);
rotator(ACTIVATE, CW);
az_slowstart_start_time = millis();
az_last_step_time = 0;
az_slow_start_step = 0;
az_state = SLOW_START_CW;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: INITIALIZE_SLOW_START_CW -> SLOW_START_CW");
#endif // DEBUG_SERVICE_ROTATION
}
if (az_state == INITIALIZE_SLOW_START_CCW) {
update_az_variable_outputs(AZ_SLOW_START_STARTING_PWM);
rotator(ACTIVATE, CCW);
az_slowstart_start_time = millis();
az_last_step_time = 0;
az_slow_start_step = 0;
az_state = SLOW_START_CCW;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: INITIALIZE_SLOW_START_CCW -> SLOW_START_CCW");
#endif // DEBUG_SERVICE_ROTATION
}
if (az_state == INITIALIZE_TIMED_SLOW_DOWN_CW) {
az_direction_change_flag = 0;
az_timed_slow_down_start_time = millis();
az_last_step_time = millis();
az_slow_down_step = AZ_SLOW_DOWN_STEPS - 1;
az_state = TIMED_SLOW_DOWN_CW;
}
if (az_state == INITIALIZE_TIMED_SLOW_DOWN_CCW) {
az_direction_change_flag = 0;
az_timed_slow_down_start_time = millis();
az_last_step_time = millis();
az_slow_down_step = AZ_SLOW_DOWN_STEPS - 1;
az_state = TIMED_SLOW_DOWN_CCW;
}
if (az_state == INITIALIZE_DIR_CHANGE_TO_CW) {
az_direction_change_flag = 1;
az_timed_slow_down_start_time = millis();
az_last_step_time = millis();
az_slow_down_step = AZ_SLOW_DOWN_STEPS - 1;
az_state = TIMED_SLOW_DOWN_CCW;
}
if (az_state == INITIALIZE_DIR_CHANGE_TO_CCW) {
az_direction_change_flag = 1;
az_timed_slow_down_start_time = millis();
az_last_step_time = millis();
az_slow_down_step = AZ_SLOW_DOWN_STEPS - 1;
az_state = TIMED_SLOW_DOWN_CW;
}
// slow start-------------------------------------------------------------------------------------------------
if ((az_state == SLOW_START_CW) || (az_state == SLOW_START_CCW)) {
if ((millis() - az_slowstart_start_time) >= AZ_SLOW_START_UP_TIME) { // is it time to end slow start?
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: NORMAL_C");
#endif // DEBUG_SERVICE_ROTATION
if (az_state == SLOW_START_CW) {
az_state = NORMAL_CW;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("W");
#endif // DEBUG_SERVICE_ROTATION
} else {
az_state = NORMAL_CCW;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("CW");
#endif // DEBUG_SERVICE_ROTATION
}
update_az_variable_outputs(normal_az_speed_voltage);
} else { // it's not time to end slow start yet, but let's check if it's time to step up the speed voltage
if (((millis() - az_last_step_time) > (AZ_SLOW_START_UP_TIME / AZ_SLOW_START_STEPS)) && (normal_az_speed_voltage > AZ_SLOW_START_STARTING_PWM)) {
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: step up: ");
debug_print_int(az_slow_start_step);
debug_print(" pwm: ");
debug_print_int((int)(AZ_SLOW_START_STARTING_PWM + ((normal_az_speed_voltage - AZ_SLOW_START_STARTING_PWM) * ((float)az_slow_start_step / (float)(AZ_SLOW_START_STEPS - 1)))));
debug_println("");
#endif // DEBUG_SERVICE_ROTATION
update_az_variable_outputs((AZ_SLOW_START_STARTING_PWM + ((normal_az_speed_voltage - AZ_SLOW_START_STARTING_PWM) * ((float)az_slow_start_step / (float)(AZ_SLOW_START_STEPS - 1)))));
az_last_step_time = millis();
az_slow_start_step++;
}
}
} // ((az_state == SLOW_START_CW) || (az_state == SLOW_START_CCW))
// timed slow down ------------------------------------------------------------------------------------------------------
if (((az_state == TIMED_SLOW_DOWN_CW) || (az_state == TIMED_SLOW_DOWN_CCW)) && ((millis() - az_last_step_time) >= (TIMED_SLOW_DOWN_TIME / AZ_SLOW_DOWN_STEPS))) {
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: TIMED_SLOW_DOWN step down: ");
debug_print_int(az_slow_down_step);
debug_print(" pwm: ");
debug_print_int((int)(normal_az_speed_voltage * ((float)az_slow_down_step / (float)AZ_SLOW_DOWN_STEPS)));
debug_println("");
#endif // DEBUG_SERVICE_ROTATION
update_az_variable_outputs((int)(normal_az_speed_voltage * ((float)az_slow_down_step / (float)AZ_SLOW_DOWN_STEPS)));
az_last_step_time = millis();
if (az_slow_down_step > 0) {az_slow_down_step--;}
if (az_slow_down_step == 0) { // is it time to exit timed slow down?
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: TIMED_SLOW_DOWN->IDLE");
#endif // DEBUG_SERVICE_ROTATION
rotator(DEACTIVATE, CW);
rotator(DEACTIVATE, CCW);
if (az_direction_change_flag) {
if (az_state == TIMED_SLOW_DOWN_CW) {
//rotator(ACTIVATE, CCW);
if (az_slowstart_active) {
az_state = INITIALIZE_SLOW_START_CCW;
} else { az_state = NORMAL_CCW; };
az_direction_change_flag = 0;
}
if (az_state == TIMED_SLOW_DOWN_CCW) {
//rotator(ACTIVATE, CW);
if (az_slowstart_active) {
az_state = INITIALIZE_SLOW_START_CW;
} else { az_state = NORMAL_CW; };
az_direction_change_flag = 0;
}
} else {
az_state = IDLE;
az_request_queue_state = NONE;
}
}
} // ((az_state == TIMED_SLOW_DOWN_CW) || (az_state == TIMED_SLOW_DOWN_CCW))
// slow down ---------------------------------------------------------------------------------------------------------------
if ((az_state == SLOW_DOWN_CW) || (az_state == SLOW_DOWN_CCW)) {
// is it time to do another step down?
if (abs((target_raw_azimuth - raw_azimuth) / HEADING_MULTIPLIER) <= (((float)SLOW_DOWN_BEFORE_TARGET_AZ * ((float)az_slow_down_step / (float)AZ_SLOW_DOWN_STEPS)))) {
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: step down: ");
debug_print_int(az_slow_down_step);
debug_print(" pwm: ");
debug_print_int((int)(AZ_SLOW_DOWN_PWM_STOP + ((az_initial_slow_down_voltage - AZ_SLOW_DOWN_PWM_STOP) * ((float)az_slow_down_step / (float)AZ_SLOW_DOWN_STEPS))));
debug_println("");
#endif // DEBUG_SERVICE_ROTATION
update_az_variable_outputs((AZ_SLOW_DOWN_PWM_STOP + ((az_initial_slow_down_voltage - AZ_SLOW_DOWN_PWM_STOP) * ((float)az_slow_down_step / (float)AZ_SLOW_DOWN_STEPS))));
if (az_slow_down_step > 0) {az_slow_down_step--;}
}
} // ((az_state == SLOW_DOWN_CW) || (az_state == SLOW_DOWN_CCW))
// normal -------------------------------------------------------------------------------------------------------------------
// if slow down is enabled, see if we're ready to go into slowdown
if (((az_state == NORMAL_CW) || (az_state == SLOW_START_CW) || (az_state == NORMAL_CCW) || (az_state == SLOW_START_CCW)) &&
(az_request_queue_state == IN_PROGRESS_TO_TARGET) && az_slowdown_active && (abs((target_raw_azimuth - raw_azimuth) / HEADING_MULTIPLIER) <= SLOW_DOWN_BEFORE_TARGET_AZ)) {
byte az_state_was = az_state;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: SLOW_DOWN_C");
#endif // DEBUG_SERVICE_ROTATION
az_slow_down_step = AZ_SLOW_DOWN_STEPS - 1;
if ((az_state == NORMAL_CW) || (az_state == SLOW_START_CW)) {
az_state = SLOW_DOWN_CW;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("W");
#endif // DEBUG_SERVICE_ROTATION
} else {
az_state = SLOW_DOWN_CCW;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("CW");
#endif // DEBUG_SERVICE_ROTATION
}
//aaaaaa
if ((az_state_was == SLOW_START_CW) || (az_state_was == SLOW_START_CCW)){
az_initial_slow_down_voltage = (AZ_INITIALLY_IN_SLOW_DOWN_PWM);
update_az_variable_outputs(az_initial_slow_down_voltage);
#ifdef DEBUG_SERVICE_ROTATION
debug_print(" SLOW_START -> SLOW_DOWN az_initial_slow_down_voltage:");
debug_print_int(az_initial_slow_down_voltage);
debug_print(" ");
#endif // DEBUG_SERVICE_ROTATION
} else {
if (AZ_SLOW_DOWN_PWM_START < current_az_speed_voltage) {
update_az_variable_outputs(AZ_SLOW_DOWN_PWM_START);
az_initial_slow_down_voltage = AZ_SLOW_DOWN_PWM_START;
} else {
az_initial_slow_down_voltage = current_az_speed_voltage;
}
}
}
// check rotation target --------------------------------------------------------------------------------------------------------
if ((az_state != IDLE) && (az_request_queue_state == IN_PROGRESS_TO_TARGET) ) {
if ((az_state == NORMAL_CW) || (az_state == SLOW_START_CW) || (az_state == SLOW_DOWN_CW)) {
if ((abs(raw_azimuth - target_raw_azimuth) < (AZIMUTH_TOLERANCE * HEADING_MULTIPLIER)) || ((raw_azimuth > target_raw_azimuth) && ((raw_azimuth - target_raw_azimuth) < ((AZIMUTH_TOLERANCE + 5) * HEADING_MULTIPLIER)))) {
delay(50);
read_azimuth(0);
if ((abs(raw_azimuth - target_raw_azimuth) < (AZIMUTH_TOLERANCE * HEADING_MULTIPLIER)) || ((raw_azimuth > target_raw_azimuth) && ((raw_azimuth - target_raw_azimuth) < ((AZIMUTH_TOLERANCE + 5) * HEADING_MULTIPLIER)))) {
rotator(DEACTIVATE, CW);
rotator(DEACTIVATE, CCW);
az_state = IDLE;
az_request_queue_state = NONE;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: IDLE");
#endif // DEBUG_SERVICE_ROTATION
#if defined(FEATURE_PARK) && !defined(FEATURE_ELEVATION_CONTROL)
if (park_status == PARK_INITIATED) {
park_status = PARKED;
}
#endif // defined(FEATURE_PARK) && !defined(FEATURE_ELEVATION_CONTROL)
#if defined(FEATURE_PARK) && defined(FEATURE_ELEVATION_CONTROL)
if ((park_status == PARK_INITIATED) && (el_state == IDLE)) {
park_status = PARKED;
}
#endif // defined(FEATURE_PARK) && !defined(FEATURE_ELEVATION_CONTROL)
}
}
} else {
if ((abs(raw_azimuth - target_raw_azimuth) < (AZIMUTH_TOLERANCE * HEADING_MULTIPLIER)) || ((raw_azimuth < target_raw_azimuth) && ((target_raw_azimuth - raw_azimuth) < ((AZIMUTH_TOLERANCE + 5) * HEADING_MULTIPLIER)))) {
delay(50);
read_azimuth(0);
if ((abs(raw_azimuth - target_raw_azimuth) < (AZIMUTH_TOLERANCE * HEADING_MULTIPLIER)) || ((raw_azimuth < target_raw_azimuth) && ((target_raw_azimuth - raw_azimuth) < ((AZIMUTH_TOLERANCE + 5) * HEADING_MULTIPLIER)))) {
rotator(DEACTIVATE, CW);
rotator(DEACTIVATE, CCW);
az_state = IDLE;
az_request_queue_state = NONE;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: IDLE");
#endif // DEBUG_SERVICE_ROTATION
#if defined(FEATURE_PARK) && !defined(FEATURE_ELEVATION_CONTROL)
if (park_status == PARK_INITIATED) {
park_status = PARKED;
}
#endif // defined(FEATURE_PARK) && !defined(FEATURE_ELEVATION_CONTROL)
#if defined(FEATURE_PARK) && defined(FEATURE_ELEVATION_CONTROL)
if ((park_status == PARK_INITIATED) && (el_state == IDLE)) {
park_status = PARKED;
}
#endif // defined(FEATURE_PARK) && !defined(FEATURE_ELEVATION_CONTROL)
}
}
}
}
#ifdef FEATURE_ELEVATION_CONTROL
if (el_state == INITIALIZE_NORMAL_UP) {
update_el_variable_outputs(normal_el_speed_voltage);
rotator(ACTIVATE, UP);
el_state = NORMAL_UP;
}
if (el_state == INITIALIZE_NORMAL_DOWN) {
update_el_variable_outputs(normal_el_speed_voltage);
rotator(ACTIVATE, DOWN);
el_state = NORMAL_DOWN;
}
if (el_state == INITIALIZE_SLOW_START_UP) {
update_el_variable_outputs(EL_SLOW_START_STARTING_PWM);
rotator(ACTIVATE, UP);
el_slowstart_start_time = millis();
el_last_step_time = 0;
el_slow_start_step = 0;
el_state = SLOW_START_UP;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: INITIALIZE_SLOW_START_UP -> SLOW_START_UP");
#endif // DEBUG_SERVICE_ROTATION
}
if (el_state == INITIALIZE_SLOW_START_DOWN) {
update_el_variable_outputs(EL_SLOW_START_STARTING_PWM);
rotator(ACTIVATE, DOWN);
el_slowstart_start_time = millis();
el_last_step_time = 0;
el_slow_start_step = 0;
el_state = SLOW_START_DOWN;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: INITIALIZE_SLOW_START_DOWN -> SLOW_START_DOWN");
#endif // DEBUG_SERVICE_ROTATION
}
if (el_state == INITIALIZE_TIMED_SLOW_DOWN_UP) {
el_direction_change_flag = 0;
el_timed_slow_down_start_time = millis();
el_last_step_time = millis();
el_slow_down_step = EL_SLOW_DOWN_STEPS - 1;
el_state = TIMED_SLOW_DOWN_UP;
}
if (el_state == INITIALIZE_TIMED_SLOW_DOWN_DOWN) {
el_direction_change_flag = 0;
el_timed_slow_down_start_time = millis();
el_last_step_time = millis();
el_slow_down_step = EL_SLOW_DOWN_STEPS - 1;
el_state = TIMED_SLOW_DOWN_DOWN;
}
if (el_state == INITIALIZE_DIR_CHANGE_TO_UP) {
el_direction_change_flag = 1;
el_timed_slow_down_start_time = millis();
el_last_step_time = millis();
el_slow_down_step = EL_SLOW_DOWN_STEPS - 1;
el_state = TIMED_SLOW_DOWN_DOWN;
}
if (el_state == INITIALIZE_DIR_CHANGE_TO_DOWN) {
el_direction_change_flag = 1;
el_timed_slow_down_start_time = millis();
el_last_step_time = millis();
el_slow_down_step = EL_SLOW_DOWN_STEPS - 1;
el_state = TIMED_SLOW_DOWN_UP;
}
// slow start-------------------------------------------------------------------------------------------------
if ((el_state == SLOW_START_UP) || (el_state == SLOW_START_DOWN)) {
if ((millis() - el_slowstart_start_time) >= EL_SLOW_START_UP_TIME) { // is it time to end slow start?
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: NORMAL_");
#endif // DEBUG_SERVICE_ROTATION
if (el_state == SLOW_START_UP) {
el_state = NORMAL_UP;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("UP");
#endif // DEBUG_SERVICE_ROTATION
} else {
el_state = NORMAL_DOWN;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("DOWN");
#endif // DEBUG_SERVICE_ROTATION
}
update_el_variable_outputs(normal_el_speed_voltage);
} else { // it's not time to end slow start yet, but let's check if it's time to step up the speed voltage
if (((millis() - el_last_step_time) > (EL_SLOW_START_UP_TIME / EL_SLOW_START_STEPS)) && (normal_el_speed_voltage > EL_SLOW_START_STARTING_PWM)) {
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: step up: ");
debug_print_int(el_slow_start_step);
debug_print(" pwm: ");
debug_print_int((int)(EL_SLOW_START_STARTING_PWM + ((normal_el_speed_voltage - EL_SLOW_START_STARTING_PWM) * ((float)el_slow_start_step / (float)(EL_SLOW_START_STEPS - 1)))));
debug_println("");
#endif // DEBUG_SERVICE_ROTATION
update_el_variable_outputs((EL_SLOW_START_STARTING_PWM + ((normal_el_speed_voltage - EL_SLOW_START_STARTING_PWM) * ((float)el_slow_start_step / (float)(EL_SLOW_START_STEPS - 1)))));
el_last_step_time = millis();
el_slow_start_step++;
}
}
} // ((el_state == SLOW_START_UP) || (el_state == SLOW_START_DOWN))
// timed slow down ------------------------------------------------------------------------------------------------------
if (((el_state == TIMED_SLOW_DOWN_UP) || (el_state == TIMED_SLOW_DOWN_DOWN)) && ((millis() - el_last_step_time) >= (TIMED_SLOW_DOWN_TIME / EL_SLOW_DOWN_STEPS))) {
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: TIMED_SLOW_DOWN step down: ");
debug_print_int(el_slow_down_step);
debug_print(" pwm: ");
debug_print_int((int)(normal_el_speed_voltage * ((float)el_slow_down_step / (float)EL_SLOW_DOWN_STEPS)));
debug_println("");
#endif // DEBUG_SERVICE_ROTATION
update_el_variable_outputs((int)(normal_el_speed_voltage * ((float)el_slow_down_step / (float)EL_SLOW_DOWN_STEPS)));
el_last_step_time = millis();
if (el_slow_down_step > 0) {el_slow_down_step--;}
if (el_slow_down_step == 0) { // is it time to exit timed slow down?
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: TIMED_SLOW_DOWN->IDLE");
#endif // DEBUG_SERVICE_ROTATION
rotator(DEACTIVATE, UP);
rotator(DEACTIVATE, DOWN);
if (el_direction_change_flag) {
if (el_state == TIMED_SLOW_DOWN_UP) {
if (el_slowstart_active) {
el_state = INITIALIZE_SLOW_START_DOWN;
} else { el_state = NORMAL_DOWN; };
el_direction_change_flag = 0;
}
if (el_state == TIMED_SLOW_DOWN_DOWN) {
if (el_slowstart_active) {
el_state = INITIALIZE_SLOW_START_UP;
} else { el_state = NORMAL_UP; };
el_direction_change_flag = 0;
}
} else {
el_state = IDLE;
el_request_queue_state = NONE;
}
}
} // ((el_state == TIMED_SLOW_DOWN_UP) || (el_state == TIMED_SLOW_DOWN_DOWN))
// slow down ---------------------------------------------------------------------------------------------------------------
if ((el_state == SLOW_DOWN_UP) || (el_state == SLOW_DOWN_DOWN)) {
// is it time to do another step down?
if (abs((target_elevation - elevation) / HEADING_MULTIPLIER) <= (((float)SLOW_DOWN_BEFORE_TARGET_EL * ((float)el_slow_down_step / (float)EL_SLOW_DOWN_STEPS)))) {
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: step down: ");
debug_print_int(el_slow_down_step);
debug_print(" pwm: ");
debug_print_int((int)(EL_SLOW_DOWN_PWM_STOP + ((el_initial_slow_down_voltage - EL_SLOW_DOWN_PWM_STOP) * ((float)el_slow_down_step / (float)EL_SLOW_DOWN_STEPS))));
debug_println("");
#endif // DEBUG_SERVICE_ROTATION
update_el_variable_outputs((EL_SLOW_DOWN_PWM_STOP + ((el_initial_slow_down_voltage - EL_SLOW_DOWN_PWM_STOP) * ((float)el_slow_down_step / (float)EL_SLOW_DOWN_STEPS))));
if (el_slow_down_step > 0) {el_slow_down_step--;}
}
} // ((el_state == SLOW_DOWN_UP) || (el_state == SLOW_DOWN_DOWN))
// normal -------------------------------------------------------------------------------------------------------------------
// if slow down is enabled, see if we're ready to go into slowdown
if (((el_state == NORMAL_UP) || (el_state == SLOW_START_UP) || (el_state == NORMAL_DOWN) || (el_state == SLOW_START_DOWN)) &&
(el_request_queue_state == IN_PROGRESS_TO_TARGET) && el_slowdown_active && (abs((target_elevation - elevation) / HEADING_MULTIPLIER) <= SLOW_DOWN_BEFORE_TARGET_EL)) {
byte el_state_was = el_state;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: SLOW_DOWN_");
#endif // DEBUG_SERVICE_ROTATION
el_slow_down_step = EL_SLOW_DOWN_STEPS - 1;
if ((el_state == NORMAL_UP) || (el_state == SLOW_START_UP)) {
el_state = SLOW_DOWN_UP;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("UP");
#endif // DEBUG_SERVICE_ROTATION
} else {
el_state = SLOW_DOWN_DOWN;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("DOWN");
#endif // DEBUG_SERVICE_ROTATION
}
if ((el_state_was == SLOW_START_UP) || (el_state_was == SLOW_START_DOWN)){
el_initial_slow_down_voltage = EL_INITIALLY_IN_SLOW_DOWN_PWM;
update_el_variable_outputs(el_initial_slow_down_voltage);
#ifdef DEBUG_SERVICE_ROTATION
debug_print(" SLOW_START -> SLOW_DOWN el_initial_slow_down_voltage:");
debug_print_int(el_initial_slow_down_voltage);
debug_print(" ");
#endif // DEBUG_SERVICE_ROTATION
} else {
if (EL_SLOW_DOWN_PWM_START < current_el_speed_voltage) {
update_el_variable_outputs(EL_SLOW_DOWN_PWM_START);
el_initial_slow_down_voltage = EL_SLOW_DOWN_PWM_START;
} else {
el_initial_slow_down_voltage = current_el_speed_voltage;
}
}
}
// check rotation target --------------------------------------------------------------------------------------------------------
if ((el_state != IDLE) && (el_request_queue_state == IN_PROGRESS_TO_TARGET) ) {
if ((el_state == NORMAL_UP) || (el_state == SLOW_START_UP) || (el_state == SLOW_DOWN_UP)) {
if ((abs(elevation - target_elevation) < (ELEVATION_TOLERANCE * HEADING_MULTIPLIER)) || ((elevation > target_elevation) && ((elevation - target_elevation) < ((ELEVATION_TOLERANCE + 5) * HEADING_MULTIPLIER)))) {
delay(50);
read_elevation(0);
if ((abs(elevation - target_elevation) < (ELEVATION_TOLERANCE * HEADING_MULTIPLIER)) || ((elevation > target_elevation) && ((elevation - target_elevation) < ((ELEVATION_TOLERANCE + 5) * HEADING_MULTIPLIER)))) {
rotator(DEACTIVATE, UP);
rotator(DEACTIVATE, DOWN);
el_state = IDLE;
el_request_queue_state = NONE;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: IDLE");
#endif // DEBUG_SERVICE_ROTATION
#if defined(FEATURE_PARK)
if ((park_status == PARK_INITIATED) && (az_state == IDLE)) {
park_status = PARKED;
}
#endif // defined(FEATURE_PARK)
}
}
} else {
if ((abs(elevation - target_elevation) < (ELEVATION_TOLERANCE * HEADING_MULTIPLIER)) || ((elevation < target_elevation) && ((target_elevation - elevation) < ((ELEVATION_TOLERANCE + 5) * HEADING_MULTIPLIER)))) {
delay(50);
read_elevation(0);
if ((abs(elevation - target_elevation) < (ELEVATION_TOLERANCE * HEADING_MULTIPLIER)) || ((elevation < target_elevation) && ((target_elevation - elevation) < ((ELEVATION_TOLERANCE + 5) * HEADING_MULTIPLIER)))) {
rotator(DEACTIVATE, UP);
rotator(DEACTIVATE, DOWN);
el_state = IDLE;
el_request_queue_state = NONE;
#ifdef DEBUG_SERVICE_ROTATION
debug_print("service_rotation: IDLE");
#endif // DEBUG_SERVICE_ROTATION
#if defined(FEATURE_PARK)
if ((park_status == PARK_INITIATED) && (az_state == IDLE)) {
park_status = PARKED;
}
#endif // defined(FEATURE_PARK)
}
}
}
}
#endif // FEATURE_ELEVATION_CONTROL
} /* service_rotation */
// --------------------------------------------------------------
void stop_all_tracking(){
#ifdef FEATURE_MOON_TRACKING
moon_tracking_active = 0;
#endif // FEATURE_MOON_TRACKING
#ifdef FEATURE_SUN_TRACKING
sun_tracking_active = 0;
#endif // FEATURE_SUN_TRACKING
}
// --------------------------------------------------------------
void service_request_queue(){
// xxxx
int work_target_raw_azimuth = 0;
byte direction_to_go = 0;
byte within_tolerance_flag = 0;
if (az_request_queue_state == IN_QUEUE) {
#ifdef FEATURE_POWER_SWITCH
last_activity_time = millis();
#endif //FEATURE_POWER_SWITCH
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("service_request_queue: AZ ");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
switch (az_request) {
case (REQUEST_STOP):
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("REQUEST_STOP");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
stop_all_tracking();
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
if (az_state != IDLE) {
if (az_slowdown_active) {
if ((az_state == TIMED_SLOW_DOWN_CW) || (az_state == TIMED_SLOW_DOWN_CCW) || (az_state == SLOW_DOWN_CW) || (az_state == SLOW_DOWN_CCW)) { // if we're already in timed slow down and we get another stop, do a hard stop
rotator(DEACTIVATE, CW);
rotator(DEACTIVATE, CCW);
az_state = IDLE;
az_request_queue_state = NONE;
}
if ((az_state == SLOW_START_CW) || (az_state == NORMAL_CW)) {
az_state = INITIALIZE_TIMED_SLOW_DOWN_CW;
az_request_queue_state = IN_PROGRESS_TIMED;
az_last_rotate_initiation = millis();
}
if ((az_state == SLOW_START_CCW) || (az_state == NORMAL_CCW)) {
az_state = INITIALIZE_TIMED_SLOW_DOWN_CCW;
az_request_queue_state = IN_PROGRESS_TIMED;
az_last_rotate_initiation = millis();
}
} else {
rotator(DEACTIVATE, CW);
rotator(DEACTIVATE, CCW);
az_state = IDLE;
az_request_queue_state = NONE;
}
} else {
az_request_queue_state = NONE; // nothing to do - we clear the queue
}
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println();
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
break; // REQUEST_STOP
case (REQUEST_AZIMUTH):
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("REQUEST_AZIMUTH");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
if ((az_request_parm >= 0) && (az_request_parm <= (360 * HEADING_MULTIPLIER))) {
target_azimuth = az_request_parm;
target_raw_azimuth = az_request_parm;
if (target_azimuth == (360 * HEADING_MULTIPLIER)) {
target_azimuth = 0;
}
if ((target_azimuth > (azimuth - (AZIMUTH_TOLERANCE * HEADING_MULTIPLIER))) && (target_azimuth < (azimuth + (AZIMUTH_TOLERANCE * HEADING_MULTIPLIER)))) {
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print(" request within tolerance");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
within_tolerance_flag = 1;
az_request_queue_state = NONE;
} else { // target azimuth is not within tolerance, we need to rotate
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print(" ->A");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
work_target_raw_azimuth = target_azimuth;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print(" work_target_raw_azimuth:");
debug_print_int(work_target_raw_azimuth / HEADING_MULTIPLIER);
debug_print(" azimuth_starting_point:");
debug_print_int(azimuth_starting_point);
debug_print(" ");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
if (work_target_raw_azimuth < (azimuth_starting_point * HEADING_MULTIPLIER)) {
work_target_raw_azimuth = work_target_raw_azimuth + (360 * HEADING_MULTIPLIER);
target_raw_azimuth = work_target_raw_azimuth;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("->B");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
}
if ((work_target_raw_azimuth + (360 * HEADING_MULTIPLIER)) < ((azimuth_starting_point + azimuth_rotation_capability) * HEADING_MULTIPLIER)) { // is there a second possible heading in overlap?
if (abs(raw_azimuth - work_target_raw_azimuth) < abs((work_target_raw_azimuth + (360 * HEADING_MULTIPLIER)) - raw_azimuth)) { // is second possible heading closer?
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("->C");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
if (work_target_raw_azimuth > raw_azimuth) { // not closer, use position in non-overlap
direction_to_go = CW;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("->CW!");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
} else {
direction_to_go = CCW;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("->CCW!");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
}
} else { // go to position in overlap
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("->D");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
target_raw_azimuth = work_target_raw_azimuth + (360 * HEADING_MULTIPLIER);
if ((work_target_raw_azimuth + (360 * HEADING_MULTIPLIER)) > raw_azimuth) {
direction_to_go = CW;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("->CW!");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
} else {
direction_to_go = CCW;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("->CCW!");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
}
}
} else { // no possible second heading in overlap
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("->E");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
if (work_target_raw_azimuth > raw_azimuth) {
direction_to_go = CW;
} else {
direction_to_go = CCW;
}
}
}
} else {
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("->F");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
if ((az_request_parm > (360 * HEADING_MULTIPLIER)) && (az_request_parm <= ((azimuth_starting_point + azimuth_rotation_capability) * HEADING_MULTIPLIER))) {
target_azimuth = az_request_parm - (360 * HEADING_MULTIPLIER);
target_raw_azimuth = az_request_parm;
if (az_request_parm > raw_azimuth) {
direction_to_go = CW;
} else {
direction_to_go = CCW;
}
} else {
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print(" error: bogus azimuth request:");
debug_print_int(az_request_parm);
debug_println("");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
rotator(DEACTIVATE, CW);
rotator(DEACTIVATE, CCW);
az_state = IDLE;
az_request_queue_state = NONE;
return;
}
}
if (direction_to_go == CW) {
if (((az_state == SLOW_START_CCW) || (az_state == NORMAL_CCW) || (az_state == SLOW_DOWN_CCW) || (az_state == TIMED_SLOW_DOWN_CCW)) && (az_slowstart_active)) {
az_state = INITIALIZE_DIR_CHANGE_TO_CW;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print(" INITIALIZE_DIR_CHANGE_TO_CW");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
} else {
if ((az_state != INITIALIZE_SLOW_START_CW) && (az_state != SLOW_START_CW) && (az_state != NORMAL_CW)) { // if we're already rotating CW, don't do anything
// rotator(ACTIVATE,CW);
if (az_slowstart_active) {
az_state = INITIALIZE_SLOW_START_CW;
} else { az_state = INITIALIZE_NORMAL_CW; };
}
}
}
if (direction_to_go == CCW) {
if (((az_state == SLOW_START_CW) || (az_state == NORMAL_CW) || (az_state == SLOW_DOWN_CW) || (az_state == TIMED_SLOW_DOWN_CW)) && (az_slowstart_active)) {
az_state = INITIALIZE_DIR_CHANGE_TO_CCW;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print(" INITIALIZE_DIR_CHANGE_TO_CCW");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
} else {
if ((az_state != INITIALIZE_SLOW_START_CCW) && (az_state != SLOW_START_CCW) && (az_state != NORMAL_CCW)) { // if we're already rotating CCW, don't do anything
// rotator(ACTIVATE,CCW);
if (az_slowstart_active) {
az_state = INITIALIZE_SLOW_START_CCW;
} else { az_state = INITIALIZE_NORMAL_CCW; };
}
}
}
if (!within_tolerance_flag) {
az_request_queue_state = IN_PROGRESS_TO_TARGET;
az_last_rotate_initiation = millis();
}
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println();
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
break; // REQUEST_AZIMUTH
case (REQUEST_AZIMUTH_RAW):
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("REQUEST_AZIMUTH_RAW");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
target_raw_azimuth = az_request_parm;
target_azimuth = target_raw_azimuth;
if (target_azimuth >= (360 * HEADING_MULTIPLIER)) {
target_azimuth = target_azimuth - (360 * HEADING_MULTIPLIER);
}
if (((abs(raw_azimuth - target_raw_azimuth) < (AZIMUTH_TOLERANCE * HEADING_MULTIPLIER))) && (az_state == IDLE)) {
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print(" request within tolerance");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
az_request_queue_state = NONE;
within_tolerance_flag = 1;
} else {
if (target_raw_azimuth > raw_azimuth) {
if (((az_state == SLOW_START_CCW) || (az_state == NORMAL_CCW) || (az_state == SLOW_DOWN_CCW) || (az_state == TIMED_SLOW_DOWN_CCW)) && (az_slowstart_active)) {
az_state = INITIALIZE_DIR_CHANGE_TO_CW;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print(" INITIALIZE_DIR_CHANGE_TO_CW");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
} else {
if ((az_state != INITIALIZE_SLOW_START_CW) && (az_state != SLOW_START_CW) && (az_state != NORMAL_CW)) { // if we're already rotating CW, don't do anything
if (az_slowstart_active) {
az_state = INITIALIZE_SLOW_START_CW;
} else { az_state = INITIALIZE_NORMAL_CW; };
}
}
}
if (target_raw_azimuth < raw_azimuth) {
if (((az_state == SLOW_START_CW) || (az_state == NORMAL_CW) || (az_state == SLOW_DOWN_CW) || (az_state == TIMED_SLOW_DOWN_CW)) && (az_slowstart_active)) {
az_state = INITIALIZE_DIR_CHANGE_TO_CCW;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print(" INITIALIZE_DIR_CHANGE_TO_CCW");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
} else {
if ((az_state != INITIALIZE_SLOW_START_CCW) && (az_state != SLOW_START_CCW) && (az_state != NORMAL_CCW)) { // if we're already rotating CCW, don't do anything
if (az_slowstart_active) {
az_state = INITIALIZE_SLOW_START_CCW;
} else { az_state = INITIALIZE_NORMAL_CCW; };
}
}
}
if (!within_tolerance_flag) {
az_request_queue_state = IN_PROGRESS_TO_TARGET;
az_last_rotate_initiation = millis();
}
}
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println();
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
break; // REQUEST_AZIMUTH_RAW
case (REQUEST_CW):
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("REQUEST_CW");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
stop_all_tracking();
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
if (((az_state == SLOW_START_CCW) || (az_state == NORMAL_CCW) || (az_state == SLOW_DOWN_CCW) || (az_state == TIMED_SLOW_DOWN_CCW)) && (az_slowstart_active)) {
az_state = INITIALIZE_DIR_CHANGE_TO_CW;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print(" INITIALIZE_DIR_CHANGE_TO_CW");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
} else {
if ((az_state != SLOW_START_CW) && (az_state != NORMAL_CW)) {
// rotator(ACTIVATE,CW);
if (az_slowstart_active) {
az_state = INITIALIZE_SLOW_START_CW;
} else {
az_state = INITIALIZE_NORMAL_CW;
};
}
}
az_request_queue_state = NONE;
az_last_rotate_initiation = millis();
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println();
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
break; // REQUEST_CW
case (REQUEST_CCW):
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("REQUEST_CCW");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
stop_all_tracking();
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
if (((az_state == SLOW_START_CW) || (az_state == NORMAL_CW) || (az_state == SLOW_DOWN_CW) || (az_state == TIMED_SLOW_DOWN_CW)) && (az_slowstart_active)) {
az_state = INITIALIZE_DIR_CHANGE_TO_CCW;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print(" INITIALIZE_DIR_CHANGE_TO_CCW");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
} else {
if ((az_state != SLOW_START_CCW) && (az_state != NORMAL_CCW)) {
// rotator(ACTIVATE,CCW);
if (az_slowstart_active) {
az_state = INITIALIZE_SLOW_START_CCW;
} else { az_state = INITIALIZE_NORMAL_CCW; };
}
}
az_request_queue_state = NONE;
az_last_rotate_initiation = millis();
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println();
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
break; // REQUEST_CCW
case (REQUEST_KILL):
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("REQUEST_KILL");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
stop_all_tracking();
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
rotator(DEACTIVATE, CW);
rotator(DEACTIVATE, CCW);
az_state = IDLE;
az_request_queue_state = NONE;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_println("");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
break; // REQUEST_KILL
} /* switch */
#ifdef FEATURE_LCD_DISPLAY
if (az_request_queue_state != IN_QUEUE) {push_lcd_update = 1;}
#endif //FEATURE_LCD_DISPLAY
}
#ifdef FEATURE_ELEVATION_CONTROL
if (el_request_queue_state == IN_QUEUE) {
#ifdef FEATURE_POWER_SWITCH
last_activity_time = millis();
#endif //FEATURE_POWER_SWITCH
within_tolerance_flag = 0;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("service_request_queue: EL ");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
switch (el_request) {
case (REQUEST_ELEVATION):
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
debug_print("REQUEST_ELEVATION ");
#endif // DEBUG_SERVICE_REQUEST_QUEUE
target_elevation = el_request_parm;
if (target_elevation > (ELEVATION_MAXIMUM_DEGREES * HEADING_MULTIPLIER)) {
target_elevation = ELEVATION_MAXIMUM_DEGREES * HEADING_MULTIPLIER;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->print(F("REQUEST_ELEVATION: target_elevation > ELEVATION_MAXIMUM_DEGREES"));
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
}
#ifdef OPTION_EL_MANUAL_ROTATE_LIMITS
if (target_elevation < (EL_MANUAL_ROTATE_DOWN_LIMIT * HEADING_MULTIPLIER)) {
target_elevation = EL_MANUAL_ROTATE_DOWN_LIMIT * HEADING_MULTIPLIER;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->print(F("REQUEST_ELEVATION: target_elevation < EL_MANUAL_ROTATE_DOWN_LIMIT"));
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
}
if (target_elevation > (EL_MANUAL_ROTATE_UP_LIMIT * HEADING_MULTIPLIER)) {
target_elevation = EL_MANUAL_ROTATE_UP_LIMIT * HEADING_MULTIPLIER;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->print(F("REQUEST_ELEVATION: target_elevation > EL_MANUAL_ROTATE_UP_LIMIT"));
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
}
#endif // OPTION_EL_MANUAL_ROTATE_LIMITS
if (abs(target_elevation - elevation) < (ELEVATION_TOLERANCE * HEADING_MULTIPLIER)) {
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println(F("requested elevation within tolerance"));
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
within_tolerance_flag = 1;
el_request_queue_state = NONE;
} else {
if (target_elevation > elevation) {
if (((el_state == SLOW_START_DOWN) || (el_state == NORMAL_DOWN) || (el_state == SLOW_DOWN_DOWN) || (el_state == TIMED_SLOW_DOWN_DOWN)) && (el_slowstart_active)) {
el_state = INITIALIZE_DIR_CHANGE_TO_UP;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println(F(" INITIALIZE_DIR_CHANGE_TO_UP"));
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
} else {
if ((el_state != INITIALIZE_SLOW_START_UP) && (el_state != SLOW_START_UP) && (el_state != NORMAL_UP)) { // if we're already rotating UP, don't do anything
if (el_slowstart_active) {
el_state = INITIALIZE_SLOW_START_UP;
} else { el_state = INITIALIZE_NORMAL_UP; };
}
}
} // (target_elevation > elevation)
if (target_elevation < elevation) {
if (((el_state == SLOW_START_UP) || (el_state == NORMAL_UP) || (el_state == SLOW_DOWN_UP) || (el_state == TIMED_SLOW_DOWN_UP)) && (el_slowstart_active)) {
el_state = INITIALIZE_DIR_CHANGE_TO_DOWN;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println(F(" INITIALIZE_DIR_CHANGE_TO_DOWN"));
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
} else {
if ((el_state != INITIALIZE_SLOW_START_DOWN) && (el_state != SLOW_START_DOWN) && (el_state != NORMAL_DOWN)) { // if we're already rotating DOWN, don't do anything
if (el_slowstart_active) {
el_state = INITIALIZE_SLOW_START_DOWN;
} else { el_state = INITIALIZE_NORMAL_DOWN; };
}
}
} // (target_elevation < elevation)
} // (abs(target_elevation - elevation) < ELEVATION_TOLERANCE)
if (!within_tolerance_flag) {
el_request_queue_state = IN_PROGRESS_TO_TARGET;
el_last_rotate_initiation = millis();
}
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println();
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
break; // REQUEST_ELEVATION
case (REQUEST_UP):
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println(F("REQUEST_UP"));
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
stop_all_tracking();
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
if (((el_state == SLOW_START_DOWN) || (el_state == NORMAL_DOWN) || (el_state == SLOW_DOWN_DOWN) || (el_state == TIMED_SLOW_DOWN_DOWN)) && (el_slowstart_active)) {
el_state = INITIALIZE_DIR_CHANGE_TO_UP;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println(F("service_request_queue: INITIALIZE_DIR_CHANGE_TO_UP"));
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
} else {
if ((el_state != SLOW_START_UP) && (el_state != NORMAL_UP)) {
if (el_slowstart_active) {
el_state = INITIALIZE_SLOW_START_UP;
} else { el_state = INITIALIZE_NORMAL_UP; };
}
}
el_request_queue_state = NONE;
el_last_rotate_initiation = millis();
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println();
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
break; // REQUEST_UP
case (REQUEST_DOWN):
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println(F("REQUEST_DOWN"));
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
stop_all_tracking();
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
if (((el_state == SLOW_START_UP) || (el_state == NORMAL_UP) || (el_state == SLOW_DOWN_UP) || (el_state == TIMED_SLOW_DOWN_UP)) && (el_slowstart_active)) {
el_state = INITIALIZE_DIR_CHANGE_TO_DOWN;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println(F("service_request_queue: INITIALIZE_DIR_CHANGE_TO_DOWN"));
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
} else {
if ((el_state != SLOW_START_DOWN) && (el_state != NORMAL_DOWN)) {
if (el_slowstart_active) {
el_state = INITIALIZE_SLOW_START_DOWN;
} else { el_state = INITIALIZE_NORMAL_DOWN; };
}
}
el_request_queue_state = NONE;
el_last_rotate_initiation = millis();
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println();
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
break; // REQUEST_DOWN
case (REQUEST_STOP):
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println(F("REQUEST_STOP"));
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
stop_all_tracking();
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
if (el_state != IDLE) {
if (el_slowdown_active) {
if ((el_state == TIMED_SLOW_DOWN_UP) || (el_state == TIMED_SLOW_DOWN_DOWN) || (el_state == SLOW_DOWN_UP) || (el_state == SLOW_DOWN_DOWN)) { // if we're already in timed slow down and we get another stop, do a hard stop
rotator(DEACTIVATE, UP);
rotator(DEACTIVATE, DOWN);
el_state = IDLE;
el_request_queue_state = NONE;
}
if ((el_state == SLOW_START_UP) || (el_state == NORMAL_UP)) {
el_state = INITIALIZE_TIMED_SLOW_DOWN_UP;
el_request_queue_state = IN_PROGRESS_TIMED;
el_last_rotate_initiation = millis();
}
if ((el_state == SLOW_START_DOWN) || (el_state == NORMAL_DOWN)) {
el_state = INITIALIZE_TIMED_SLOW_DOWN_DOWN;
el_request_queue_state = IN_PROGRESS_TIMED;
el_last_rotate_initiation = millis();
}
} else {
rotator(DEACTIVATE, UP);
rotator(DEACTIVATE, DOWN);
el_state = IDLE;
el_request_queue_state = NONE;
}
} else {
el_request_queue_state = NONE; // nothing to do, we're already in IDLE state
}
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println();
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
break; // REQUEST_STOP
case (REQUEST_KILL):
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println(F("REQUEST_KILL"));
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
stop_all_tracking();
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
rotator(DEACTIVATE, UP);
rotator(DEACTIVATE, DOWN);
el_state = IDLE;
el_request_queue_state = NONE;
#ifdef DEBUG_SERVICE_REQUEST_QUEUE
if (debug_mode) {
control_port->println();
}
#endif // DEBUG_SERVICE_REQUEST_QUEUE
break; // REQUEST_KILL
} /* switch */
#ifdef FEATURE_LCD_DISPLAY
if (el_request_queue_state != IN_QUEUE) {push_lcd_update = 1;}
#endif //FEATURE_LCD_DISPLAY
} // (el_request_queue_state == IN_QUEUE)
#endif // FEATURE_ELEVATION_CONTROL
} /* service_request_queue */
// --------------------------------------------------------------
void check_for_dirty_configuration(){
static unsigned long last_config_write_time = 0;
if ((configuration_dirty) && ((millis() - last_config_write_time) > (EEPROM_WRITE_DIRTY_CONFIG_TIME * 1000))) {
write_settings_to_eeprom();
last_config_write_time = millis();
}
}
// --------------------------------------------------------------
byte current_az_state(){
if ((az_state == SLOW_START_CW) || (az_state == NORMAL_CW) || (az_state == SLOW_DOWN_CW) || (az_state == TIMED_SLOW_DOWN_CW)) {
return ROTATING_CW;
}
if ((az_state == SLOW_START_CCW) || (az_state == NORMAL_CCW) || (az_state == SLOW_DOWN_CCW) || (az_state == TIMED_SLOW_DOWN_CCW)) {
return ROTATING_CCW;
}
return NOT_DOING_ANYTHING;
}
// --------------------------------------------------------------
#ifdef FEATURE_ELEVATION_CONTROL
byte current_el_state(){
if ((el_state == SLOW_START_UP) || (el_state == NORMAL_UP) || (el_state == SLOW_DOWN_UP) || (el_state == TIMED_SLOW_DOWN_UP)) {
return ROTATING_UP;
}
if ((el_state == SLOW_START_DOWN) || (el_state == NORMAL_DOWN) || (el_state == SLOW_DOWN_DOWN) || (el_state == TIMED_SLOW_DOWN_DOWN)) {
return ROTATING_DOWN;
}
return NOT_DOING_ANYTHING;
}
#endif // FEATURE_ELEVATION_CONTROL
// --------------------------------------------------------------
#ifdef FEATURE_AZ_POSITION_PULSE_INPUT
void az_position_pulse_interrupt_handler(){
#ifdef DEBUG_POSITION_PULSE_INPUT
// az_position_pule_interrupt_handler_flag++;
az_pulse_counter++;
#endif // DEBUG_POSITION_PULSE_INPUT
if (current_az_state() == ROTATING_CW) {
az_position_pulse_input_azimuth += AZ_POSITION_PULSE_DEG_PER_PULSE;
last_known_az_state = ROTATING_CW;
} else {
if (current_az_state() == ROTATING_CCW) {
az_position_pulse_input_azimuth -= AZ_POSITION_PULSE_DEG_PER_PULSE;
last_known_az_state = ROTATING_CCW;
} else {
#ifndef OPTION_PULSE_IGNORE_AMBIGUOUS_PULSES
if (last_known_az_state == ROTATING_CW) {
az_position_pulse_input_azimuth += AZ_POSITION_PULSE_DEG_PER_PULSE;
} else {
if (last_known_az_state == ROTATING_CCW) {
az_position_pulse_input_azimuth -= AZ_POSITION_PULSE_DEG_PER_PULSE;
}
}
#endif // OPTION_PULSE_IGNORE_AMBIGUOUS_PULSES
#ifdef DEBUG_POSITION_PULSE_INPUT
az_pulse_counter_ambiguous++;
#endif // DEBUG_POSITION_PULSE_INPUT
}
}
#ifdef OPTION_AZ_POSITION_PULSE_HARD_LIMIT
if (az_position_pulse_input_azimuth < azimuth_starting_point) {
az_position_pulse_input_azimuth = azimuth_starting_point;
}
if (az_position_pulse_input_azimuth > (azimuth_starting_point + azimuth_rotation_capability)) {
az_position_pulse_input_azimuth = (azimuth_starting_point + azimuth_rotation_capability);
}
#else
if (az_position_pulse_input_azimuth < 0) {
az_position_pulse_input_azimuth += 360;
}
if (az_position_pulse_input_azimuth >= 360) {
az_position_pulse_input_azimuth -= 360;
}
#endif // OPTION_AZ_POSITION_PULSE_HARD_LIMIT
} /* az_position_pulse_interrupt_handler */
#endif // FEATURE_AZ_POSITION_PULSE_INPUT
// --------------------------------------------------------------
#ifdef FEATURE_ELEVATION_CONTROL
#ifdef FEATURE_EL_POSITION_PULSE_INPUT
void el_position_pulse_interrupt_handler(){
#ifdef DEBUG_POSITION_PULSE_INPUT
// el_position_pule_interrupt_handler_flag++;
el_pulse_counter++;
#endif // DEBUG_POSITION_PULSE_INPUT
if (current_el_state() == ROTATING_UP) {
el_position_pulse_input_elevation += EL_POSITION_PULSE_DEG_PER_PULSE;
last_known_el_state = ROTATING_UP;
} else {
if (current_el_state() == ROTATING_DOWN) {
el_position_pulse_input_elevation -= EL_POSITION_PULSE_DEG_PER_PULSE;
last_known_el_state = ROTATING_DOWN;
} else {
#ifndef OPTION_PULSE_IGNORE_AMBIGUOUS_PULSES
if (last_known_el_state == ROTATING_UP) {
el_position_pulse_input_elevation += EL_POSITION_PULSE_DEG_PER_PULSE;
} else {
if (last_known_el_state == ROTATING_DOWN) {
el_position_pulse_input_elevation -= EL_POSITION_PULSE_DEG_PER_PULSE;
}
}
#endif // OPTION_PULSE_IGNORE_AMBIGUOUS_PULSES
#ifdef DEBUG_POSITION_PULSE_INPUT
el_pulse_counter_ambiguous++;
#endif // DEBUG_POSITION_PULSE_INPUT
}
}
#ifdef OPTION_EL_POSITION_PULSE_HARD_LIMIT
if (el_position_pulse_input_elevation < 0) {
el_position_pulse_input_elevation = 0;
}
if (el_position_pulse_input_elevation > ELEVATION_MAXIMUM_DEGREES) {
el_position_pulse_input_elevation = ELEVATION_MAXIMUM_DEGREES;
}
#endif // OPTION_EL_POSITION_PULSE_HARD_LIMIT
} /* el_position_pulse_interrupt_handler */
#endif // FEATURE_EL_POSITION_PULSE_INPUT
#endif // FEATURE_ELEVATION_CONTROL
// --------------------------------------------------------------------------
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
byte submit_remote_command(byte remote_command_to_send, byte parm1, int parm2){
#ifdef FEATURE_MASTER_WITH_ETHERNET_SLAVE
char ethernet_send_string[32];
char temp_string[32];
#endif //FEATURE_MASTER_WITH_ETHERNET_SLAVE
#ifdef FEATURE_MASTER_WITH_ETHERNET_SLAVE
if (ethernetslavelinkclient0_state != ETHERNET_SLAVE_CONNECTED){return 0;}
#endif //FEATURE_MASTER_WITH_ETHERNET_SLAVE
if ((remote_unit_command_submitted && ((remote_command_to_send == REMOTE_UNIT_AZ_COMMAND) || (remote_command_to_send == REMOTE_UNIT_EL_COMMAND) || (remote_command_to_send == REMOTE_UNIT_CL_COMMAND))) || suspend_remote_commands) {
return 0;
} else {
switch (remote_command_to_send) {
case REMOTE_UNIT_CL_COMMAND:
#ifdef FEATURE_MASTER_WITH_SERIAL_SLAVE
remote_unit_port->println("CL");
#endif //FEATURE_MASTER_WITH_SERIAL_SLAVE
#ifdef FEATURE_MASTER_WITH_ETHERNET_SLAVE
ethernet_slave_link_send("CL");
#endif //FEATURE_MASTER_WITH_ETHERNET_SLAVE
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
if (remote_port_tx_sniff) {control_port->println("CL");}
#endif
remote_unit_command_submitted = REMOTE_UNIT_CL_COMMAND;
break;
case REMOTE_UNIT_AZ_COMMAND:
#ifdef FEATURE_MASTER_WITH_SERIAL_SLAVE
remote_unit_port->println("AZ");
#endif //FEATURE_MASTER_WITH_SERIAL_SLAVE
#ifdef FEATURE_MASTER_WITH_ETHERNET_SLAVE
ethernet_slave_link_send("AZ");
#endif //FEATURE_MASTER_WITH_ETHERNET_SLAVE
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
if (remote_port_tx_sniff) {control_port->println("AZ");}
#endif
remote_unit_command_submitted = REMOTE_UNIT_AZ_COMMAND;
break;
case REMOTE_UNIT_EL_COMMAND:
#ifdef FEATURE_MASTER_WITH_SERIAL_SLAVE
remote_unit_port->println("EL");
#endif //FEATURE_MASTER_WITH_SERIAL_SLAVE
#ifdef FEATURE_MASTER_WITH_ETHERNET_SLAVE
ethernet_slave_link_send("EL");
#endif //FEATURE_MASTER_WITH_ETHERNET_SLAVE
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
if (remote_port_tx_sniff) {control_port->println("EL");}
#endif
remote_unit_command_submitted = REMOTE_UNIT_EL_COMMAND;
break;
case REMOTE_UNIT_AW_COMMAND:
#ifdef FEATURE_MASTER_WITH_SERIAL_SLAVE
take_care_of_pending_remote_command();
remote_unit_port->print("AW");
parm1 = parm1 - 100; // pin number
if (parm1 < 10) {remote_unit_port->print("0");}
remote_unit_port->print(parm1);
if (parm2 < 10) {remote_unit_port->print("0");}
if (parm2 < 100) {remote_unit_port->print("0");}
remote_unit_port->println(parm2);
#endif //FEATURE_MASTER_WITH_SERIAL_SLAVE
#ifdef FEATURE_MASTER_WITH_ETHERNET_SLAVE
take_care_of_pending_remote_command();
strcpy(ethernet_send_string,"AW");
parm1 = parm1 - 100; // pin number
if (parm1 < 10) {strcat(ethernet_send_string,"0");}
dtostrf(parm1,0,0,temp_string);
if (parm2 < 10) {strcat(ethernet_send_string,"0");}
if (parm2 < 100) {strcat(ethernet_send_string,"0");}
dtostrf(parm2,0,0,temp_string);
strcat(ethernet_send_string,temp_string);
ethernet_slave_link_send(ethernet_send_string);
#endif //FEATURE_MASTER_WITH_ETHERNET_SLAVE
remote_unit_command_submitted = REMOTE_UNIT_OTHER_COMMAND;
break;
case REMOTE_UNIT_DHL_COMMAND:
#ifdef FEATURE_MASTER_WITH_SERIAL_SLAVE
take_care_of_pending_remote_command();
remote_unit_port->print("D");
if (parm2 == HIGH) {remote_unit_port->print("H");} else {remote_unit_port->print("L");}
parm1 = parm1 - 100;
if (parm1 < 10) {remote_unit_port->print("0");}
remote_unit_port->println(parm1);
#endif //FEATURE_MASTER_WITH_SERIAL_SLAVE
#ifdef FEATURE_MASTER_WITH_ETHERNET_SLAVE
take_care_of_pending_remote_command();
strcpy(ethernet_send_string,"D");
if (parm2 == HIGH) {strcat(ethernet_send_string,"H");} else {strcat(ethernet_send_string,"L");}
parm1 = parm1 - 100;
if (parm1 < 10) {strcat(ethernet_send_string,"0");}
dtostrf(parm1,0,0,temp_string);
strcat(ethernet_send_string,temp_string);
ethernet_slave_link_send(ethernet_send_string);
#endif //FEATURE_MASTER_WITH_ETHERNET_SLAVE
remote_unit_command_submitted = REMOTE_UNIT_OTHER_COMMAND;
break;
case REMOTE_UNIT_DOI_COMMAND:
#ifdef FEATURE_MASTER_WITH_SERIAL_SLAVE
take_care_of_pending_remote_command();
remote_unit_port->print("D");
if (parm2 == OUTPUT) {remote_unit_port->print("O");} else {remote_unit_port->print("I");}
parm1 = parm1 - 100;
if (parm1 < 10) {remote_unit_port->print("0");}
remote_unit_port->println(parm1);
remote_unit_command_submitted = REMOTE_UNIT_OTHER_COMMAND;
// get_remote_port_ok_response();
#endif //FEATURE_MASTER_WITH_SERIAL_SLAVE
#ifdef FEATURE_MASTER_WITH_ETHERNET_SLAVE
take_care_of_pending_remote_command();
strcpy(ethernet_send_string,"D");
if (parm2 == OUTPUT) {strcat(ethernet_send_string,"O");} else {strcat(ethernet_send_string,"I");}
parm1 = parm1 - 100;
if (parm1 < 10) {strcat(ethernet_send_string,"0");}
dtostrf(parm1,0,0,temp_string);
strcat(ethernet_send_string,temp_string);
ethernet_slave_link_send(ethernet_send_string);
remote_unit_command_submitted = REMOTE_UNIT_OTHER_COMMAND;
#endif //FEATURE_MASTER_WITH_ETHERNET_SLAVE
break;
} /* switch */
last_remote_unit_command_time = millis();
remote_unit_command_results_available = 0;
return 1;
}
} /* submit_remote_command */
#endif // defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
// --------------------------------------------------------------------------
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
byte is_ascii_number(byte char_in){
if ((char_in > 47) && (char_in < 58)) {
return 1;
} else {
return 0;
}
}\
#endif // defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
// --------------------------------------------------------------------------
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
void service_remote_communications_incoming_buffer(){
#if defined(FEATURE_CLOCK) && defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE)
int temp_year = 0;
byte temp_month = 0;
byte temp_day = 0;
byte temp_minute = 0;
byte temp_hour = 0;
byte temp_sec = 0;
#endif // defined(FEATURE_CLOCK) && defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE)
byte good_data = 0;
if (remote_unit_port_buffer_carriage_return_flag) {
#ifdef DEBUG_SVC_REMOTE_COMM_INCOMING_BUFFER
debug_print("service_remote_communications_incoming_buffer: remote_unit_port_buffer_index: ");
debug_print_int(remote_unit_port_buffer_index);
debug_print(" buffer: ");
for (int x = 0; x < remote_unit_port_buffer_index; x++) {
debug_write((char*)remote_unit_port_buffer[x]);
debug_println("$");
}
#endif // DEBUG_SVC_REMOTE_COMM_INCOMING_BUFFER
if (remote_unit_command_submitted) { // this was a solicited response
switch (remote_unit_command_submitted) {
case REMOTE_UNIT_CL_COMMAND:
if ((remote_unit_port_buffer[0] == 'C') && (remote_unit_port_buffer[1] == 'L') &&
(remote_unit_port_buffer[12] == ' ') && (remote_unit_port_buffer[21] == 'Z'))
{
#if defined(FEATURE_CLOCK) && defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE)
temp_year = ((remote_unit_port_buffer[2] - 48) * 1000) + ((remote_unit_port_buffer[3] - 48) * 100) + ((remote_unit_port_buffer[4] - 48) * 10) + (remote_unit_port_buffer[5] - 48);
temp_month = ((remote_unit_port_buffer[7] - 48) * 10) + (remote_unit_port_buffer[8] - 48);
temp_day = ((remote_unit_port_buffer[10] - 48) * 10) + (remote_unit_port_buffer[11] - 48);
temp_hour = ((remote_unit_port_buffer[13] - 48) * 10) + (remote_unit_port_buffer[14] - 48);
temp_minute = ((remote_unit_port_buffer[16] - 48) * 10) + (remote_unit_port_buffer[17] - 48);
temp_sec = ((remote_unit_port_buffer[19] - 48) * 10) + (remote_unit_port_buffer[20] - 48);
if ((temp_year > 2013) && (temp_year < 2070) &&
(temp_month > 0) && (temp_month < 13) &&
(temp_day > 0) && (temp_day < 32) &&
(temp_hour >= 0) && (temp_hour < 24) &&
(temp_minute >= 0) && (temp_minute < 60) &&
(temp_sec >= 0) && (temp_sec < 60) ) {
clock_year_set = temp_year;
clock_month_set = temp_month;
clock_day_set = temp_day;
clock_hour_set = temp_hour;
clock_min_set = temp_minute;
clock_sec_set = temp_sec;
millis_at_last_calibration = millis();
#ifdef DEBUG_SYNC_MASTER_CLOCK_TO_SLAVE
debug_println("service_remote_communications_incoming_buffer: clock synced to slave clock");
#endif //DEBUG_SYNC_MASTER_CLOCK_TO_SLAVE
good_data = 1;
if (clock_status == FREE_RUNNING) {clock_status = SLAVE_SYNC;}
} else {
#ifdef DEBUG_SYNC_MASTER_CLOCK_TO_SLAVE
debug_println("service_remote_communications_incoming_buffer: slave clock sync error");
#endif //DEBUG_SYNC_MASTER_CLOCK_TO_SLAVE
if (clock_status == SLAVE_SYNC) {clock_status = FREE_RUNNING;}
}
#endif // defined(FEATURE_CLOCK) && defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE)
#if !defined(FEATURE_CLOCK) || !defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE)
good_data = 1;
#endif //!defined(FEATURE_CLOCK) || !defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE)
} else {
#if defined(FEATURE_CLOCK) && defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE)
#ifdef DEBUG_SYNC_MASTER_CLOCK_TO_SLAVE
debug_print("service_remote_communications_incoming_buffer: REMOTE_UNIT_CL_COMMAND format error. remote_unit_port_buffer_index: ");
debug_print_int(remote_unit_port_buffer_index);
debug_println("");
#endif //DEBUG_SYNC_MASTER_CLOCK_TO_SLAVE
if (clock_status == SLAVE_SYNC) {clock_status = FREE_RUNNING;}
#endif // defined(FEATURE_CLOCK) && defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE)
}
break;
case REMOTE_UNIT_AZ_COMMAND:
if ((remote_unit_port_buffer_index == 13) && (remote_unit_port_buffer[0] == 'A') && (remote_unit_port_buffer[1] == 'Z') &&
(is_ascii_number(remote_unit_port_buffer[2])) && (is_ascii_number(remote_unit_port_buffer[3])) && (is_ascii_number(remote_unit_port_buffer[4])) && (is_ascii_number(remote_unit_port_buffer[6])) && (is_ascii_number(remote_unit_port_buffer[7])) && (is_ascii_number(remote_unit_port_buffer[8])) && (is_ascii_number(remote_unit_port_buffer[9])) && (is_ascii_number(remote_unit_port_buffer[10])) && (is_ascii_number(remote_unit_port_buffer[11]))) {
remote_unit_command_result_float = ((remote_unit_port_buffer[2] - 48) * 100) + ((remote_unit_port_buffer[3] - 48) * 10) + (remote_unit_port_buffer[4] - 48) + ((remote_unit_port_buffer[6] - 48) / 10.0) + ((remote_unit_port_buffer[7] - 48) / 100.0) + ((remote_unit_port_buffer[8] - 48) / 1000.0) + ((remote_unit_port_buffer[9] - 48) / 10000.0) + ((remote_unit_port_buffer[10] - 48) / 100000.0) + ((remote_unit_port_buffer[11] - 48) / 1000000.0);
good_data = 1;
}
break;
case REMOTE_UNIT_EL_COMMAND:
if ((remote_unit_port_buffer_index == 14) && (remote_unit_port_buffer[0] == 'E') && (remote_unit_port_buffer[1] == 'L') &&
(is_ascii_number(remote_unit_port_buffer[3])) && (is_ascii_number(remote_unit_port_buffer[4])) && (is_ascii_number(remote_unit_port_buffer[5])) && (is_ascii_number(remote_unit_port_buffer[7])) && (is_ascii_number(remote_unit_port_buffer[8])) && (is_ascii_number(remote_unit_port_buffer[9])) && (is_ascii_number(remote_unit_port_buffer[10])) && (is_ascii_number(remote_unit_port_buffer[11])) && (is_ascii_number(remote_unit_port_buffer[12]))) {
remote_unit_command_result_float = ((remote_unit_port_buffer[3] - 48) * 100) + ((remote_unit_port_buffer[4] - 48) * 10) + (remote_unit_port_buffer[5] - 48) + ((remote_unit_port_buffer[7] - 48) / 10.0) + ((remote_unit_port_buffer[8] - 48) / 100.0) + ((remote_unit_port_buffer[9] - 48) / 1000.0) + ((remote_unit_port_buffer[10] - 48) / 10000.0) + ((remote_unit_port_buffer[11] - 48) / 100000.0) + ((remote_unit_port_buffer[12] - 48) / 1000000.0);
if (remote_unit_port_buffer[2] == '+') {
good_data = 1;
}
if (remote_unit_port_buffer[2] == '-') {
remote_unit_command_result_float = remote_unit_command_result_float * -1.0;
good_data = 1;
}
}
break;
case REMOTE_UNIT_OTHER_COMMAND:
if ((remote_unit_port_buffer[0] == 'O') && (remote_unit_port_buffer[1] == 'K')) {
good_data = 1;
}
break;
} /* switch */
if (good_data) {
if (remote_unit_command_submitted != REMOTE_UNIT_OTHER_COMMAND) {
remote_unit_command_results_available = remote_unit_command_submitted;
}
remote_unit_good_results++;
#ifdef DEBUG_SVC_REMOTE_COMM_INCOMING_BUFFER
debug_print("service_remote_communications_incoming_buffer: remote_unit_command_results_available: ");
debug_print_int(remote_unit_command_results_available);
debug_print(" remote_unit_command_result_float: ");
debug_print_float(remote_unit_command_result_float,2);
debug_println("");
#endif // DEBUG_SVC_REMOTE_COMM_INCOMING_BUFFER
} else {
#ifdef DEBUG_SVC_REMOTE_COMM_INCOMING_BUFFER_BAD_DATA
debug_print("service_remote_communications_incoming_buffer: bad data: remote_unit_command_submitted: ");
switch (remote_unit_command_submitted) {
case REMOTE_UNIT_AZ_COMMAND: debug_print("REMOTE_UNIT_AZ_COMMAND"); break;
case REMOTE_UNIT_EL_COMMAND: debug_print("REMOTE_UNIT_EL_COMMAND"); break;
case REMOTE_UNIT_OTHER_COMMAND: debug_print("REMOTE_UNIT_OTHER_COMMAND"); break;
default: debug_print("UNDEFINED"); break;
}
debug_print(" buffer_index:");
debug_print_int(remote_unit_port_buffer_index);
debug_print(" buffer: ");
for (int x = 0; x < remote_unit_port_buffer_index; x++) {
debug_write((char*)remote_unit_port_buffer[x]);
}
debug_println("$");
#endif // DEBUG_SVC_REMOTE_COMM_INCOMING_BUFFER_BAD_DATA
remote_unit_command_results_available = 0;
remote_unit_bad_results++;
}
remote_unit_command_submitted = 0;
} else { // this was an unsolicited message
}
remote_unit_port_buffer_carriage_return_flag = 0;
remote_unit_port_buffer_index = 0;
}
// has a command timed out?
if ((remote_unit_command_submitted) && ((millis() - last_remote_unit_command_time) > REMOTE_UNIT_COMMAND_TIMEOUT_MS)) {
#if defined(FEATURE_CLOCK) && defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE)
if ((remote_unit_command_submitted == REMOTE_UNIT_CL_COMMAND) && (clock_status == SLAVE_SYNC)){
clock_status = FREE_RUNNING;
}
#endif //defined(FEATURE_CLOCK) && defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE)
remote_unit_command_timeouts++;
remote_unit_command_submitted = 0;
remote_unit_port_buffer_index = 0;
}
// have characters been in the buffer for some time but no carriage return?
if ((remote_unit_port_buffer_index) && (!remote_unit_command_submitted) && ((millis() - serial1_last_receive_time) > REMOTE_UNIT_COMMAND_TIMEOUT_MS)) {
remote_unit_port_buffer_index = 0;
remote_unit_incoming_buffer_timeouts++;
}
} /* service_remote_communications_incoming_buffer */
#endif // defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
// --------------------------------------------------------------------------
#ifdef FEATURE_AZIMUTH_CORRECTION
float correct_azimuth(float azimuth_in){
if (sizeof(azimuth_calibration_from) != sizeof(azimuth_calibration_to)) {
return azimuth_in;
}
for (unsigned int x = 0; x < (sizeof(azimuth_calibration_from) - 2); x++) {
if ((azimuth_in >= azimuth_calibration_from[x]) && (azimuth_in <= azimuth_calibration_from[x + 1])) {
return (map(azimuth_in * 10, azimuth_calibration_from[x] * 10, azimuth_calibration_from[x + 1] * 10, azimuth_calibration_to[x] * 10, azimuth_calibration_to[x + 1] * 10)) / 10.0;
}
}
return(azimuth_in);
}
#endif // FEATURE_AZIMUTH_CORRECTION
// --------------------------------------------------------------------------
#ifdef FEATURE_ELEVATION_CORRECTION
float correct_elevation(float elevation_in){
if (sizeof(elevation_calibration_from) != sizeof(elevation_calibration_to)) {
return elevation_in;
}
for (unsigned int x = 0; x < (sizeof(elevation_calibration_from) - 2); x++) {
if ((elevation_in >= elevation_calibration_from[x]) && (elevation_in <= elevation_calibration_from[x + 1])) {
return (map(elevation_in * 10, elevation_calibration_from[x] * 10, elevation_calibration_from[x + 1] * 10, elevation_calibration_to[x] * 10, elevation_calibration_to[x + 1] * 10)) / 10.0;
}
}
return(elevation_in);
}
#endif // FEATURE_ELEVATION_CORRECTION
// --------------------------------------------------------------------------
#ifdef FEATURE_JOYSTICK_CONTROL
void check_joystick(){
int joystick_x = 0;
int joystick_y = 0;
static int joystick_resting_x = 0;
static int joystick_resting_y = 0;
static unsigned long last_joystick_az_action_time = 0;
static byte joystick_azimuth_rotation = NOT_DOING_ANYTHING;
#ifdef FEATURE_ELEVATION_CONTROL
static byte joystick_elevation_rotation = NOT_DOING_ANYTHING;
static unsigned long last_joystick_el_action_time = 0;
#endif // FEATURE_ELEVATION_CONTROL
if ((joystick_resting_x == 0) || (joystick_resting_y == 0)) { // initialize the resting readings if this is our first time here
joystick_resting_x = analogReadEnhanced(pin_joystick_x);
joystick_resting_y = analogReadEnhanced(pin_joystick_y);
} else {
joystick_x = analogReadEnhanced(pin_joystick_x);
joystick_y = analogReadEnhanced(pin_joystick_y);
if ((millis() - last_joystick_az_action_time) > JOYSTICK_WAIT_TIME_MS) {
#ifdef DEBUG_JOYSTICK
static unsigned long last_debug_joystick_status = 0;
if ((debug_mode) && ((millis() - last_debug_joystick_status) > 1000)) {
control_port->print("check_joystick: x: ");
control_port->print(joystick_x);
control_port->print("\ty: ");
control_port->println(joystick_y);
last_debug_joystick_status = millis();
}
#endif // DEBUG_JOYSTICK
#ifndef OPTION_JOYSTICK_REVERSE_X_AXIS
if ((joystick_resting_x - joystick_x) < (joystick_resting_x * -0.2)) { // left
#else
if ((joystick_resting_x - joystick_x) > (joystick_resting_x * 0.2)) {
#endif
#ifdef DEBUG_JOYSTICK
if (debug_mode) {
control_port->println("check_joystick: L");
}
#endif // DEBUG_JOYSTICK
if (current_az_state() != ROTATING_CCW) {
submit_request(AZ, REQUEST_CCW, 0, 1);
}
joystick_azimuth_rotation = ROTATING_CCW;
last_joystick_az_action_time = millis();
} else {
#ifndef OPTION_JOYSTICK_REVERSE_X_AXIS
if ((joystick_resting_x - joystick_x) > (joystick_resting_x * 0.2)) { // right
#else
if ((joystick_resting_x - joystick_x) < (joystick_resting_x * -0.2)) {
#endif
#ifdef DEBUG_JOYSTICK
if (debug_mode) {
control_port->println("check_joystick: R");
}
#endif // DEBUG_JOYSTICK
if (current_az_state() != ROTATING_CW) {
submit_request(AZ, REQUEST_CW, 0, 2);
}
joystick_azimuth_rotation = ROTATING_CW;
last_joystick_az_action_time = millis();
} else { // joystick is in X axis resting position
if (joystick_azimuth_rotation != NOT_DOING_ANYTHING) {
if (current_az_state() != NOT_DOING_ANYTHING) {
submit_request(AZ, REQUEST_STOP, 0, 3);
last_joystick_az_action_time = millis();
}
joystick_azimuth_rotation = NOT_DOING_ANYTHING;
}
}
}
}
#ifdef FEATURE_ELEVATION_CONTROL
if ((millis() - last_joystick_el_action_time) > JOYSTICK_WAIT_TIME_MS) {
#ifndef OPTION_JOYSTICK_REVERSE_Y_AXIS
if ((joystick_resting_y - joystick_y) > (joystick_resting_y * 0.2)) { // down
#else
if ((joystick_resting_y - joystick_y) < (joystick_resting_y * -0.2)) {
#endif
#ifdef DEBUG_JOYSTICK
if (debug_mode) {
control_port->println("check_joystick: D");
}
#endif // DEBUG_JOYSTICK
if (current_el_state() != ROTATING_DOWN) {
submit_request(EL, REQUEST_DOWN, 0, 4);
}
joystick_elevation_rotation = ROTATING_DOWN;
last_joystick_el_action_time = millis();
} else {
#ifndef OPTION_JOYSTICK_REVERSE_Y_AXIS
if ((joystick_resting_y - joystick_y) < (joystick_resting_y * -0.2)) { // up
#else
if ((joystick_resting_y - joystick_y) > (joystick_resting_y * 0.2)) {
#endif
#ifdef DEBUG_JOYSTICK
if (debug_mode) {
control_port->println("check_joystick: U");
}
#endif // DEBUG_JOYSTICK
if (current_el_state() != ROTATING_UP) {
submit_request(EL, REQUEST_UP, 0, 5);
}
joystick_elevation_rotation = ROTATING_UP;
last_joystick_el_action_time = millis();
} else { // Y axis is in resting position
if (joystick_elevation_rotation != NOT_DOING_ANYTHING) {
if (current_el_state() != NOT_DOING_ANYTHING) {
submit_request(EL, REQUEST_STOP, 0, 6);
last_joystick_el_action_time = millis();
}
joystick_elevation_rotation = NOT_DOING_ANYTHING;
}
}
}
}
#endif // FEATURE_ELEVATION_CONTROL
}
} /* check_joystick */
#endif // FEATURE_JOYSTICK_CONTROL
// --------------------------------------------------------------------------
#ifdef FEATURE_ROTATION_INDICATOR_PIN
void service_rotation_indicator_pin(){
static byte rotation_indication_pin_state = 0;
static unsigned long time_rotation_went_inactive = 0;
#ifdef FEATURE_ELEVATION_CONTROL
if ((!rotation_indication_pin_state) && ((az_state != IDLE) || (el_state != IDLE))) {
#else
if ((!rotation_indication_pin_state) && ((az_state != IDLE))) {
#endif
if (rotation_indication_pin) {
digitalWriteEnhanced(rotation_indication_pin, ROTATION_INDICATOR_PIN_ACTIVE_STATE);
}
rotation_indication_pin_state = 1;
#ifdef DEBUG_ROTATION_INDICATION_PIN
if (debug_mode) {
control_port->println(F("service_rotation_indicator_pin: active"));
}
#endif
}
#ifdef FEATURE_ELEVATION_CONTROL
if ((rotation_indication_pin_state) && (az_state == IDLE) && (el_state == IDLE)) {
#else
if ((rotation_indication_pin_state) && (az_state == IDLE)) {
#endif
if (time_rotation_went_inactive == 0) {
time_rotation_went_inactive = millis();
} else {
if ((millis() - time_rotation_went_inactive) >= ((ROTATION_INDICATOR_PIN_TIME_DELAY_SECONDS * 1000) + (ROTATION_INDICATOR_PIN_TIME_DELAY_MINUTES * 60 * 1000))) {
if (rotation_indication_pin) {
digitalWriteEnhanced(rotation_indication_pin, ROTATION_INDICATOR_PIN_INACTIVE_STATE);
}
rotation_indication_pin_state = 0;
time_rotation_went_inactive = 0;
#ifdef DEBUG_ROTATION_INDICATION_PIN
if (debug_mode) {
control_port->println(F("service_rotation_indicator_pin: inactive"));
}
#endif
}
}
}
} /* service_rotation_indicator_pin */
#endif // FEATURE_ROTATION_INDICATOR_PIN
// --------------------------------------------------------------
#ifdef FEATURE_PARK
void deactivate_park(){
park_status = NOT_PARKED;
park_serial_initiated = 0;
}
#endif // FEATURE_PARK
// --------------------------------------------------------------
#ifdef FEATURE_PARK
void initiate_park(){
#ifdef DEBUG_PARK
control_port->println(F("initiate_park: park initiated"));
#endif // DEBUG_PARK
byte park_initiated = 0;
stop_all_tracking();
if (abs(raw_azimuth - PARK_AZIMUTH) > (AZIMUTH_TOLERANCE * HEADING_MULTIPLIER)) {
submit_request(AZ, REQUEST_AZIMUTH_RAW, PARK_AZIMUTH, 7);
park_initiated = 1;
}
#ifdef FEATURE_ELEVATION_CONTROL
if (abs(elevation - PARK_ELEVATION) > (ELEVATION_TOLERANCE * HEADING_MULTIPLIER)) {
submit_request(EL, REQUEST_ELEVATION, PARK_ELEVATION, 8);
park_initiated = 1;
}
#endif // FEATURE_ELEVATION
if (park_initiated) {
park_status = PARK_INITIATED;
} else {
park_status = PARKED;
}
} /* initiate_park */
#endif // FEATURE_PARK
// --------------------------------------------------------------
#ifdef FEATURE_PARK
void service_park(){
static byte last_park_status = NOT_PARKED;
if (park_status == PARKED) {
if (abs(raw_azimuth - PARK_AZIMUTH) > (AZIMUTH_TOLERANCE * HEADING_MULTIPLIER)) {
park_status = NOT_PARKED;
}
#ifdef FEATURE_ELEVATION_CONTROL
if (abs(elevation - PARK_ELEVATION) > (ELEVATION_TOLERANCE * HEADING_MULTIPLIER)) {
park_status = NOT_PARKED;
}
#endif // FEATURE_ELEVATION_CONTROL
}
if (park_status != last_park_status) {
switch (park_status) {
case NOT_PARKED:
if (park_in_progress_pin) {
digitalWriteEnhanced(park_in_progress_pin, LOW);
}
if (parked_pin) {
digitalWriteEnhanced(parked_pin, LOW);
}
#ifdef DEBUG_PARK
control_port->println(F("service_park: park_in_progress_pin: LOW parked_pin: LOW"));
#endif // DEBUG_PARK
break;
case PARK_INITIATED:
if (park_in_progress_pin) {
digitalWriteEnhanced(park_in_progress_pin, HIGH);
}
if (parked_pin) {
digitalWriteEnhanced(parked_pin, LOW);
}
#ifdef DEBUG_PARK
control_port->println(F("service_park: park_in_progress_pin: HIGH parked_pin: LOW"));
#endif // DEBUG_PARK
break;
case PARKED:
if (park_in_progress_pin) {
digitalWriteEnhanced(park_in_progress_pin, LOW);
}
if (parked_pin) {
digitalWriteEnhanced(parked_pin, HIGH);
}
if (park_serial_initiated) {
#if defined(FEATURE_REMOTE_UNIT_SLAVE) || defined(FEATURE_YAESU_EMULATION) || defined(FEATURE_EASYCOM_EMULATION)
control_port->println(F("Parked."));
#endif
park_serial_initiated = 0;
}
#ifdef DEBUG_PARK
control_port->println(F("service_park: park_in_progress_pin: LOW parked_pin: HIGH"));
#endif // DEBUG_PARK
break;
} /* switch */
}
last_park_status = park_status;
} /* service_park */
#endif // FEATURE_PARK
// --------------------------------------------------------------
#ifdef FEATURE_LIMIT_SENSE
void check_limit_sense(){
static byte az_limit_tripped = 0;
#ifdef FEATURE_ELEVATION_CONTROL
static byte el_limit_tripped = 0;
#endif // FEATURE_ELEVATION_CONTROL
if (az_limit_sense_pin) {
if (digitalReadEnhanced(az_limit_sense_pin) == 0) {
if (!az_limit_tripped) {
submit_request(AZ, REQUEST_KILL, 0, 9);
az_limit_tripped = 1;
#ifdef DEBUG_LIMIT_SENSE
control_port->println(F("check_limit_sense: az limit tripped"));
#endif // DEBUG_LIMIT_SENSE
}
} else {
az_limit_tripped = 0;
}
}
#ifdef FEATURE_ELEVATION_CONTROL
if (el_limit_sense_pin) {
if (digitalReadEnhanced(el_limit_sense_pin) == 0) {
if (!el_limit_tripped) {
submit_request(EL, REQUEST_KILL, 0, 10);
el_limit_tripped = 1;
#ifdef DEBUG_LIMIT_SENSE
control_port->println(F("check_limit_sense: el limit tripped"));
#endif // DEBUG_LIMIT_SENSE
}
} else {
el_limit_tripped = 0;
}
}
#endif // FEATURE_ELEVATION_CONTROL
} /* check_limit_sense */
#endif // FEATURE_LIMIT_SENSE
// --------------------------------------------------------------
#ifdef FEATURE_AZ_POSITION_INCREMENTAL_ENCODER
void az_position_incremental_encoder_interrupt_handler(){
byte rotation_result = 0;
byte current_phase_a = digitalReadEnhanced(az_incremental_encoder_pin_phase_a);
byte current_phase_b = digitalReadEnhanced(az_incremental_encoder_pin_phase_b);
byte current_phase_z = digitalReadEnhanced(az_incremental_encoder_pin_phase_z);
#ifdef DEBUG_AZ_POSITION_INCREMENTAL_ENCODER
az_position_incremental_encoder_interrupt++;
#endif // DEBUG_AZ_POSITION_INCREMENTAL_ENCODER
if ((az_3_phase_encoder_last_phase_a_state != current_phase_a) || (az_3_phase_encoder_last_phase_b_state != current_phase_b)) {
if (az_3_phase_encoder_last_phase_a_state == LOW) {
rotation_result++;
}
rotation_result = rotation_result << 1;
if (az_3_phase_encoder_last_phase_b_state == LOW) {
rotation_result++;
}
rotation_result = rotation_result << 1;
if (current_phase_a == LOW) {
rotation_result++;
}
rotation_result = rotation_result << 1;
if (current_phase_b == LOW) {
rotation_result++;
}
switch (rotation_result) {
case B0010: //az_incremental_encoder_position++; break;
case B1011: //az_incremental_encoder_position++; break;
case B1101: //az_incremental_encoder_position++; break;
case B0100: az_incremental_encoder_position++; break;
case B0001: //az_incremental_encoder_position--; break;
case B0111: //az_incremental_encoder_position--; break;
case B1110: //az_incremental_encoder_position--; break;
case B1000: az_incremental_encoder_position--; break;
}
if (az_incremental_encoder_position > ((int(AZ_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.) - 1) * 2)) {
az_incremental_encoder_position = 0;
}
if (az_incremental_encoder_position < 0) {
az_incremental_encoder_position = ((int(AZ_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.) - 1) * 2);
}
if ((current_phase_a == LOW) && (current_phase_b == LOW) && (current_phase_z == LOW)) {
if ((az_incremental_encoder_position < int((AZ_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.) / 2)) || (az_incremental_encoder_position > int((AZ_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.) * 1.5))) {
az_incremental_encoder_position = 0;
} else {
az_incremental_encoder_position = int(AZ_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.);
}
}
az_3_phase_encoder_last_phase_a_state = current_phase_a;
az_3_phase_encoder_last_phase_b_state = current_phase_b;
}
} /* az_position_incremental_encoder_interrupt_handler */
#endif // FEATURE_AZ_POSITION_INCREMENTAL_ENCODER
// --------------------------------------------------------------
#ifdef FEATURE_EL_POSITION_INCREMENTAL_ENCODER
void el_position_incremental_encoder_interrupt_handler(){
byte rotation_result = 0;
byte current_phase_a = digitalReadEnhanced(el_incremental_encoder_pin_phase_a);
byte current_phase_b = digitalReadEnhanced(el_incremental_encoder_pin_phase_b);
byte current_phase_z = digitalReadEnhanced(el_incremental_encoder_pin_phase_z);
#ifdef DEBUG_EL_POSITION_INCREMENTAL_ENCODER
el_position_incremental_encoder_interrupt++;
#endif // DEBUG_EL_POSITION_INCREMENTAL_ENCODER
if ((el_3_phase_encoder_last_phase_a_state != current_phase_a) || (el_3_phase_encoder_last_phase_b_state != current_phase_b)) {
if (el_3_phase_encoder_last_phase_a_state == LOW) {
rotation_result++;
}
rotation_result = rotation_result << 1;
if (el_3_phase_encoder_last_phase_b_state == LOW) {
rotation_result++;
}
rotation_result = rotation_result << 1;
if (current_phase_a == LOW) {
rotation_result++;
}
rotation_result = rotation_result << 1;
if (current_phase_b == LOW) {
rotation_result++;
}
switch (rotation_result) {
case B0010: //el_incremental_encoder_position++; break;
case B1011: //el_incremental_encoder_position++; break;
case B1101: //el_incremental_encoder_position++; break;
case B0100: el_incremental_encoder_position++; break;
case B0001: //el_incremental_encoder_position--; break;
case B0111: //el_incremental_encoder_position--; break;
case B1110: //el_incremental_encoder_position--; break;
case B1000: el_incremental_encoder_position--; break;
}
if ((current_phase_a == LOW) && (current_phase_b == LOW) && (current_phase_z == LOW)) {
el_incremental_encoder_position = 0;
} else {
if (el_incremental_encoder_position < 0) {
el_incremental_encoder_position = int((EL_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.) - 1);
}
if (el_incremental_encoder_position >= int(EL_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.)) {
el_incremental_encoder_position = 0;
}
}
/*
if (el_incremental_encoder_position > ((int((EL_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.)) - 1) * 2)) {
el_incremental_encoder_position = 0;
}
if (el_incremental_encoder_position < 0) {
el_incremental_encoder_position = ((int(((EL_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.)*4.)) - 1) * 2);
}
if ((current_phase_a == LOW) && (current_phase_b == LOW) && (current_phase_z == LOW)) {
if ((el_incremental_encoder_position < int((EL_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.) / 2)) || (el_incremental_encoder_position > int((EL_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.) * 1.5))) {
el_incremental_encoder_position = 0;
} else {
el_incremental_encoder_position = int((EL_POSITION_INCREMENTAL_ENCODER_PULSES_PER_REV*4.));
}
}
*/
el_3_phase_encoder_last_phase_a_state = current_phase_a;
el_3_phase_encoder_last_phase_b_state = current_phase_b;
}
} /* el_position_incremental_encoder_interrupt_handler */
#endif // FEATURE_EL_POSITION_INCREMENTAL_ENCODER
// --------------------------------------------------------------
void pinModeEnhanced(uint8_t pin, uint8_t mode){
#if !defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) && !defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
pinMode(pin, mode);
#else
if (pin < 100) {
pinMode(pin, mode);
} else {
submit_remote_command(REMOTE_UNIT_DHL_COMMAND, pin, mode);
}
#endif // !defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) && !defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
}
// --------------------------------------------------------------
void digitalWriteEnhanced(uint8_t pin, uint8_t writevalue){
#if !defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) && !defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
digitalWrite(pin, writevalue);
#else
if (pin < 100) {
digitalWrite(pin, writevalue);
} else {
submit_remote_command(REMOTE_UNIT_DHL_COMMAND, pin, writevalue);
}
#endif // !defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) && !defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
}
// --------------------------------------------------------------
int digitalReadEnhanced(uint8_t pin){
return digitalRead(pin);
}
// --------------------------------------------------------------
int analogReadEnhanced(uint8_t pin){
#ifdef OPTION_EXTERNAL_ANALOG_REFERENCE
analogReference(EXTERNAL);
#endif //OPTION_EXTERNAL_ANALOG_REFERENCE
return analogRead(pin);
}
// --------------------------------------------------------------
void analogWriteEnhanced(uint8_t pin, int writevalue){
#if !defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) && !defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
analogWrite(pin, writevalue);
#else
if (pin < 100) {
analogWrite(pin, writevalue);
} else {
submit_remote_command(REMOTE_UNIT_AW_COMMAND, pin, writevalue);
}
#endif // !defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) && !defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
}
// --------------------------------------------------------------
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
void take_care_of_pending_remote_command(){
// if there's a command already sent to the remote and we're awaiting the response, service the serial buffer and the queue
unsigned long start_time = millis();
while ((remote_unit_command_submitted) && ((millis() - start_time) < 200)) {
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
check_serial();
#endif //defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
#if defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
service_ethernet();
#endif //defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
service_remote_communications_incoming_buffer();
}
}
#endif // defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
// --------------------------------------------------------------
#ifdef FEATURE_MOON_TRACKING
void service_moon_tracking(){
static unsigned long last_check = 0;
static byte moon_tracking_activated_by_activate_line = 0;
static byte moon_tracking_pin_state = 0;
if (moon_tracking_active_pin) {
if ((moon_tracking_active) && (!moon_tracking_pin_state)) {
digitalWriteEnhanced(moon_tracking_active_pin, HIGH);
moon_tracking_pin_state = 1;
}
if ((!moon_tracking_active) && (moon_tracking_pin_state)) {
digitalWriteEnhanced(moon_tracking_active_pin, LOW);
moon_tracking_pin_state = 0;
}
}
if (moon_tracking_activate_line) {
if ((!moon_tracking_active) && (!digitalReadEnhanced(moon_tracking_activate_line))) {
moon_tracking_active = 1;
moon_tracking_activated_by_activate_line = 1;
}
if ((moon_tracking_active) && (digitalReadEnhanced(moon_tracking_activate_line)) && (moon_tracking_activated_by_activate_line)) {
moon_tracking_active = 0;
moon_tracking_activated_by_activate_line = 0;
}
}
if ((moon_tracking_active) && ((millis() - last_check) > MOON_TRACKING_CHECK_INTERVAL)) {
update_time();
update_moon_position();
#ifdef DEBUG_MOON_TRACKING
control_port->print(F("service_moon_tracking: AZ: "));
control_port->print(moon_azimuth);
control_port->print(" EL: ");
control_port->print(moon_elevation);
control_port->print(" lat: ");
control_port->print(latitude);
control_port->print(" long: ");
control_port->println(longitude);
#endif // DEBUG_MOON_TRACKING
if ((moon_azimuth >= MOON_AOS_AZIMUTH_MIN) && (moon_azimuth <= MOON_AOS_AZIMUTH_MAX) && (moon_elevation >= MOON_AOS_ELEVATION_MIN) && (moon_elevation <= MOON_AOS_ELEVATION_MAX)) {
submit_request(AZ, REQUEST_AZIMUTH, moon_azimuth * HEADING_MULTIPLIER, 11);
submit_request(EL, REQUEST_ELEVATION, moon_elevation * HEADING_MULTIPLIER, 12);
if (!moon_visible) {
moon_visible = 1;
#ifdef DEBUG_MOON_TRACKING
control_port->println(F("service_moon_tracking: moon AOS"));
#endif // DEBUG_MOON_TRACKING
}
} else {
if (moon_visible) {
moon_visible = 0;
#ifdef DEBUG_MOON_TRACKING
control_port->println(F("service_moon_tracking: moon loss of AOS"));
#endif // DEBUG_MOON_TRACKING
} else {
#ifdef DEBUG_MOON_TRACKING
control_port->println(F("service_moon_tracking: moon out of AOS limits"));
#endif // DEBUG_MOON_TRACKING
}
}
last_check = millis();
}
} /* service_moon_tracking */
#endif // FEATURE_MOON_TRACKING
// --------------------------------------------------------------
#ifdef FEATURE_SUN_TRACKING
void update_sun_position(){
update_time();
c_time.iYear = clock_years;
c_time.iMonth = clock_months;
c_time.iDay = clock_days;
c_time.dHours = clock_hours;
c_time.dMinutes = clock_minutes;
c_time.dSeconds = clock_seconds;
c_loc.dLongitude = longitude;
c_loc.dLatitude = latitude;
c_sposn.dZenithAngle = 0;
c_sposn.dAzimuth = 0;
sunpos(c_time, c_loc, &c_sposn);
// Convert Zenith angle to elevation
sun_elevation = 90. - c_sposn.dZenithAngle;
sun_azimuth = c_sposn.dAzimuth;
} /* update_sun_position */
#endif // FEATURE_SUN_TRACKING
// --------------------------------------------------------------
#ifdef FEATURE_SUN_TRACKING
void service_sun_tracking(){
static unsigned long last_check = 0;
static byte sun_tracking_pin_state = 0;
static byte sun_tracking_activated_by_activate_line = 0;
if (sun_tracking_active_pin) {
if ((sun_tracking_active) && (!sun_tracking_pin_state)) {
digitalWriteEnhanced(sun_tracking_active_pin, HIGH);
sun_tracking_pin_state = 1;
}
if ((!sun_tracking_active) && (sun_tracking_pin_state)) {
digitalWriteEnhanced(sun_tracking_active_pin, LOW);
sun_tracking_pin_state = 0;
}
}
if (sun_tracking_activate_line) {
if ((!sun_tracking_active) && (!digitalReadEnhanced(sun_tracking_activate_line))) {
sun_tracking_active = 1;
sun_tracking_activated_by_activate_line = 1;
}
if ((sun_tracking_active) && (digitalReadEnhanced(sun_tracking_activate_line)) && (sun_tracking_activated_by_activate_line)) {
sun_tracking_active = 0;
sun_tracking_activated_by_activate_line = 0;
}
}
if ((sun_tracking_active) && ((millis() - last_check) > SUN_TRACKING_CHECK_INTERVAL)) {
update_time();
update_sun_position();
#ifdef DEBUG_SUN_TRACKING
control_port->print(F("service_sun_tracking: AZ: "));
control_port->print(sun_azimuth);
control_port->print(" EL: ");
control_port->print(sun_elevation);
control_port->print(" lat: ");
control_port->print(latitude);
control_port->print(" long: ");
control_port->println(longitude);
#endif // DEBUG_SUN_TRACKING
if ((sun_azimuth >= SUN_AOS_AZIMUTH_MIN) && (sun_azimuth <= SUN_AOS_AZIMUTH_MAX) && (sun_elevation >= SUN_AOS_ELEVATION_MIN) && (sun_elevation <= SUN_AOS_ELEVATION_MAX)) {
submit_request(AZ, REQUEST_AZIMUTH, sun_azimuth * HEADING_MULTIPLIER, 13);
submit_request(EL, REQUEST_ELEVATION, sun_elevation * HEADING_MULTIPLIER, 14);
if (!sun_visible) {
sun_visible = 1;
#ifdef DEBUG_SUN_TRACKING
control_port->println(F("service_sun_tracking: sun AOS"));
#endif // DEBUG_SUN_TRACKING
}
} else {
if (sun_visible) {
sun_visible = 0;
#ifdef DEBUG_SUN_TRACKING
control_port->println(F("service_sun_tracking: sun loss of AOS"));
#endif // DEBUG_SUN_TRACKING
} else {
#ifdef DEBUG_SUN_TRACKING
control_port->println(F("service_sun_tracking: sun out of AOS limits"));
#endif // DEBUG_SUN_TRACKING
}
}
last_check = millis();
}
} /* service_sun_tracking */
#endif // FEATURE_SUN_TRACKING
// --------------------------------------------------------------
#ifdef FEATURE_CLOCK
void update_time(){
unsigned long runtime = millis() - millis_at_last_calibration;
unsigned long time = (3600L * clock_hour_set) + (60L * clock_min_set) + clock_sec_set + ((runtime + (runtime * INTERNAL_CLOCK_CORRECTION)) / 1000.0);
clock_years = clock_year_set;
clock_months = clock_month_set;
clock_days = time / 86400L;
time -= clock_days * 86400L;
clock_days += clock_day_set;
clock_hours = time / 3600L;
switch (clock_months) {
case 1:
case 3:
case 5:
case 7:
case 8:
case 10:
case 12:
if (clock_days > 31) {
clock_days = 1; clock_months++;
}
break;
case 2:
if ((float(clock_years) / 4.0) == 0.0) { // do we have a leap year?
if (clock_days > 29) {
clock_days = 1; clock_months++;
}
} else {
if (clock_days > 28) {
clock_days = 1; clock_months++;
}
}
break;
case 4:
case 6:
case 9:
case 11:
if (clock_days > 30) {
clock_days = 1; clock_months++;
}
break;
} /* switch */
if (clock_months > 12) {
clock_months = 1; clock_years++;
}
time -= clock_hours * 3600L;
clock_minutes = time / 60L;
time -= clock_minutes * 60L;
clock_seconds = time;
} /* update_time */
#endif // FEATURE_CLOCK
// --------------------------------------------------------------
#ifdef FEATURE_GPS
void service_gps(){
long gps_lat, gps_lon;
unsigned long fix_age;
int gps_year;
byte gps_month, gps_day, gps_hours, gps_minutes, gps_seconds, gps_hundredths;
byte gps_sync_pin_active = 0;
#ifdef DEBUG_GPS
char tempstring[10] = "";
#endif //#ifdef DEBUG_GPS
static unsigned long last_sync = 0;
if (gps_data_available) {
// retrieves +/- lat/long in 100000ths of a degree
gps.get_position(&gps_lat, &gps_lon, &fix_age);
gps.crack_datetime(&gps_year, &gps_month, &gps_day, &gps_hours, &gps_minutes, &gps_seconds, &gps_hundredths, &fix_age);
#ifdef DEBUG_GPS
#ifdef DEBUG_GPS_SERIAL
debug_println("");
#endif //DEBUG_GPS_SERIAL
debug_print("service_gps: fix_age:");
debug_print_int(fix_age);
debug_print(" lat:");
debug_print_float(gps_lat,4);
debug_print(" long:");
debug_print_float(gps_lon,4);
debug_print(" ");
debug_print_int(gps_year);
debug_print("-");
debug_print_int(gps_month);
debug_print("-");
debug_print_int(gps_day);
debug_print(" ");
debug_print_int(gps_hours);
debug_print(":");
debug_print_int(gps_minutes);
debug_println("");
#endif // DEBUG_GPS
if (fix_age < GPS_VALID_FIX_AGE_MS) {
if (SYNC_TIME_WITH_GPS) {
clock_year_set = gps_year;
clock_month_set = gps_month;
clock_day_set = gps_day;
clock_hour_set = gps_hours;
clock_min_set = gps_minutes;
clock_sec_set = gps_seconds;
millis_at_last_calibration = millis() - GPS_UPDATE_LATENCY_COMPENSATION_MS;
update_time();
#ifdef DEBUG_GPS
#ifdef DEBUG_GPS_SERIAL
debug_println("");
#endif //DEBUG_GPS_SERIAL
debug_print("service_gps: clock sync:");
sprintf(tempstring,"%s",clock_string());
debug_print(tempstring);
debug_println("");
#endif // DEBUG_GPS
}
#if defined(OPTION_SYNC_RTC_TO_GPS) && defined(FEATURE_RTC_DS1307)
static unsigned long last_rtc_gps_sync_time;
if ((millis() - last_rtc_gps_sync_time) >= (SYNC_RTC_TO_GPS_SECONDS * 1000)) {
rtc.adjust(DateTime(gps_year, gps_month, gps_day, gps_hours, gps_minutes, gps_seconds));
#ifdef DEBUG_RTC
debug_println("service_gps: synced RTC");
#endif // DEBUG_RTC
last_rtc_gps_sync_time = millis();
}
#endif // defined(OPTION_SYNC_RTC_TO_GPS) && defined(FEATURE_RTC_DS1307)
#if defined(OPTION_SYNC_RTC_TO_GPS) && defined(FEATURE_RTC_PCF8583)
static unsigned long last_rtc_gps_sync_time;
if ((millis() - last_rtc_gps_sync_time) >= (SYNC_RTC_TO_GPS_SECONDS * 1000)) {
rtc.year = gps_year;
rtc.month = gps_month;
rtc.day = gps_day;
rtc.hour = gps_hours;
rtc.minute = gps_minutes;
rtc.second = gps_seconds;
rtc.set_time();
#ifdef DEBUG_RTC
debug_println("service_gps: synced RTC");
#endif // DEBUG_RTC
last_rtc_gps_sync_time = millis();
}
#endif // defined(OPTION_SYNC_RTC_TO_GPS) && defined(FEATURE_RTC_PCF8583)
#if defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
if (SYNC_COORDINATES_WITH_GPS) {
latitude = float(gps_lat) / 1000000.0;
longitude = float(gps_lon) / 1000000.0;
#ifdef DEBUG_GPS
debug_print("service_gps: coord sync:");
debug_print_float(latitude,2);
debug_print(" ");
debug_print_float(longitude,2);
debug_println("");
#endif // DEBUG_GPS
}
#endif // defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
last_sync = millis();
}
gps_data_available = 0;
}
if ((millis() > (GPS_SYNC_PERIOD_SECONDS * 1000)) && ((millis() - last_sync) < (GPS_SYNC_PERIOD_SECONDS * 1000)) && (SYNC_TIME_WITH_GPS)) {
clock_status = GPS_SYNC;
if ((!gps_sync_pin_active) && (gps_sync)){
digitalWriteEnhanced(gps_sync,HIGH);
gps_sync_pin_active = 1;
}
} else {
if (clock_status == GPS_SYNC) {
clock_status = FREE_RUNNING;
if (gps_sync_pin_active){
digitalWriteEnhanced(gps_sync,LOW);
gps_sync_pin_active = 0;
}
}
}
} /* service_gps */
#endif // FEATURE_GPS
// --------------------------------------------------------------
#ifdef FEATURE_MOON_TRACKING
void update_moon_position(){
update_time();
double RA, Dec, topRA, topDec, LST, HA, dist;
update_time();
moon2(clock_years, clock_months, clock_days, (clock_hours + (clock_minutes / 60.0) + (clock_seconds / 3600.0)), longitude, latitude, &RA, &Dec, &topRA, &topDec, &LST, &HA, &moon_azimuth, &moon_elevation, &dist);
}
#endif // FEATURE_SUN_TRACKING
// --------------------------------------------------------------
#if defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
byte calibrate_az_el(float new_az, float new_el){
#ifdef DEBUG_OFFSET
control_port->print("calibrate_az_el: new_az:");
control_port->print(new_az, 2);
control_port->print(" new_el:");
control_port->println(new_el, 2);
#endif // DEBUG_OFFSET
if ((new_az >= 0 ) && (new_az <= 360) && (new_el >= 0) && (new_el <= 90)) {
configuration.azimuth_offset = 0;
configuration.elevation_offset = 0;
read_azimuth(1);
read_elevation(1);
#ifdef DEBUG_OFFSET
control_port->print("calibrate_az_el: az:");
control_port->print(azimuth / LCD_HEADING_MULTIPLIER, 2);
control_port->print(" el:");
control_port->println(elevation / LCD_HEADING_MULTIPLIER, 2);
#endif // DEBUG_OFFSET
configuration.azimuth_offset = new_az - (float(azimuth) / float(HEADING_MULTIPLIER));
#if defined(FEATURE_ELEVATION_CONTROL)
configuration.elevation_offset = new_el - (float(elevation) / float(HEADING_MULTIPLIER));
#endif
configuration_dirty = 1;
return 1;
} else {
return 0;
}
} /* calibrate_az_el */
#endif // defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
// --------------------------------------------------------------
#ifdef FEATURE_RTC
void service_rtc(){
static unsigned long last_rtc_sync_time = 0;
if (((millis() - last_rtc_sync_time) >= (SYNC_WITH_RTC_SECONDS * 1000)) || (clock_status == FREE_RUNNING)){
last_rtc_sync_time = millis();
#ifdef FEATURE_GPS
if (clock_status == GPS_SYNC) { // if we're also equipped with GPS and we're synced to it, don't sync to realtime clock
#ifdef DEBUG_RTC
debug_println("service_rtc: synced to GPS already. Exiting.");
#endif // DEBUG_RTC
return;
}
#endif // FEATURE_GPS
#ifdef FEATURE_RTC_DS1307
if (rtc.isrunning()) {
DateTime now = rtc.now();
#ifdef DEBUG_RTC
debug_print("service_rtc: syncing: ");
debug_print_int(now.year());
debug_print("/");
debug_print_int(now.month());
debug_print("/");
debug_print_int(now.day());
debug_print(" ");
debug_print_int(now.hour());
debug_print(":");
debug_print_int(now.minute());
debug_print(":");
debug_print_int(now.second());
debug_println("");
#endif // DEBUG_RTC
clock_year_set = now.year();
clock_month_set = now.month();
clock_day_set = now.day();
clock_hour_set = now.hour();
clock_min_set = now.minute();
clock_sec_set = now.second();
millis_at_last_calibration = millis();
update_time();
clock_status = RTC_SYNC;
} else {
clock_status = FREE_RUNNING;
#ifdef DEBUG_RTC
debug_println("service_rtc: error: RTC not running");
#endif // DEBUG_RTC
}
#endif //#FEATURE_RTC_DS1307
#ifdef FEATURE_RTC_PCF8583
rtc.get_time();
if ((rtc.year > 2000) && (rtc.month > 0) && (rtc.month < 13)){ // do we have a halfway reasonable date?
#ifdef DEBUG_RTC
control_port->print("service_rtc: syncing: ");
control_port->print(rtc.year, DEC);
control_port->print('/');
control_port->print(rtc.month, DEC);
control_port->print('/');
control_port->print(rtc.day, DEC);
control_port->print(' ');
control_port->print(rtc.hour, DEC);
control_port->print(':');
control_port->print(rtc.minute, DEC);
control_port->print(':');
control_port->println(rtc.second, DEC);
#endif // DEBUG_RTC
clock_year_set = rtc.year;
clock_month_set = rtc.month;
clock_day_set = rtc.day;
clock_hour_set = rtc.hour;
clock_min_set = rtc.minute;
clock_sec_set = rtc.second;
millis_at_last_calibration = millis();
update_time();
clock_status = RTC_SYNC;
} else {
clock_status = FREE_RUNNING;
#ifdef DEBUG_RTC
control_port->print("service_rtc: error: RTC not returning valid date or time: ");
control_port->print(rtc.year, DEC);
control_port->print('/');
control_port->print(rtc.month, DEC);
control_port->print('/');
control_port->print(rtc.day, DEC);
control_port->print(' ');
control_port->print(rtc.hour, DEC);
control_port->print(':');
control_port->print(rtc.minute, DEC);
control_port->print(':');
control_port->println(rtc.second, DEC);
#endif // DEBUG_RTC
}
#endif //#FEATURE_RTC_PCF8583
}
} /* service_rtc */
#endif // FEATURE_RTC
// -------------------------------------------------------------
byte process_backslash_command(byte input_buffer[], int input_buffer_index, byte source_port, char * return_string){
strcpy(return_string,"");
static unsigned long serial_led_time = 0;
float tempfloat = 0;
#if !defined(FEATURE_AZ_POSITION_ROTARY_ENCODER) && !defined(FEATURE_AZ_POSITION_PULSE_INPUT)
long place_multiplier = 0;
byte decimalplace = 0;
#endif
#ifdef FEATURE_CLOCK
int temp_year = 0;
byte temp_month = 0;
byte temp_day = 0;
byte temp_minute = 0;
byte temp_hour = 0;
#endif // FEATURE_CLOCK
#if defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
char grid[10] = "";
byte hit_error = 0;
#endif // defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
#if defined(FEATURE_AZ_POSITION_ROTARY_ENCODER) || defined(FEATURE_AZ_POSITION_PULSE_INPUT)
int new_azimuth = 9999;
#endif
#ifdef FEATURE_ELEVATION_CONTROL
#if defined(FEATURE_EL_POSITION_ROTARY_ENCODER) || defined(FEATURE_EL_POSITION_PULSE_INPUT)
int new_elevation = 9999;
#endif // FEATURE_ELEVATION_CONTROL
#endif // defined(FEATURE_AZ_POSITION_ROTARY_ENCODER) || defined(FEATURE_AZ_POSITION_PULSE_INPUT)
char temp_string[20] = "";
switch (input_buffer[1]) {
#if defined(FEATURE_AZ_POSITION_ROTARY_ENCODER) || defined(FEATURE_AZ_POSITION_PULSE_INPUT)
case 'A': // \Ax[x][x] - manually set azimuth
new_azimuth = 9999;
switch (input_buffer_index) {
case 3:
new_azimuth = (input_buffer[2] - 48);
break;
case 4:
new_azimuth = ((input_buffer[2] - 48) * 10) + (input_buffer[3] - 48);
break;
case 5:
new_azimuth = ((input_buffer[2] - 48) * 100) + ((input_buffer[3] - 48) * 10) + (input_buffer[4] - 48);
break;
}
if ((new_azimuth >= 0) && (new_azimuth < 360)) {
azimuth = new_azimuth * HEADING_MULTIPLIER;
configuration.last_azimuth = new_azimuth;
raw_azimuth = new_azimuth * HEADING_MULTIPLIER;
configuration_dirty = 1;
strcpy(return_string, "Azimuth set to ");
dtostrf(new_azimuth, 0, 0, temp_string);
strcat(return_string, temp_string);
} else {
strcpy(return_string, "Error. Format: \\Ax[x][x] ");
}
break;
#else // defined(FEATURE_AZ_POSITION_ROTARY_ENCODER) || defined(FEATURE_AZ_POSITION_PULSE_INPUT)
case 'A': // \Ax[xxx][.][xxxx] - manually set azimuth
place_multiplier = 1;
for (int x = input_buffer_index - 1; x > 1; x--) {
if (char(input_buffer[x]) != '.') {
tempfloat += (input_buffer[x] - 48) * place_multiplier;
place_multiplier = place_multiplier * 10;
} else {
decimalplace = x;
}
}
if (decimalplace) {
tempfloat = tempfloat / pow(10, (input_buffer_index - decimalplace - 1));
}
if ((tempfloat >= 0) && (tempfloat <= 360)) {
configuration.azimuth_offset = 0;
read_azimuth(1);
configuration.azimuth_offset = tempfloat - float(azimuth / HEADING_MULTIPLIER);
configuration_dirty = 1;
strcpy(return_string, "Azimuth calibrated to ");
dtostrf(tempfloat, 0, 2, temp_string);
strcat(return_string, temp_string);
} else {
strcpy(return_string, "Error.");
}
break;
#endif // defined(FEATURE_AZ_POSITION_ROTARY_ENCODER) || defined(FEATURE_AZ_POSITION_PULSE_INPUT)
#if defined(FEATURE_ELEVATION_CONTROL)
#if defined(FEATURE_EL_POSITION_ROTARY_ENCODER) || defined(FEATURE_EL_POSITION_PULSE_INPUT)
case 'B': // \Ax[x][x] - manually set elevation
new_elevation = 9999;
switch (input_buffer_index) {
case 3:
new_elevation = (input_buffer[2] - 48);
break;
case 4:
new_elevation = ((input_buffer[2] - 48) * 10) + (input_buffer[3] - 48);
break;
case 5:
new_elevation = ((input_buffer[2] - 48) * 100) + ((input_buffer[3] - 48) * 10) + (input_buffer[4] - 48);
break;
}
if ((new_elevation >= 0) && (new_elevation <= 180)) {
elevation = new_elevation * HEADING_MULTIPLIER;
configuration.last_elevation = new_elevation;
configuration_dirty = 1;
strcpy(return_string, "Elevation set to ");
dtostrf(new_elevation, 0, 0, temp_string);
strcat(return_string, temp_string);
} else {
strcpy(return_string, "Error. Format: \\Bx[x][x]");
}
break;
#else // defined(FEATURE_EL_POSITION_ROTARY_ENCODER) || defined(FEATURE_EL_POSITION_PULSE_INPUT)
case 'B': // \Bx[xxx][.][xxxx] - manually set elevation
place_multiplier = 1;
for (int x = input_buffer_index - 1; x > 1; x--) {
if (char(input_buffer[x]) != '.') {
tempfloat += (input_buffer[x] - 48) * place_multiplier;
place_multiplier = place_multiplier * 10;
} else {
decimalplace = x;
}
}
if (decimalplace) {
tempfloat = tempfloat / pow(10, (input_buffer_index - decimalplace - 1));
}
if ((tempfloat >= 0) && (tempfloat <= 180)) {
configuration.elevation_offset = 0;
read_elevation(1);
configuration.elevation_offset = tempfloat - float(elevation / HEADING_MULTIPLIER);
configuration_dirty = 1;
strcpy(return_string, "Elevation calibrated to ");
dtostrf(tempfloat, 0, 2, temp_string);
strcat(return_string, temp_string);
} else {
strcpy(return_string, "Error.");
}
break;
#endif // defined(FEATURE_EL_POSITION_ROTARY_ENCODER) || defined(FEATURE_EL_POSITION_PULSE_INPUT)
#endif //FEATURE_ELEVATION_CONTROL
#ifdef FEATURE_CLOCK
case 'C': // show clock
update_time();
sprintf(return_string, "%s", clock_string());
break;
case 'O': // set clock
temp_year = ((input_buffer[2] - 48) * 1000) + ((input_buffer[3] - 48) * 100) + ((input_buffer[4] - 48) * 10) + (input_buffer[5] - 48);
temp_month = ((input_buffer[6] - 48) * 10) + (input_buffer[7] - 48);
temp_day = ((input_buffer[8] - 48) * 10) + (input_buffer[9] - 48);
temp_hour = ((input_buffer[10] - 48) * 10) + (input_buffer[11] - 48);
temp_minute = ((input_buffer[12] - 48) * 10) + (input_buffer[13] - 48);
if ((temp_year > 2013) && (temp_year < 2070) &&
(temp_month > 0) && (temp_month < 13) &&
(temp_day > 0) && (temp_day < 32) &&
(temp_hour >= 0) && (temp_hour < 24) &&
(temp_minute >= 0) && (temp_minute < 60) &&
(input_buffer_index == 14)) {
clock_year_set = temp_year;
clock_month_set = temp_month;
clock_day_set = temp_day;
clock_hour_set = temp_hour;
clock_min_set = temp_minute;
clock_sec_set = 0;
millis_at_last_calibration = millis();
#if defined(FEATURE_RTC_DS1307)
rtc.adjust(DateTime(temp_year, temp_month, temp_day, temp_hour, temp_minute, 0));
#endif // defined(FEATURE_RTC_DS1307)
#if defined(FEATURE_RTC_PCF8583)
rtc.year = temp_year;
rtc.month = temp_month;
rtc.day = temp_day;
rtc.hour = temp_hour;
rtc.minute = temp_minute;
rtc.second = 0;
rtc.set_time();
#endif // defined(FEATURE_RTC_PCF8583)
#if (!defined(FEATURE_RTC_DS1307) && !defined(FEATURE_RTC_PCF8583))
strcpy(return_string, "Clock set to ");
update_time();
strcat(return_string, clock_string());
#else
strcpy(return_string, "Internal clock and RTC set to ");
update_time();
strcat(return_string, clock_string());
#endif
} else {
strcpy(return_string, "Error. Usage: \\CYYYYMMDDHHmm");
}
break;
#endif // FEATURE_CLOCK
case 'D':
if (debug_mode & source_port) {
debug_mode = debug_mode & (~source_port);
} else {
debug_mode = debug_mode | source_port;
}
break; // D - Debug
case 'E': // E - Initialize eeprom
initialize_eeprom_with_defaults();
strcpy(return_string, "Initialized eeprom, please reset...");
break;
case 'L': // L - rotate to long path
if (azimuth < (180 * HEADING_MULTIPLIER)) {
submit_request(AZ, REQUEST_AZIMUTH, (azimuth + (180 * HEADING_MULTIPLIER)), 15);
} else {
submit_request(AZ, REQUEST_AZIMUTH, (azimuth - (180 * HEADING_MULTIPLIER)), 16);
}
break;
#if defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
case 'G': // G - set coordinates using grid square
if (isalpha(input_buffer[2])) {
grid[0] = input_buffer[2];
} else { hit_error = 1; }
if (isalpha(input_buffer[3])) {
grid[1] = input_buffer[3];
} else { hit_error = 1; }
if (isdigit(input_buffer[4])) {
grid[2] = input_buffer[4];
} else { hit_error = 1; }
if (isdigit(input_buffer[5])) {
grid[3] = input_buffer[5];
} else { hit_error = 1; }
if (isalpha(input_buffer[6])) {
grid[4] = input_buffer[6];
} else { hit_error = 1; }
if (isalpha(input_buffer[7])) {
grid[5] = input_buffer[7];
} else { hit_error = 1; }
if ((input_buffer_index != 8) || (hit_error)) {
strcpy(return_string, "Error. Usage \\Gxxxxxx");
} else {
grid2deg(grid, &longitude, &latitude);
strcpy(return_string, "Coordinates set to: ");
dtostrf(latitude, 0, 4, temp_string);
strcat(return_string, temp_string);
strcat(return_string, " ");
dtostrf(longitude, 0, 4, temp_string);
strcat(return_string, temp_string);
}
break;
#endif // defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
#ifdef FEATURE_MOON_TRACKING
case 'M':
switch (input_buffer[2]) {
case '0':
submit_request(AZ, REQUEST_STOP, 0, 17);
submit_request(EL, REQUEST_STOP, 0, 18);
strcpy(return_string, "Moon tracking deactivated.");
break;
case '1':
moon_tracking_active = 1;
#ifdef FEATURE_SUN_TRACKING
sun_tracking_active = 0;
#endif // FEATURE_SUN_TRACKING
strcpy(return_string, "Moon tracking activated.");
break;
default: strcpy(return_string, "Error."); break;
}
break;
#endif // FEATURE_MOON_TRACKING
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
case 'R':
strcpy(return_string, "Remote port rx sniff o");
if (remote_port_rx_sniff) {
remote_port_rx_sniff = 0;
strcat(return_string, "ff");
} else {
remote_port_rx_sniff = 1;
strcat(return_string, "n");
}
break;
case 'S':
#if defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
ethernetslavelinkclient0.print(ETHERNET_PREAMBLE);
#endif
for (int x = 2; x < input_buffer_index; x++) {
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
remote_unit_port->write(input_buffer[x]);
#endif
#if defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
ethernetslavelinkclient0.write(input_buffer[x]);
#endif
if (remote_port_tx_sniff) {
control_port->write(input_buffer[x]);
}
}
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
remote_unit_port->write(13);
#endif
#if defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
ethernetslavelinkclient0.write(13);
#endif
if (remote_port_tx_sniff) {
control_port->write(13);
}
break;
case 'T':
strcpy(return_string, "Remote port tx sniff o");
if (remote_port_tx_sniff) {
remote_port_tx_sniff = 0;
strcat(return_string, "ff");
} else {
remote_port_tx_sniff = 1;
strcat(return_string, "n");
}
break;
case 'Z':
strcpy(return_string, "Suspend auto remote commands o");
if (suspend_remote_commands) {
suspend_remote_commands = 0;
strcat(return_string, "ff");
} else {
suspend_remote_commands = 1;
strcat(return_string, "n");
}
break;
#endif // defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE)
#ifdef FEATURE_SUN_TRACKING
case 'U': // activate / deactivate sun tracking
switch (input_buffer[2]) {
case '0':
submit_request(AZ, REQUEST_STOP, 0, 19);
submit_request(EL, REQUEST_STOP, 0, 20);
strcpy(return_string, "Sun tracking deactivated.");
break;
case '1':
sun_tracking_active = 1;
strcpy(return_string, "Sun tracking activated.");
#ifdef FEATURE_MOON_TRACKING
moon_tracking_active = 0;
#endif // FEATURE_MOON_TRACKING
break;
default: strcpy(return_string, "Error."); break;
}
break;
#endif // FEATURE_SUN_TRACKING
#if defined(FEATURE_SUN_TRACKING) || defined(FEATURE_MOON_TRACKING)
case 'X':
switch (toupper(input_buffer[2])) {
#if defined(FEATURE_SUN_TRACKING)
case 'S':
update_sun_position();
if (calibrate_az_el(sun_azimuth, sun_elevation)) {
strcpy(return_string, az_el_calibrated_string());
} else {
strcpy(return_string, "Error.");
}
break;
#endif // FEATURE_SUN_TRACKING
#if defined(FEATURE_MOON_TRACKING)
case 'M':
update_moon_position();
if (calibrate_az_el(moon_azimuth, moon_elevation)) {
strcpy(return_string, az_el_calibrated_string());
} else {
strcpy(return_string, "Error.");
}
break;
#endif // FEATURE_MOON_TRACKING
case '0':
configuration.azimuth_offset = 0;
configuration.elevation_offset = 0;
configuration_dirty = 1;
break;
default: strcpy(return_string, "?>"); break;
} /* switch */
break;
#endif // defined(FEATURE_SUN_TRACKING) || defined(FEATURE_MOON_TRACKING)
#ifdef FEATURE_PARK
case 'P': // Park
strcpy(return_string, "Parking...");
initiate_park();
park_serial_initiated = 1;
break;
#endif // FEATURE_PARK
#ifdef FEATURE_ANCILLARY_PIN_CONTROL
case 'N': // \Nxx - turn pin on; xx = pin number
if ((((input_buffer[2] > 47) && (input_buffer[2] < 58)) || (toupper(input_buffer[2]) == 'A')) && (input_buffer[3] > 47) && (input_buffer[3] < 58) && (input_buffer_index == 4)) {
byte pin_value = 0;
if (toupper(input_buffer[2]) == 'A') {
pin_value = get_analog_pin(input_buffer[3] - 48);
} else {
pin_value = ((input_buffer[2] - 48) * 10) + (input_buffer[3] - 48);
}
pinModeEnhanced(pin_value, OUTPUT);
digitalWriteEnhanced(pin_value, HIGH);
strcpy(return_string, "OK");
} else {
strcpy(return_string, "Error");
}
break;
case 'F': // \Fxx - turn pin off; xx = pin number
if ((((input_buffer[2] > 47) && (input_buffer[2] < 58)) || (toupper(input_buffer[2]) == 'A')) && (input_buffer[3] > 47) && (input_buffer[3] < 58) && (input_buffer_index == 4)) {
byte pin_value = 0;
if (toupper(input_buffer[2]) == 'A') {
pin_value = get_analog_pin(input_buffer[3] - 48);
} else {
pin_value = ((input_buffer[2] - 48) * 10) + (input_buffer[3] - 48);
}
pinModeEnhanced(pin_value, OUTPUT);
digitalWriteEnhanced(pin_value, LOW);
strcpy(return_string, "OK");
} else {
strcpy(return_string, "Error");
}
break;
case 'W': // \Wxxyyy - turn on pin PWM; xx = pin number, yyy = PWM value (0-255)
if (((input_buffer[2] > 47) && (input_buffer[2] < 58)) && (input_buffer[3] > 47) && (input_buffer[3] < 58) && (input_buffer_index == 7)) {
byte pin_value = 0;
if (toupper(input_buffer[2]) == 'A') {
pin_value = get_analog_pin(input_buffer[3] - 48);
} else {
pin_value = ((input_buffer[2] - 48) * 10) + (input_buffer[3] - 48);
}
int write_value = ((input_buffer[4] - 48) * 100) + ((input_buffer[5] - 48) * 10) + (input_buffer[6] - 48);
if ((write_value >= 0) && (write_value < 256)) {
pinModeEnhanced(pin_value, OUTPUT);
analogWriteEnhanced(pin_value, write_value);
strcpy(return_string, "OK");
} else {
strcpy(return_string, "Error");
}
} else {
strcpy(return_string, "Error");
}
break;
#endif // FEATURE_ANCILLARY_PIN_CONTROL
default: strcpy(return_string, "Error.");
} /* switch */
} /* process_backslash_command */
// --------------------------------------------------------------
#ifdef FEATURE_CLOCK
char * clock_string(){
char return_string[32] = "";
char temp_string[16] = "";
dtostrf(clock_years, 0, 0, temp_string);
strcpy(return_string, temp_string);
strcat(return_string, "-");
if (clock_months < 10) {
strcat(return_string, "0");
}
dtostrf(clock_months, 0, 0, temp_string);
strcat(return_string, temp_string);
strcat(return_string, "-");
if (clock_days < 10) {
strcat(return_string, "0");
}
dtostrf(clock_days, 0, 0, temp_string);
strcat(return_string, temp_string);
strcat(return_string, " ");
if (clock_hours < 10) {
strcat(return_string, "0");
}
dtostrf(clock_hours, 0, 0, temp_string);
strcat(return_string, temp_string);
strcat(return_string, ":");
if (clock_minutes < 10) {
strcat(return_string, "0");
}
dtostrf(clock_minutes, 0, 0, temp_string);
strcat(return_string, temp_string);
strcat(return_string, ":");
if (clock_seconds < 10) {
strcat(return_string, "0");
}
dtostrf(clock_seconds, 0, 0, temp_string);
strcat(return_string, temp_string);
strcat(return_string,"Z");
return return_string;
} /* clock_string */
#endif // FEATURE_CLOCK
// --------------------------------------------------------------
#if defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
char * az_el_calibrated_string(){
char return_string[48] = "";
char tempstring[16] = "";
read_azimuth(1);
read_elevation(1);
strcpy(return_string, "Heading calibrated. Az: ");
dtostrf((azimuth / LCD_HEADING_MULTIPLIER), 0, LCD_DECIMAL_PLACES, tempstring);
strcat(return_string, tempstring);
#ifdef FEATURE_ELEVATION_CONTROL
strcat(return_string, " El: ");
dtostrf((elevation / LCD_HEADING_MULTIPLIER), 0, LCD_DECIMAL_PLACES, tempstring);
strcat(return_string, tempstring);
#endif //FEATURE_ELEVATION_CONTROL
return return_string;
}
#endif // defined(FEATURE_MOON_TRACKING) || defined(FEATURE_SUN_TRACKING)
// --------------------------------------------------------------
void debug_print(char * print_string){
if (debug_mode & CONTROL_PORT0){
control_port->print(print_string);
}
#ifdef FEATURE_ETHERNET
if (debug_mode & ETHERNET_PORT0){
ethernetclient0.print(print_string);
}
#endif //FEATURE_ETHERNET
#if defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
if (debug_mode & ETHERNET_PORT1){
ethernetclient1.print(print_string);
}
#endif //defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
}
// --------------------------------------------------------------
void debug_println(char * print_string){
if (debug_mode & CONTROL_PORT0){
control_port->println(print_string);
}
#ifdef FEATURE_ETHERNET
if (debug_mode & ETHERNET_PORT0){
ethernetclient0.println(print_string);
}
#endif //FEATURE_ETHERNET
#if defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
if (debug_mode & ETHERNET_PORT1){
ethernetclient1.println(print_string);
}
#endif //defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
}
// --------------------------------------------------------------
void debug_print_char(char print_char){
if (debug_mode & CONTROL_PORT0){
control_port->print(print_char);
}
#ifdef FEATURE_ETHERNET
if (debug_mode & ETHERNET_PORT0){
ethernetclient0.print(print_char);
}
#endif //FEATURE_ETHERNET
#if defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
if (debug_mode & ETHERNET_PORT1){
ethernetclient1.print(print_char);
}
#endif //defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
}
// --------------------------------------------------------------
void debug_write(char * print_string){
if (debug_mode & CONTROL_PORT0){
control_port->write(print_string);
}
#ifdef FEATURE_ETHERNET
if (debug_mode & ETHERNET_PORT0){
ethernetclient0.write(print_string);
}
#endif //FEATURE_ETHERNET
#if defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
if (debug_mode & ETHERNET_PORT1){
ethernetclient1.write(print_string);
}
#endif //defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
}
// --------------------------------------------------------------
void debug_print_int(int print_int){
if (debug_mode & CONTROL_PORT0){
control_port->print(print_int);
}
#ifdef FEATURE_ETHERNET
if (debug_mode & ETHERNET_PORT0){
ethernetclient0.print(print_int);
}
#endif //FEATURE_ETHERNET
#if defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
if (debug_mode & ETHERNET_PORT1){
ethernetclient1.print(print_int);
}
#endif //defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
}
// --------------------------------------------------------------
void debug_write_int(int write_int){
if (debug_mode & CONTROL_PORT0){
control_port->write(write_int);
}
#ifdef FEATURE_ETHERNET
if (debug_mode & ETHERNET_PORT0){
ethernetclient0.write(write_int);
}
#endif //FEATURE_ETHERNET
#if defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
if (debug_mode & ETHERNET_PORT1){
ethernetclient1.write(write_int);
}
#endif //defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
}
// --------------------------------------------------------------
void debug_print_float(float print_float,byte places){
char tempstring[16] = "";
dtostrf(print_float,0,places,tempstring);
if (debug_mode & CONTROL_PORT0){
control_port->print(tempstring);
}
#ifdef FEATURE_ETHERNET
if (debug_mode & ETHERNET_PORT0){
ethernetclient0.print(tempstring);
}
#endif //FEATURE_ETHERNET
#if defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
if (debug_mode & ETHERNET_PORT1){
ethernetclient1.print(tempstring);
}
#endif //defined(FEATURE_ETHERNET) && defined(ETHERNET_TCP_PORT_1)
}
// --------------------------------------------------------------
#ifdef FEATURE_MOON_TRACKING
char * moon_status_string(){
char returnstring[128] = "";
char tempstring[16] = "";
strcpy(returnstring,"\tmoon: AZ: ");
dtostrf(moon_azimuth,0,2,tempstring);
strcat(returnstring,tempstring);
strcat(returnstring," EL: ");
dtostrf(moon_elevation,0,2,tempstring);
strcat(returnstring,tempstring);
strcat(returnstring,"\tTRACKING_");
if (!moon_tracking_active) {
strcat(returnstring,"IN");
}
strcat(returnstring,"ACTIVE ");
if (moon_tracking_active) {
if (!moon_visible) {
strcat(returnstring,"NOT_");
}
strcat(returnstring,"VISIBLE");
}
return returnstring;
}
#endif // FEATURE_MOON_TRACKING
// --------------------------------------------------------------
#ifdef FEATURE_SUN_TRACKING
char * sun_status_string(){
char returnstring[128] = "";
char tempstring[16] = "";
strcpy(returnstring,"\tsun: AZ: ");
dtostrf(sun_azimuth,0,2,tempstring);
strcat(returnstring,tempstring);
strcat(returnstring," EL: ");
dtostrf(sun_elevation,0,2,tempstring);
strcat(returnstring,tempstring);
strcat(returnstring,"\tTRACKING_");
if (!sun_tracking_active) {
strcat(returnstring,"IN");
}
strcat(returnstring,"ACTIVE ");
if (sun_tracking_active) {
if (!sun_visible) {
strcat(returnstring,"NOT_");
}
strcat(returnstring,"VISIBLE");
}
return returnstring;
}
#endif // FEATURE_SUN_TRACKING
// --------------------------------------------------------------
#ifdef FEATURE_CLOCK
char * clock_status_string(){
switch (clock_status) {
case FREE_RUNNING: return("FREE_RUNNING"); break;
case GPS_SYNC: return("GPS_SYNC"); break;
case RTC_SYNC: return("RTC_SYNC"); break;
case SLAVE_SYNC: return("SLAVE_SYNC"); break;
}
}
#endif //FEATURE_CLOCK
// --------------------------------------------------------------
#if defined(FEATURE_SUN_TRACKING) || defined(FEATURE_MOON_TRACKING)
char * coordinate_string(){
char returnstring[32] = "";
char tempstring[12] = "";
dtostrf(latitude,0,4,returnstring);
strcat(returnstring," ");
dtostrf(longitude,0,4,tempstring);
strcat(returnstring,tempstring);
return returnstring;
}
#endif //defined(FEATURE_SUN_TRACKING) || defined(FEATURE_MOON_TRACKING)
// --------------------------------------------------------------
#ifdef FEATURE_YAESU_EMULATION
void process_yaesu_command(byte * yaesu_command_buffer, int yaesu_command_buffer_index, byte source_port, char * return_string){
char tempstring[11] = "";
int parsed_value = 0;
int parsed_elevation = 0;
#ifdef FEATURE_TIMED_BUFFER
int parsed_value2 = 0;
#endif //FEATURE_TIMED_BUFFER
strcpy(return_string,"");
switch (yaesu_command_buffer[0]) { // look at the first character of the command
case 'C': // C - return current azimuth
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: C\n");
}
#endif // DEBUG_PROCESS_YAESU
#ifdef OPTION_DELAY_C_CMD_OUTPUT
delay(400);
#endif
//strcpy(return_string,"");
#ifndef OPTION_GS_232B_EMULATION
strcat(return_string,"+0");
#else
strcat(return_string,"AZ=");
#endif
dtostrf(int(azimuth / HEADING_MULTIPLIER),0,0,tempstring);
if (int(azimuth / HEADING_MULTIPLIER) < 10) {
strcat(return_string,"0");
}
if (int(azimuth / HEADING_MULTIPLIER) < 100) {
strcat(return_string,"0");
}
strcat(return_string,tempstring);
#ifdef FEATURE_ELEVATION_CONTROL
#ifndef OPTION_C_COMMAND_SENDS_AZ_AND_EL
if ((yaesu_command_buffer[1] == '2') && (yaesu_command_buffer_index > 1)) { // did we get the C2 command?
#endif
#ifndef OPTION_GS_232B_EMULATION
if (elevation < 0) {
strcat(return_string,"-0");
} else {
strcat(return_string,"+0");
}
#endif
#ifdef OPTION_GS_232B_EMULATION
strcat(return_string,"EL=");
#endif
dtostrf(int(elevation / HEADING_MULTIPLIER),0,0,tempstring);
if (int(elevation / HEADING_MULTIPLIER) < 10) {
strcat(return_string,("0"));
}
if (int(elevation / HEADING_MULTIPLIER) < 100) {
strcat(return_string,"0");
}
strcat(return_string,tempstring);
#ifndef OPTION_C_COMMAND_SENDS_AZ_AND_EL
} else {
//strcat(return_string,"\n");
}
#endif // OPTION_C_COMMAND_SENDS_AZ_AND_EL
#endif // FEATURE_ELEVATION_CONTROL
#ifndef FEATURE_ELEVATION_CONTROL
if ((yaesu_command_buffer[1] == '2') && (yaesu_command_buffer_index > 1)) { // did we get the C2 command?
#ifndef OPTION_GS_232B_EMULATION
strcat(return_string,"+0000"); // return a dummy elevation since we don't have the elevation feature turned on
#else
strcat(return_string,"EL=000");
#endif
} else {
//strcat(return_string,"\n");
}
#endif // FEATURE_ELEVATION_CONTROL
break;
//-----------------end of C command-----------------
#ifdef FEATURE_AZ_POSITION_POTENTIOMETER
case 'F': // F - full scale calibration
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: F\n");
}
#endif // DEBUG_PROCESS_YAESU
#ifdef FEATURE_ELEVATION_CONTROL
if ((yaesu_command_buffer[1] == '2') && (yaesu_command_buffer_index > 1)) { // did we get the F2 command?
clear_serial_buffer();
if (source_port == CONTROL_PORT0){
control_port->println(F("Elevate to 180 (or max elevation) and send keystroke..."));
}
get_keystroke();
read_elevation(1);
configuration.analog_el_max_elevation = analog_el;
write_settings_to_eeprom();
strcpy(return_string,"Wrote to memory");
return;
}
#endif
clear_serial_buffer();
if (source_port == CONTROL_PORT0){
control_port->println(F("Rotate to full CW and send keystroke..."));
get_keystroke();
}
read_azimuth(1);
configuration.analog_az_full_cw = analog_az;
write_settings_to_eeprom();
strcpy(return_string,"Wrote to memory");
break;
#endif // FEATURE_AZ_POSITION_POTENTIOMETER
case 'H': print_help(source_port); break; // H - print help - depricated
case 'L': // L - manual left (CCW) rotation
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: L\n");
}
#endif // DEBUG_PROCESS_YAESU
submit_request(AZ, REQUEST_CCW, 0, 21);
//strcpy(return_string,"\n");
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
break;
#ifdef FEATURE_AZ_POSITION_POTENTIOMETER
case 'O': // O - offset calibration
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: O\n");
}
#endif // DEBUG_PROCESS_YAESU
#ifdef FEATURE_ELEVATION_CONTROL
if ((yaesu_command_buffer[1] == '2') && (yaesu_command_buffer_index > 1)) { // did we get the O2 command?
clear_serial_buffer();
if (source_port == CONTROL_PORT0){
control_port->println(F("Elevate to 0 degrees and send keystroke..."));
}
get_keystroke();
read_elevation(1);
configuration.analog_el_0_degrees = analog_el;
write_settings_to_eeprom();
strcpy(return_string,"Wrote to memory");
return;
}
#endif
clear_serial_buffer();
if (source_port == CONTROL_PORT0){
control_port->println(F("Rotate to full CCW and send keystroke..."));
}
get_keystroke();
read_azimuth(1);
configuration.analog_az_full_ccw = analog_az;
write_settings_to_eeprom();
strcpy(return_string,"Wrote to memory");
break;
#endif // FEATURE_AZ_POSITION_POTENTIOMETER
case 'R': // R - manual right (CW) rotation
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: R\n");
}
#endif // DEBUG_PROCESS_YAESU
submit_request(AZ, REQUEST_CW, 0, 22);
strcpy(return_string,"\n");
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
break;
case 'A': // A - CW/CCW rotation stop
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: A\n");
}
#endif // DEBUG_PROCESS_YAESU
submit_request(AZ, REQUEST_STOP, 0, 23);
//strcpy(return_string,"\n");
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
break;
case 'S': // S - all stop
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: S\n");
}
#endif // DEBUG_PROCESS_YAESU
submit_request(AZ, REQUEST_STOP, 0, 24);
#ifdef FEATURE_ELEVATION_CONTROL
submit_request(EL, REQUEST_STOP, 0, 25);
#endif
#ifdef FEATURE_TIMED_BUFFER
clear_timed_buffer();
#endif // FEATURE_TIMED_BUFFER
//strcpy(return_string,"");
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
break;
case 'M': // M - auto azimuth rotation
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: M\n");
}
#endif // DEBUG_PROCESS_YAESU
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
if (yaesu_command_buffer_index > 4) { // if there are more than 4 characters in the command buffer, we got a timed interval command
#ifdef FEATURE_TIMED_BUFFER
clear_timed_buffer();
parsed_value = ((int(yaesu_command_buffer[1]) - 48) * 100) + ((int(yaesu_command_buffer[2]) - 48) * 10) + (int(yaesu_command_buffer[3]) - 48);
if ((parsed_value > 0) && (parsed_value < 1000)) {
timed_buffer_interval_value_seconds = parsed_value;
for (int x = 5; x < yaesu_command_buffer_index; x = x + 4) {
parsed_value = ((int(yaesu_command_buffer[x]) - 48) * 100) + ((int(yaesu_command_buffer[x + 1]) - 48) * 10) + (int(yaesu_command_buffer[x + 2]) - 48);
if ((parsed_value >= 0) && (parsed_value <= 360)) { // is it a valid azimuth?
timed_buffer_azimuths[timed_buffer_number_entries_loaded] = parsed_value * HEADING_MULTIPLIER;
timed_buffer_number_entries_loaded++;
timed_buffer_status = LOADED_AZIMUTHS;
if (timed_buffer_number_entries_loaded > TIMED_INTERVAL_ARRAY_SIZE) { // is the array full?
submit_request(AZ, REQUEST_AZIMUTH, timed_buffer_azimuths[0], 26); // array is full, go to the first azimuth
timed_buffer_entry_pointer = 1;
return;
}
} else { // we hit an invalid bearing
timed_buffer_status = EMPTY;
timed_buffer_number_entries_loaded = 0;
strcpy(return_string,"?>"); // error
return;
}
}
submit_request(AZ, REQUEST_AZIMUTH, timed_buffer_azimuths[0], 27); // go to the first azimuth
timed_buffer_entry_pointer = 1;
} else {
strcpy(return_string,"?>"); // error
}
#else
strcpy(return_string,"?>");
#endif // FEATURE_TIMED_BUFFER
return;
} else { // if there are four characters, this is just a single direction setting
if (yaesu_command_buffer_index == 4) {
parsed_value = ((int(yaesu_command_buffer[1]) - 48) * 100) + ((int(yaesu_command_buffer[2]) - 48) * 10) + (int(yaesu_command_buffer[3]) - 48);
#ifdef FEATURE_TIMED_BUFFER
clear_timed_buffer();
#endif // FEATURE_TIMED_BUFFER
if ((parsed_value >= 0) && (parsed_value <= (azimuth_starting_point + azimuth_rotation_capability))) {
submit_request(AZ, REQUEST_AZIMUTH, (parsed_value * HEADING_MULTIPLIER), 28);
return;
}
}
}
strcpy(return_string,"?>");
break;
#ifdef FEATURE_TIMED_BUFFER
case 'N': // N - number of loaded timed interval entries
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: N\n");
}
#endif // DEBUG_PROCESS_YAESU
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
sprintf(return_string,"%d",timed_buffer_number_entries_loaded);
break;
#endif // FEATURE_TIMED_BUFFER
#ifdef FEATURE_TIMED_BUFFER
case 'T': // T - initiate timed tracking
initiate_timed_buffer(source_port);
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
break;
#endif // FEATURE_TIMED_BUFFER
case 'X': // X - azimuth speed change
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: X\n");
}
#endif // DEBUG_PROCESS_YAESU
if (yaesu_command_buffer_index > 1) {
switch (yaesu_command_buffer[1]) {
case '4':
normal_az_speed_voltage = PWM_SPEED_VOLTAGE_X4;
update_az_variable_outputs(PWM_SPEED_VOLTAGE_X4);
#if defined(FEATURE_ELEVATION_CONTROL) && defined(OPTION_EL_SPEED_FOLLOWS_AZ_SPEED)
normal_el_speed_voltage = PWM_SPEED_VOLTAGE_X4;
update_el_variable_outputs(PWM_SPEED_VOLTAGE_X4);
#endif
strcpy(return_string,"Speed X4");
break;
case '3':
normal_az_speed_voltage = PWM_SPEED_VOLTAGE_X3;
update_az_variable_outputs(PWM_SPEED_VOLTAGE_X3);
#if defined(FEATURE_ELEVATION_CONTROL) && defined(OPTION_EL_SPEED_FOLLOWS_AZ_SPEED)
normal_el_speed_voltage = PWM_SPEED_VOLTAGE_X3;
update_el_variable_outputs(PWM_SPEED_VOLTAGE_X3);
#endif
strcpy(return_string,"Speed X3");
break;
case '2':
normal_az_speed_voltage = PWM_SPEED_VOLTAGE_X2;
update_az_variable_outputs(PWM_SPEED_VOLTAGE_X2);
#if defined(FEATURE_ELEVATION_CONTROL) && defined(OPTION_EL_SPEED_FOLLOWS_AZ_SPEED)
normal_el_speed_voltage = PWM_SPEED_VOLTAGE_X2;
update_el_variable_outputs(PWM_SPEED_VOLTAGE_X2);
#endif
strcpy(return_string,"Speed X2");
break;
case '1':
normal_az_speed_voltage = PWM_SPEED_VOLTAGE_X1;
update_az_variable_outputs(PWM_SPEED_VOLTAGE_X1);
#if defined(FEATURE_ELEVATION_CONTROL) && defined(OPTION_EL_SPEED_FOLLOWS_AZ_SPEED)
normal_el_speed_voltage = PWM_SPEED_VOLTAGE_X1;
update_el_variable_outputs(PWM_SPEED_VOLTAGE_X1);
#endif
strcpy(return_string,"Speed X1");
break;
default: strcpy(return_string,"?>"); break;
} /* switch */
} else {
strcpy(return_string,"?>");
}
break;
#ifdef FEATURE_ELEVATION_CONTROL
case 'U': // U - manual up rotation
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: U\n");
}
#endif // DEBUG_PROCESS_YAESU
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
submit_request(EL, REQUEST_UP, 0, 29);
//strcpy(return_string,"\n");
break;
case 'D': // D - manual down rotation
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: D\n");
}
#endif // DEBUG_PROCESS_YAESU
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
submit_request(EL, REQUEST_DOWN, 0, 30);
//strcpy(return_string,"\n");
break;
case 'E': // E - stop elevation rotation
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: E\n");
}
#endif // DEBUG_PROCESS_YAESU
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
submit_request(EL, REQUEST_STOP, 0, 31);
//strcpy(return_string,"\n");
break;
case 'B': // B - return current elevation
#ifndef OPTION_GS_232B_EMULATION
if (elevation < 0) {
strcat(return_string,"-0");
} else {
strcat(return_string,"+0");
}
#else
strcat(return_string,"EL=");
#endif //OPTION_GS_232B_EMULATION
dtostrf(int(elevation / HEADING_MULTIPLIER),0,0,tempstring);
if (int(elevation / HEADING_MULTIPLIER) < 10) {
strcat(return_string,("0"));
}
if (int(elevation / HEADING_MULTIPLIER) < 100) {
strcat(return_string,"0");
}
strcat(return_string,tempstring);
break;
#endif /* ifdef FEATURE_ELEVATION_CONTROL */
case 'W': // W - auto elevation rotation
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("yaesu_serial_command: W\n");
}
#endif // DEBUG_PROCESS_YAESU
#ifdef FEATURE_PARK
deactivate_park();
#endif // FEATURE_PARK
// parse out W command
// Short Format: WXXX YYYY XXX = azimuth YYY = elevation
// Long Format : WSSS XXX YYY SSS = timed interval XXX = azimuth YYY = elevation
if (yaesu_command_buffer_index > 8) { // if there are more than 4 characters in the command buffer, we got a timed interval command
#if defined(FEATURE_TIMED_BUFFER) && defined(FEATURE_ELEVATION_CONTROL)
parsed_value = ((int(yaesu_command_buffer[1]) - 48) * 100) + ((int(yaesu_command_buffer[2]) - 48) * 10) + (int(yaesu_command_buffer[3]) - 48);
if ((parsed_value > 0) && (parsed_value < 1000)) {
timed_buffer_interval_value_seconds = parsed_value;
for (int x = 5; x < yaesu_command_buffer_index; x = x + 8) {
parsed_value = ((int(yaesu_command_buffer[x]) - 48) * 100) + ((int(yaesu_command_buffer[x + 1]) - 48) * 10) + (int(yaesu_command_buffer[x + 2]) - 48);
parsed_value2 = ((int(yaesu_command_buffer[x + 4]) - 48) * 100) + ((int(yaesu_command_buffer[x + 5]) - 48) * 10) + (int(yaesu_command_buffer[x + 6]) - 48);
if ((parsed_value > -1) && (parsed_value < 361) && (parsed_value2 > -1) && (parsed_value2 < 181)) { // is it a valid azimuth?
timed_buffer_azimuths[timed_buffer_number_entries_loaded] = (parsed_value * HEADING_MULTIPLIER);
timed_buffer_elevations[timed_buffer_number_entries_loaded] = (parsed_value2 * HEADING_MULTIPLIER);
timed_buffer_number_entries_loaded++;
timed_buffer_status = LOADED_AZIMUTHS_ELEVATIONS;
if (timed_buffer_number_entries_loaded > TIMED_INTERVAL_ARRAY_SIZE) { // is the array full?
x = yaesu_command_buffer_index; // array is full, go to the first azimuth and elevation
}
} else { // we hit an invalid bearing
timed_buffer_status = EMPTY;
timed_buffer_number_entries_loaded = 0;
strcpy(return_string,"?>"); // error
return;
}
}
}
timed_buffer_entry_pointer = 1; // go to the first bearings
parsed_value = timed_buffer_azimuths[0];
parsed_elevation = timed_buffer_elevations[0];
#else /* ifdef FEATURE_TIMED_BUFFER FEATURE_ELEVATION_CONTROL*/
strcpy(return_string,"?>");
#endif // FEATURE_TIMED_BUFFER FEATURE_ELEVATION_CONTROL
} else {
// this is a short form W command, just parse the azimuth and elevation and initiate rotation
parsed_value = (((int(yaesu_command_buffer[1]) - 48) * 100) + ((int(yaesu_command_buffer[2]) - 48) * 10) + (int(yaesu_command_buffer[3]) - 48)) * HEADING_MULTIPLIER;
parsed_elevation = (((int(yaesu_command_buffer[5]) - 48) * 100) + ((int(yaesu_command_buffer[6]) - 48) * 10) + (int(yaesu_command_buffer[7]) - 48)) * HEADING_MULTIPLIER;
}
#ifndef FEATURE_ELEVATION_CONTROL
if ((parsed_value >= 0) && (parsed_value <= (360 * HEADING_MULTIPLIER))) {
submit_request(AZ, REQUEST_AZIMUTH, parsed_value, 32);
} else {
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("process_yaesu_command: W cmd az error");
}
#endif // DEBUG_PROCESS_YAESU
strcpy(return_string,"?>"); // bogus elevation - return and error and don't do anything
}
#else
if ((parsed_value >= 0) && (parsed_value <= (360 * HEADING_MULTIPLIER)) && (parsed_elevation >= 0) && (parsed_elevation <= (180 * HEADING_MULTIPLIER))) {
submit_request(AZ, REQUEST_AZIMUTH, parsed_value, 33);
submit_request(EL, REQUEST_ELEVATION, parsed_elevation, 34);
} else {
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("process_yaesu_command: W cmd az/el error");
}
#endif // DEBUG_PROCESS_YAESU
strcpy(return_string,"?>"); // bogus elevation - return and error and don't do anything
}
#endif // FEATURE_ELEVATION_CONTROL
break;
#ifdef OPTION_GS_232B_EMULATION
case 'P': // P - switch between 360 and 450 degree mode
if ((yaesu_command_buffer[1] == '3') && (yaesu_command_buffer_index > 2)) { // P36 command
azimuth_rotation_capability = 360;
strcpy(return_string,"Mode 360 degree");
// write_settings_to_eeprom();
} else {
if ((yaesu_command_buffer[1] == '4') && (yaesu_command_buffer_index > 2)) { // P45 command
azimuth_rotation_capability = 450;
strcpy(return_string,"Mode 450 degree");
// write_settings_to_eeprom();
} else {
strcpy(return_string,"?>");
}
}
break;
case 'Z': // Z - Starting point toggle
if (azimuth_starting_point == 180) {
azimuth_starting_point = 0;
strcpy(return_string,"N");
} else {
azimuth_starting_point = 180;
strcpy(return_string,"S");
}
strcat(return_string," Center");
// write_settings_to_eeprom();
break;
#endif
default:
strcpy(return_string,"?>");
#ifdef DEBUG_PROCESS_YAESU
if (debug_mode) {
debug_print("process_yaesu_command: yaesu_command_buffer_index: ");
debug_print_int(yaesu_command_buffer_index);
for (int debug_x = 0; debug_x < yaesu_command_buffer_index; debug_x++) {
debug_print("process_yaesu_command: yaesu_command_buffer[");
debug_print_int(debug_x);
debug_print("]: ");
debug_print_int(yaesu_command_buffer[debug_x]);
debug_print(" ");
debug_write_int(yaesu_command_buffer[debug_x]);
debug_print("\n");;
}
}
#endif // DEBUG_PROCESS_YAESU
} /* switch */
} /* yaesu_serial_command */
#endif // FEATURE_YAESU_EMULATION
// --------------------------------------------------------------
#ifdef FEATURE_ETHERNET
void service_ethernet(){
byte incoming_byte = 0;
static unsigned long last_incoming_byte_receive_time = 0;
char return_string[100] = "";
static byte ethernet_port_buffer0[COMMAND_BUFFER_SIZE];
static int ethernet_port_buffer_index0 = 0;
static byte first_connect_occurred = 0;
static long last_received_byte0 = 0;
#ifdef FEATURE_REMOTE_UNIT_SLAVE
static byte preamble_received = 0;
#endif //FEATURE_REMOTE_UNIT_SLAVE
/* this is the server side (receiving bytes from a client such as a master unit receiving commands from a computer
or a slave receiving commands from a master unit
*/
// clear things out if we received a partial message and it's been awhile
if ((ethernet_port_buffer_index0) && ((millis()-last_received_byte0) > ETHERNET_MESSAGE_TIMEOUT_MS)){
ethernet_port_buffer_index0 = 0;
#ifdef FEATURE_REMOTE_UNIT_SLAVE
preamble_received = 0;
#endif //FEATURE_REMOTE_UNIT_SLAVE
}
if (ethernetserver0.available()){
ethernetclient0 = ethernetserver0.available();
last_received_byte0 = millis();
if (!first_connect_occurred){ // clean out the cruft that's alway spit out on first connect
while(ethernetclient0.available()){ethernetclient0.read();}
first_connect_occurred = 1;
return;
}
if (ethernetclient0.available() > 0){ // the client has sent something
incoming_byte = ethernetclient0.read();
last_incoming_byte_receive_time = millis();
#ifdef DEBUG_ETHERNET
debug_print("service_ethernet: client:") ;
debug_print(" char:");
debug_print_char((char) incoming_byte);
debug_print("\n");
#endif //DEBUG_ETHERNET
if ((incoming_byte > 96) && (incoming_byte < 123)) { // uppercase it
incoming_byte = incoming_byte - 32;
}
char ethernet_preamble[] = ETHERNET_PREAMBLE;
#ifdef FEATURE_REMOTE_UNIT_SLAVE
if (preamble_received < 254){ // the master/slave ethernet link has each message prefixed with a preamble
if (ethernet_preamble[preamble_received] == 0){
preamble_received = 254;
} else {
if (incoming_byte == ethernet_preamble[preamble_received]){
preamble_received++;
} else {
preamble_received = 0;
}
}
}
// add it to the buffer if it's not a line feed or carriage return and we've received the preamble
if ((incoming_byte != 10) && (incoming_byte != 13) && (preamble_received == 254)) {
ethernet_port_buffer0[ethernet_port_buffer_index0] = incoming_byte;
ethernet_port_buffer_index0++;
}
#else
if ((incoming_byte != 10) && (incoming_byte != 13)) { // add it to the buffer if it's not a line feed or carriage return
ethernet_port_buffer0[ethernet_port_buffer_index0] = incoming_byte;
ethernet_port_buffer_index0++;
}
#endif //FEATURE_REMOTE_UNIT_SLAVE
if (((incoming_byte == 13) || (ethernet_port_buffer_index0 >= COMMAND_BUFFER_SIZE)) && (ethernet_port_buffer_index0 > 0)){ // do we have a carriage return?
if ((ethernet_port_buffer0[0] == '\\') or (ethernet_port_buffer0[0] == '/')) {
process_backslash_command(ethernet_port_buffer0, ethernet_port_buffer_index0, ETHERNET_PORT0, return_string);
} else {
#ifdef FEATURE_YAESU_EMULATION
process_yaesu_command(ethernet_port_buffer0,ethernet_port_buffer_index0,ETHERNET_PORT0,return_string);
#endif //FEATURE_YAESU_EMULATION
#ifdef FEATURE_EASYCOM_EMULATION
process_easycom_command(ethernet_port_buffer0,ethernet_port_buffer_index0,ETHERNET_PORT0,return_string);
#endif //FEATURE_EASYCOM_EMULATION
#ifdef FEATURE_REMOTE_UNIT_SLAVE
process_remote_slave_command(ethernet_port_buffer0,ethernet_port_buffer_index0,ETHERNET_PORT0,return_string);
#endif //FEATURE_REMOTE_UNIT_SLAVE
}
ethernetclient0.println(return_string);
ethernet_port_buffer_index0 = 0;
#ifdef FEATURE_REMOTE_UNIT_SLAVE
preamble_received = 0;
#endif //FEATURE_REMOTE_UNIT_SLAVE
}
}
}
#ifdef ETHERNET_TCP_PORT_1
static byte ethernet_port_buffer1[COMMAND_BUFFER_SIZE];
static int ethernet_port_buffer_index1 = 0;
if (ethernetserver1.available()){
ethernetclient1 = ethernetserver1.available();
if (ethernetclient1.available() > 0){ // the client has sent something
incoming_byte = ethernetclient1.read();
last_incoming_byte_receive_time = millis();
#ifdef DEBUG_ETHERNET
debug_print("service_ethernet: client:") ;
debug_print(" char:");
debug_print_char((char) incoming_byte);
debug_print("\n");
#endif //DEBUG_ETHERNET
if ((incoming_byte > 96) && (incoming_byte < 123)) { // uppercase it
incoming_byte = incoming_byte - 32;
}
if ((incoming_byte != 10) && (incoming_byte != 13)) { // add it to the buffer if it's not a line feed or carriage return
ethernet_port_buffer1[ethernet_port_buffer_index1] = incoming_byte;
ethernet_port_buffer_index1++;
}
if (incoming_byte == 13) { // do we have a carriage return?
if ((ethernet_port_buffer1[0] == '\\') or (ethernet_port_buffer1[0] == '/')) {
process_backslash_command(ethernet_port_buffer1, ethernet_port_buffer_index1, ETHERNET_PORT1, return_string);
} else {
#ifdef FEATURE_YAESU_EMULATION
process_yaesu_command(ethernet_port_buffer1,ethernet_port_buffer_index1,ETHERNET_PORT1,return_string);
#endif //FEATURE_YAESU_EMULATION
#ifdef FEATURE_EASYCOM_EMULATION
process_easycom_command(ethernet_port_buffer1,ethernet_port_buffer_index1,ETHERNET_PORT1,return_string);
#endif //FEATURE_EASYCOM_EMULATION
#ifdef FEATURE_REMOTE_UNIT_SLAVE
process_remote_slave_command(ethernet_port_buffer1,ethernet_port_buffer_index1,ETHERNET_PORT1,return_string);
#endif //FEATURE_REMOTE_UNIT_SLAVE
}
ethernetclient1.println(return_string);
ethernet_port_buffer_index1 = 0;
}
}
}
#endif //ETHERNET_TCP_PORT_1
#ifdef FEATURE_MASTER_WITH_ETHERNET_SLAVE
static long last_connect_try = 0;
static long last_received_byte_time = 0;
byte incoming_ethernet_byte = 0;
static byte first_ethernet_slave_connect_occurred = 0;
// are we disconnected and is it time to reconnect?
if ((ethernetslavelinkclient0_state == ETHERNET_SLAVE_DISCONNECTED) && (((millis()-last_connect_try) >= ETHERNET_SLAVE_RECONNECT_TIME_MS) || (last_connect_try == 0))){
#ifdef DEBUG_ETHERNET
debug_println("service_ethernet: master_slave_ethernet: connecting");
#endif //DEBUG_ETHERNET
if (ethernetslavelinkclient0.connect(slave_unit_ip, ETHERNET_SLAVE_TCP_PORT)){
ethernetslavelinkclient0_state = ETHERNET_SLAVE_CONNECTED;
if (!first_ethernet_slave_connect_occurred){
first_ethernet_slave_connect_occurred = 1;
ethernet_slave_reconnects = 65535;
}
} else {
ethernetslavelinkclient0.stop();
#ifdef DEBUG_ETHERNET
debug_println("service_ethernet: master_slave_ethernet: connect failed");
#endif //DEBUG_ETHERNET
}
ethernet_slave_reconnects++;
last_connect_try = millis();
}
if (ethernetslavelinkclient0.available()) {
incoming_ethernet_byte = ethernetslavelinkclient0.read();
#ifdef DEBUG_ETHERNET
debug_print("service_ethernet: slave rx: ");
debug_print_char(incoming_ethernet_byte);
debug_print(" : ");
debug_print_int(incoming_ethernet_byte);
debug_println("");
#endif //DEBUG_ETHERNET
if (remote_port_rx_sniff) {
control_port->write(incoming_ethernet_byte);
}
if ((incoming_ethernet_byte != 10) && (remote_unit_port_buffer_index < COMMAND_BUFFER_SIZE)) {
remote_unit_port_buffer[remote_unit_port_buffer_index] = incoming_ethernet_byte;
remote_unit_port_buffer_index++;
if ((incoming_ethernet_byte == 13) || (remote_unit_port_buffer_index >= COMMAND_BUFFER_SIZE)) {
remote_unit_port_buffer_carriage_return_flag = 1;
#ifdef DEBUG_ETHERNET
debug_println("service_ethernet: remote_unit_port_buffer_carriage_return_flag");
#endif //DEBUG_ETHERNET
}
}
last_received_byte_time = millis();
}
if (((millis() - last_received_byte_time) >= ETHERNET_MESSAGE_TIMEOUT_MS) && (remote_unit_port_buffer_index > 1) && (!remote_unit_port_buffer_carriage_return_flag)){
remote_unit_port_buffer_index = 0;
#ifdef DEBUG_ETHERNET
debug_println("service_ethernet: master_slave_ethernet: remote_unit_incoming_buffer_timeout");
#endif //DEBUG_ETHERNET
remote_unit_incoming_buffer_timeouts++;
}
if ((ethernetslavelinkclient0_state == ETHERNET_SLAVE_CONNECTED) && (!ethernetslavelinkclient0.connected())){
ethernetslavelinkclient0.stop();
ethernetslavelinkclient0_state = ETHERNET_SLAVE_DISCONNECTED;
remote_unit_port_buffer_index = 0;
#ifdef DEBUG_ETHERNET
debug_println("service_ethernet: master_slave_ethernet: lost connection");
#endif //DEBUG_ETHERNET
}
#endif //FEATURE_MASTER_WITH_ETHERNET_SLAVE
}
#endif //FEATURE_ETHERNET
// --------------------------------------------------------------
#ifdef FEATURE_EASYCOM_EMULATION
void process_easycom_command(byte * easycom_command_buffer, int easycom_command_buffer_index, byte source_port, char * return_string){
/* Easycom protocol implementation
*
* Implemented commands:
*
* Command Meaning Parameters
* ------- ------- ----------
*
* ML Move Left
* MR Move Right
* MU Move Up
* MD Move Down
* SA Stop azimuth moving
* SE Stop elevation moving
*
* VE Request Version
* AZ Azimuth number - 1 decimal place (activated with OPTION_EASYCOM_AZ_QUERY_COMMAND)
* EL Elevation number - 1 decimal place (activated with OPTION_EASYCOM_EL_QUERY_COMMAND)
*
*
*/
char tempstring[11] = "";
float heading = -1;
strcpy(return_string,"");
switch (easycom_command_buffer[0]) { // look at the first character of the command
case 'A': // AZ
if (easycom_command_buffer[1] == 'Z') { // format is AZx.x or AZxx.x or AZxxx.x (why didn't they make it fixed length?)
switch (easycom_command_buffer_index) {
#ifdef OPTION_EASYCOM_AZ_QUERY_COMMAND
case 2:
strcpy(return_string,"AZ");
dtostrf((float)azimuth/(float)HEADING_MULTIPLIER,0,1,tempstring);
strcat(return_string,tempstring);
return;
break;
#endif // OPTION_EASYCOM_AZ_QUERY_COMMAND
case 5: // format AZx.x
heading = (easycom_command_buffer[2] - 48) + ((easycom_command_buffer[4] - 48) / 10.);
break;
case 6: // format AZxx.x
heading = ((easycom_command_buffer[2] - 48) * 10.) + (easycom_command_buffer[3] - 48) + ((easycom_command_buffer[5] - 48) / 10.);
break;
case 7: // format AZxxx.x
heading = ((easycom_command_buffer[2] - 48) * 100.) + ((easycom_command_buffer[3] - 48) * 10.) + (easycom_command_buffer[4] - 48.) + ((easycom_command_buffer[6] - 48) / 10.);
break;
// default: control_port->println("?"); break;
}
if (((heading >= 0) && (heading < 451)) && (easycom_command_buffer[easycom_command_buffer_index - 2] == '.')) {
submit_request(AZ, REQUEST_AZIMUTH, (heading * HEADING_MULTIPLIER), 36);
} else {
strcpy(return_string,"?");
}
} else {
strcpy(return_string,"?");
}
break;
#ifdef FEATURE_ELEVATION_CONTROL
case 'E': // EL
if (easycom_command_buffer[1] == 'L') {
switch (easycom_command_buffer_index) {
#ifdef OPTION_EASYCOM_EL_QUERY_COMMAND
case 2:
strcpy(return_string,"EL");
dtostrf((float)elevation/(float)HEADING_MULTIPLIER,0,1,tempstring);
strcat(return_string,tempstring);
return;
break;
#endif // OPTION_EASYCOM_EL_QUERY_COMMAND
case 5: // format ELx.x
heading = (easycom_command_buffer[2] - 48) + ((easycom_command_buffer[4] - 48) / 10.);
break;
case 6: // format ELxx.x
heading = ((easycom_command_buffer[2] - 48) * 10.) + (easycom_command_buffer[3] - 48) + ((easycom_command_buffer[5] - 48) / 10.);
break;
case 7: // format ELxxx.x
heading = ((easycom_command_buffer[2] - 48) * 100.) + ((easycom_command_buffer[3] - 48) * 10.) + (easycom_command_buffer[4] - 48) + ((easycom_command_buffer[6] - 48) / 10.);
break;
// default: control_port->println("?"); break;
}
if (((heading >= 0) && (heading < 181)) && (easycom_command_buffer[easycom_command_buffer_index - 2] == '.')) {
submit_request(EL, REQUEST_ELEVATION, (heading * HEADING_MULTIPLIER), 37);
} else {
strcpy(return_string,"?");
}
} else {
strcpy(return_string,"?");
}
break;
#endif // #FEATURE_ELEVATION_CONTROL
case 'S': // SA or SE - stop azimuth, stop elevation
switch (easycom_command_buffer[1]) {
case 'A':
submit_request(AZ, REQUEST_STOP, 0, 38);
break;
#ifdef FEATURE_ELEVATION_CONTROL
case 'E':
submit_request(EL, REQUEST_STOP, 0, 39);
break;
#endif // FEATURE_ELEVATION_CONTROL
default: strcpy(return_string,"?"); break;
}
break;
case 'M': // ML, MR, MU, MD - move left, right, up, down
switch (easycom_command_buffer[1]) {
case 'L': // ML - move left
submit_request(AZ, REQUEST_CCW, 0, 40);
break;
case 'R': // MR - move right
submit_request(AZ, REQUEST_CW, 0, 41);
break;
#ifdef FEATURE_ELEVATION_CONTROL
case 'U': // MU - move up
submit_request(EL, REQUEST_UP, 0, 42);
break;
case 'D': // MD - move down
submit_request(EL, REQUEST_DOWN, 0, 43);
break;
#endif // FEATURE_ELEVATION_CONTROL
default: strcpy(return_string,"?"); break;
}
break;
case 'V': // VE - version query
if (easycom_command_buffer[1] == 'E') {
strcpy(return_string,"VE002");
} // not sure what to send back, sending 002 because this is easycom version 2?
break;
default: strcpy(return_string,"?"); break;
} /* switch */
} /* easycom_serial_commmand */
#endif // FEATURE_EASYCOM_EMULATION
// --------------------------------------------------------------
#ifdef FEATURE_REMOTE_UNIT_SLAVE
void process_remote_slave_command(byte * slave_command_buffer, int slave_command_buffer_index, byte source_port, char * return_string){
/*
*
* This implements a protocol for host unit to remote unit communications
*
*
* Remote Slave Unit Protocol Reference
*
* PG - ping
* AZ - read azimuth (returns AZxxx.xxxxxx)
* EL - read elevation (returns ELxxx.xxxxxx)
* DOxx - digital pin initialize as output;
* DIxx - digital pin initialize as input
* DPxx - digital pin initialize as input with pullup
* DRxx - digital pin read
* DLxx - digital pin write low
* DHxx - digital pin write high
* DTxxyyyy - digital pin tone output
* NTxx - no tone
* ARxx - analog pin read
* AWxxyyy - analog pin write
* SWxy - serial write byte
* SDx - deactivate serial read event; x = port #
* SSxyyyyyy... - serial write string; x = port #, yyyy = string of characters to send
* SAx - activate serial read event; x = port #
* RB - reboot
* CL - return clock date and time
*
* Responses
*
* ER - report an error (remote to host only)
* EV - report an event (remote to host only)
* OK - report success (remote to host only)
* CS - report a cold start (remote to host only)
*
* Error Codes
*
* ER01 - Serial port buffer timeout
* ER02 - Command syntax error
*
* Events
*
* EVSxy - Serial port read event; x = serial port number, y = byte returned
*
*
*/
byte command_good = 0;
strcpy(return_string,"");
char tempstring[25] = "";
if (slave_command_buffer_index < 2) {
strcpy(return_string,"ER02"); // we don't have enough characters - syntax error
} else {
#ifdef DEBUG_PROCESS_SLAVE
debug_print("serial_serial_buffer: command_string: ");
debug_print((char*)slave_command_buffer);
debug_print("$ slave_command_buffer_index: ");
debug_print_int(slave_command_buffer_index);
debug_print("\n");
#endif // DEBUG_PROCESS_SLAVE
if (((slave_command_buffer[0] == 'S') && (slave_command_buffer[1] == 'S')) && (slave_command_buffer[2] > 47) && (slave_command_buffer[2] < 53)) { // this is a variable length command
command_good = 1;
for (byte x = 3; x < slave_command_buffer_index; x++) {
switch (slave_command_buffer[2] - 48) {
case 0: control_port->write(slave_command_buffer[x]); break;
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
case 1: remote_unit_port->write(slave_command_buffer[x]); break;
#endif
}
}
}
if (slave_command_buffer_index == 2) {
#ifdef FEATURE_CLOCK
if ((slave_command_buffer[0] == 'C') && (slave_command_buffer[1] == 'L')) {
strcpy(return_string,"CL");
update_time();
strcat(return_string,clock_string());
command_good = 1;
}
#endif //FEATURE_CLOCK
if ((slave_command_buffer[0] == 'P') && (slave_command_buffer[1] == 'G')) {
strcpy(return_string,"PG"); command_good = 1;
} // PG - ping
if ((slave_command_buffer[0] == 'R') && (slave_command_buffer[1] == 'B')) {
wdt_enable(WDTO_30MS); while (1) {
}
} // RB - reboot
if ((slave_command_buffer[0] == 'A') && (slave_command_buffer[1] == 'Z')) {
strcpy(return_string,"AZ");
//if ((raw_azimuth/HEADING_MULTIPLIER) < 1000) {
// strcat(return_string,"0");
//}
if ((raw_azimuth/HEADING_MULTIPLIER) < 100) {
strcat(return_string,"0");
}
if ((raw_azimuth/HEADING_MULTIPLIER) < 10) {
strcat(return_string,"0");
}
dtostrf(float(raw_azimuth/HEADING_MULTIPLIER),0,6,tempstring);
strcat(return_string,tempstring);
command_good = 1;
}
#ifdef FEATURE_ELEVATION_CONTROL
if ((slave_command_buffer[0] == 'E') && (slave_command_buffer[1] == 'L')) {
strcpy(return_string,"EL");
if ((elevation/HEADING_MULTIPLIER) >= 0) {
strcat(return_string,"+");
} else {
strcat(return_string,"-");
}
//if (abs(elevation/HEADING_MULTIPLIER) < 1000) {
// strcat(return_string,"0");
//}
if (abs(elevation/HEADING_MULTIPLIER) < 100) {
strcat(return_string,"0");
}
if (abs(elevation/HEADING_MULTIPLIER) < 10) {
strcat(return_string,"0");
}
dtostrf(float(abs(elevation/HEADING_MULTIPLIER)),0,6,tempstring);
strcat(return_string,tempstring);
command_good = 1;
}
#endif // FEATURE_ELEVATION_CONTROL
} // end of two byte commands
if (slave_command_buffer_index == 3) {
if (((slave_command_buffer[0] == 'S') && (slave_command_buffer[1] == 'A')) & (slave_command_buffer[2] > 47) && (slave_command_buffer[2] < 53)) {
serial_read_event_flag[slave_command_buffer[2] - 48] = 1;
command_good = 1;
strcpy(return_string,"OK");
}
if (((slave_command_buffer[0] == 'S') && (slave_command_buffer[1] == 'D')) & (slave_command_buffer[2] > 47) && (slave_command_buffer[2] < 53)) {
serial_read_event_flag[slave_command_buffer[2] - 48] = 0;
command_good = 1;
strcpy(return_string,"OK");
}
}
if (slave_command_buffer_index == 4) {
if ((slave_command_buffer[0] == 'S') && (slave_command_buffer[1] == 'W')) { // Serial Write command
switch (slave_command_buffer[2]) {
case '0': control_port->write(slave_command_buffer[3]); command_good = 1; break;
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
case '1': remote_unit_port->write(slave_command_buffer[3]); command_good = 1; break;
#endif
}
}
if ((slave_command_buffer[0] == 'D') && (slave_command_buffer[1] == 'O')) {
if ((((slave_command_buffer[2] > 47) && (slave_command_buffer[2] < 58)) || (toupper(slave_command_buffer[2]) == 'A')) && (slave_command_buffer[3] > 47) && (slave_command_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(slave_command_buffer[2]) == 'A') {
pin_value = get_analog_pin(slave_command_buffer[3] - 48);
} else {
pin_value = ((slave_command_buffer[2] - 48) * 10) + (slave_command_buffer[3] - 48);
}
#ifdef DEBUG_PROCESS_SLAVE
debug_print("service_serial_buffer: pin_value: ");
debug_print_int(pin_value);
#endif // DEBUG_PROCESS_SLAVE
strcpy(return_string,"OK");
pinModeEnhanced(pin_value, OUTPUT);
}
}
if ((slave_command_buffer[0] == 'D') && (slave_command_buffer[1] == 'H')) {
if ((((slave_command_buffer[2] > 47) && (slave_command_buffer[2] < 58)) || (toupper(slave_command_buffer[2]) == 'A')) && (slave_command_buffer[3] > 47) && (slave_command_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(slave_command_buffer[2]) == 'A') {
pin_value = get_analog_pin(slave_command_buffer[3] - 48);
} else {
pin_value = ((slave_command_buffer[2] - 48) * 10) + (slave_command_buffer[3] - 48);
}
digitalWriteEnhanced(pin_value, HIGH);
strcpy(return_string,"OK");
}
}
if ((slave_command_buffer[0] == 'D') && (slave_command_buffer[1] == 'L')) {
if ((((slave_command_buffer[2] > 47) && (slave_command_buffer[2] < 58)) || (toupper(slave_command_buffer[2]) == 'A')) && (slave_command_buffer[3] > 47) && (slave_command_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(slave_command_buffer[2]) == 'A') {
pin_value = get_analog_pin(slave_command_buffer[3] - 48);
} else {
pin_value = ((slave_command_buffer[2] - 48) * 10) + (slave_command_buffer[3] - 48);
}
digitalWriteEnhanced(pin_value, LOW);
strcpy(return_string,"OK");
}
}
if ((slave_command_buffer[0] == 'D') && (slave_command_buffer[1] == 'I')) {
if ((((slave_command_buffer[2] > 47) && (slave_command_buffer[2] < 58)) || (toupper(slave_command_buffer[2]) == 'A')) && (slave_command_buffer[3] > 47) && (slave_command_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(slave_command_buffer[2]) == 'A') {
pin_value = get_analog_pin(slave_command_buffer[3] - 48);
} else {
pin_value = ((slave_command_buffer[2] - 48) * 10) + (slave_command_buffer[3] - 48);
}
pinModeEnhanced(pin_value, INPUT);
strcpy(return_string,"OK");
}
}
if ((slave_command_buffer[0] == 'D') && (slave_command_buffer[1] == 'P')) {
if ((((slave_command_buffer[2] > 47) && (slave_command_buffer[2] < 58)) || (toupper(slave_command_buffer[2]) == 'A')) && (slave_command_buffer[3] > 47) && (slave_command_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(slave_command_buffer[2]) == 'A') {
pin_value = get_analog_pin(slave_command_buffer[3] - 48);
} else {
pin_value = ((slave_command_buffer[2] - 48) * 10) + (slave_command_buffer[3] - 48);
}
pinModeEnhanced(pin_value, INPUT);
digitalWriteEnhanced(pin_value, HIGH);
strcpy(return_string,"OK");
}
}
if ((slave_command_buffer[0] == 'D') && (slave_command_buffer[1] == 'R')) {
if ((((slave_command_buffer[2] > 47) && (slave_command_buffer[2] < 58)) || (toupper(slave_command_buffer[2]) == 'A')) && (slave_command_buffer[3] > 47) && (slave_command_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(slave_command_buffer[2]) == 'A') {
pin_value = get_analog_pin(slave_command_buffer[3] - 48);
} else {
pin_value = ((slave_command_buffer[2] - 48) * 10) + (slave_command_buffer[3] - 48);
}
byte pin_read = digitalReadEnhanced(pin_value);
strcpy(return_string,"DR");
dtostrf((slave_command_buffer[2]-48),0,0,tempstring);
strcat(return_string,tempstring);
dtostrf((slave_command_buffer[3]-48),0,0,tempstring);
strcat(return_string,tempstring);
if (pin_read) {
strcat(return_string,"1");
} else {
strcat(return_string,"0");
}
}
}
if ((slave_command_buffer[0] == 'A') && (slave_command_buffer[1] == 'R')) {
if ((((slave_command_buffer[2] > 47) && (slave_command_buffer[2] < 58)) || (toupper(slave_command_buffer[2]) == 'A')) && (slave_command_buffer[3] > 47) && (slave_command_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(slave_command_buffer[2]) == 'A') {
pin_value = get_analog_pin(slave_command_buffer[3] - 48);
} else {
pin_value = ((slave_command_buffer[2] - 48) * 10) + (slave_command_buffer[3] - 48);
}
int pin_read = analogReadEnhanced(pin_value);
strcpy(return_string,"AR");
if (toupper(slave_command_buffer[2]) == 'A') {
strcat(return_string,"A");
} else {
dtostrf((slave_command_buffer[2]-48),0,0,tempstring);
strcat(return_string,tempstring);
}
dtostrf((slave_command_buffer[3]-48),0,0,tempstring);
strcat(return_string,tempstring);
if (pin_read < 1000) {
strcat(return_string,"0");
}
if (pin_read < 100) {
strcat(return_string,"0");
}
if (pin_read < 10) {
strcat(return_string,"0");
}
dtostrf(pin_read,0,0,tempstring);
strcat(return_string,tempstring);
}
}
if ((slave_command_buffer[0] == 'N') && (slave_command_buffer[1] == 'T')) {
if ((((slave_command_buffer[2] > 47) && (slave_command_buffer[2] < 58)) || (toupper(slave_command_buffer[2]) == 'A')) && (slave_command_buffer[3] > 47) && (slave_command_buffer[3] < 58)) {
command_good = 1;
byte pin_value = 0;
if (toupper(slave_command_buffer[2]) == 'A') {
pin_value = get_analog_pin(slave_command_buffer[3] - 48);
} else {
pin_value = ((slave_command_buffer[2] - 48) * 10) + (slave_command_buffer[3] - 48);
}
noTone(pin_value);
strcpy(return_string,"OK");
}
}
} // if (slave_command_buffer_index == 4)
if (slave_command_buffer_index == 7) {
if ((slave_command_buffer[0] == 'A') && (slave_command_buffer[1] == 'W')) {
if ((((slave_command_buffer[2] > 47) && (slave_command_buffer[2] < 58)) || (toupper(slave_command_buffer[2]) == 'A')) && (slave_command_buffer[3] > 47) && (slave_command_buffer[3] < 58)) {
byte pin_value = 0;
if (toupper(slave_command_buffer[2]) == 'A') {
pin_value = get_analog_pin(slave_command_buffer[3] - 48);
} else {
pin_value = ((slave_command_buffer[2] - 48) * 10) + (slave_command_buffer[3] - 48);
}
int write_value = ((slave_command_buffer[4] - 48) * 100) + ((slave_command_buffer[5] - 48) * 10) + (slave_command_buffer[6] - 48);
if ((write_value >= 0) && (write_value < 256)) {
analogWriteEnhanced(pin_value, write_value);
strcpy(return_string,"OK");
command_good = 1;
}
}
}
}
if (slave_command_buffer_index == 8) {
if ((slave_command_buffer[0] == 'D') && (slave_command_buffer[1] == 'T')) {
if ((((slave_command_buffer[2] > 47) && (slave_command_buffer[2] < 58)) || (toupper(slave_command_buffer[2]) == 'A')) && (slave_command_buffer[3] > 47) && (slave_command_buffer[3] < 58)) {
byte pin_value = 0;
if (toupper(slave_command_buffer[2]) == 'A') {
pin_value = get_analog_pin(slave_command_buffer[3] - 48);
} else {
pin_value = ((slave_command_buffer[2] - 48) * 10) + (slave_command_buffer[3] - 48);
}
int write_value = ((slave_command_buffer[4] - 48) * 1000) + ((slave_command_buffer[5] - 48) * 100) + ((slave_command_buffer[6] - 48) * 10) + (slave_command_buffer[7] - 48);
if ((write_value >= 0) && (write_value <= 9999)) {
tone(pin_value, write_value);
strcpy(return_string,"OK");
command_good = 1;
}
}
}
}
if (!command_good) {
strcpy(return_string,"ER0289");
}
}
slave_command_buffer_index = 0;
}
#endif //FEATURE_REMOTE_UNIT_SLAVE
// --------------------------------------------------------------
void port_flush(){
#ifdef CONTROL_PORT_MAPPED_TO
control_port->flush();
#endif //CONTROL_PORT_MAPPED_TO
#if defined(FEATURE_MASTER_WITH_SERIAL_SLAVE)
remote_unit_port->flush();
#endif
#if defined(GPS_PORT_MAPPED_TO) && defined(FEATURE_GPS)
gps_port->flush();
#endif //defined(GPS_PORT_MAPPED_TO) && defined(FEATURE_GPS)
}
// --------------------------------------------------------------
#ifdef FEATURE_POWER_SWITCH
void service_power_switch(){
static byte power_switch_state = 1;
#ifdef FEATURE_ELEVATION_CONTROL
if ((az_state != IDLE) || (el_state != IDLE)){
last_activity_time = millis();
}
#else //FEATURE_ELEVATION_CONTROL
if (az_state != IDLE){
last_activity_time = millis();
}
#endif //FEATURE_ELEVATION_CONTROL
if ((millis()-last_activity_time) > (60000 * POWER_SWITCH_IDLE_TIMEOUT)) {
if (power_switch_state){
digitalWriteEnhanced(power_switch, LOW);
power_switch_state = 0;
}
} else {
if (!power_switch_state){
digitalWriteEnhanced(power_switch, HIGH);
power_switch_state = 1;
}
}
}
#endif //FEATURE_POWER_SWITCH
//------------------------------------------------------
char * coordinates_to_maidenhead(float latitude_degrees,float longitude_degrees){
char temp_string[8] = "";
const char* asciiuppercase[] = {"A","B","C","D","E","F","G","H","I","J","K","L","M","N","O","P","Q","R"};
const char* asciinumbers[] = {"0","1","2","3","4","5","6","7","8","9"};
const char* asciilowercase[] = {"a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x"};
latitude_degrees += 90.0;
longitude_degrees += 180.0;
strcat(temp_string,asciiuppercase[int(longitude_degrees/20)]);
strcat(temp_string,asciiuppercase[int(latitude_degrees/10)]);
strcat(temp_string,asciinumbers[int((longitude_degrees - int(longitude_degrees/20)*20)/2)]);
strcat(temp_string,asciinumbers[int(latitude_degrees - int(latitude_degrees/10)*10)]);
strcat(temp_string,asciilowercase[int((longitude_degrees - (int(longitude_degrees/2)*2)) / (5.0/60.0))]);
strcat(temp_string,asciilowercase[int((latitude_degrees - (int(latitude_degrees/1)*1)) / (2.5/60.0))]);
return temp_string;
}
//------------------------------------------------------
#ifdef FEATURE_MASTER_WITH_ETHERNET_SLAVE
byte ethernet_slave_link_send(char * string_to_send){
if (ethernetslavelinkclient0_state == ETHERNET_SLAVE_CONNECTED){
ethernetslavelinkclient0.print(ETHERNET_PREAMBLE);
ethernetslavelinkclient0.println(string_to_send);
#ifdef DEBUG_ETHERNET
debug_print("ethernet_slave_link_send: ");
debug_println(string_to_send);
#endif //DEBUG_ETHERNET
return 1;
} else {
#ifdef DEBUG_ETHERNET
debug_print("ethernet_slave_link_send: link down not sending:");
debug_println(string_to_send);
#endif //DEBUG_ETHERNET
return 0;
}
}
#endif //FEATURE_MASTER_WITH_ETHERNET_SLAVE
//------------------------------------------------------
#if defined(FEATURE_CLOCK) && defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE) && (defined(FEATURE_MASTER_WITH_SERIAL_SLAVE) || defined(FEATURE_MASTER_WITH_ETHERNET_SLAVE))
void sync_master_clock_to_slave(){
static unsigned long last_sync_master_clock_to_slave = 5000;
if ((millis() - last_sync_master_clock_to_slave) >= (SYNC_MASTER_CLOCK_TO_SLAVE_CLOCK_SECS * 1000)){
if (submit_remote_command(REMOTE_UNIT_CL_COMMAND, 0, 0)) {
#ifdef DEBUG_SYNC_MASTER_CLOCK_TO_SLAVE
debug_println("sync_master_clock_to_slave: submitted REMOTE_UNIT_CL_COMMAND");
#endif //DEBUG_SYNC_MASTER_CLOCK_TO_SLAVE
last_sync_master_clock_to_slave = millis();
}
}
}
#endif //defined(FEATURE_CLOCK) && defined(OPTION_SYNC_MASTER_CLOCK_TO_SLAVE)
//------------------------------------------------------
#ifdef FEATURE_STEPPER_MOTOR_EXPERIMENTAL_CODE
void set_az_stepper_freq(int frequency){
az_stepper_pulse_period_us = 1000000 / frequency;
}
#endif //FEATURE_STEPPER_MOTOR_EXPERIMENTAL_CODE
//------------------------------------------------------
#if defined(FEATURE_ELEVATION_CONTROL) && defined(FEATURE_STEPPER_MOTOR_EXPERIMENTAL_CODE)
void set_el_stepper_freq(int frequency){
el_stepper_pulse_period_us = 1000000 / frequency;
}
#endif //defined(FEATURE_ELEVATION_CONTROL) && defined(FEATURE_STEPPER_MOTOR_EXPERIMENTAL_CODE)
//------------------------------------------------------
#ifdef FEATURE_STEPPER_MOTOR_EXPERIMENTAL_CODE
void service_stepper_pins(){
//az_stepper_pulses_remaining
//el_stepper_pulses_remaining
}
#endif //FEATURE_STEPPER_MOTOR_EXPERIMENTAL_CODE
//-------------------------------------------------------
#ifdef FEATURE_ANALOG_OUTPUT_PINS
void service_analog_output_pins(){
static int last_azimith_voltage_out = 0;
int azimuth_voltage_out = map(azimuth/HEADING_MULTIPLIER,0,360,0,255);
if (last_azimith_voltage_out != azimuth_voltage_out){analogWriteEnhanced(pin_analog_az_out,azimuth_voltage_out);}
#ifdef FEATURE_ELEVATION_CONTROL
static int last_elevation_voltage_out = 0;
int elevation_voltage_out = map(elevation/HEADING_MULTIPLIER,0,ANALOG_OUTPUT_MAX_EL_DEGREES,0,255);
if (last_elevation_voltage_out != elevation_voltage_out){analogWriteEnhanced(pin_analog_el_out,elevation_voltage_out);}
#endif //FEATURE_ELEVATION_CONTROL
}
#endif //FEATURE_ANALOG_OUTPUT_PINS
Reference in New Issue View Git Blame Copy Permalink