heatsup.cpp

a program that generates a pulse-width modulated (PWM)signal.

// HeatSup Sets the setpoint for the heater control
// File:  HeatSup.cpp
// Created 8/2/95 by Jason Jones
// Modified 10/5/95 by DM Auslander, changed to setpoint generator

#include <iostream.h>
#include <math.h>
#include "tasks.hpp"

HeatSupTask::HeatSupTask(char *aName)	// Constructor
		  :BaseTask(aName)
	{
	DeltaTaskTime = 0.1; // Task period
	NextTaskTime = 0.0;
	State = 0;	       // set to initialize
	NextState = 0;
	temp_init = temp = 0.3;
	temp_final = 0.0; // Legal value -- operator sets this
	temp_soak = 0.7;
	soak_time = 3.0;
	setpt = temp_init;
   CreateGlobal(3);  // Create global data bases
   ActivateProfiling(5.e-6,80.e-6,15,LOG_PROFILE);
	}

HeatSupTask::~HeatSupTask(void){};

int HeatSupTask::Run(void)
	{
	// Initialization code.  If there is anything
	// that the task needs to do only once at
	// start-up, put it here.
	//double Time;
	int done = 1;	// Default return value indicating
			// done for this event

	NumScans++;	// Increment scan count

	if (State == 0)
		{
		State = 1;
		NextState = 1;
		return (0);
		}

	// Only run the task if it is proper time.
	// Note:  It is not required that there be some time
	//		based criteria for when the task runs.  This
	//		section could be taken out, resulting in a task
	//		that runs every scan.
	if ((GetTimeNow()) < NextTaskTime)
		return (done);		//  Done for now

	// Calculate the next run time for the task
	NextTaskTime += DeltaTaskTime;

	if (NextState != -1)
		{
		// record audit trail here if desired
		AuditTrail(this, State, NextState);
		State = NextState;
		NextState = -1;
		RunEntry = 1;
		}
	else
		RunEntry = 0;

	switch (State)
		{
		case 1:  // Start controller
			// Entry Section
			if (RunEntry)
				{
				// only run this on entry to the state
				// entry code goes here
				setpt = temp_soak;
            PrivateGlobalData[HEATSUP_SETPOINT] = setpt;

            SendRTMessage(HeatCtrl,PID_START,1,0.0,
                       MESSAGE_NORMAL,HEATSUP_PIDCONFIRM);
             // Send message to start control -- return receipt will go
             // to indicated message box
             CopyGlobal();  // Make global information visible
				}
         // No action section

         // Test/Exit Section
         int rv,msg_flag;
         if(rv = GetRTMessage(HEATSUP_PIDCONFIRM,&msg_flag))
         	{
            // Make sure message was delivered
            if((msg_flag != 1) || (rv == -1))
            	{
               StopControl("Control start messsage not delivered\n");
               return(1);
               }
            // Yes, it was delivered
            NextState = 2;
            done = 0;
            break;
            }
      	// No confirmation yet, stay in this state
         done = 1;
         break;

   	case 2: // Bring temperature up to soaking temperature
			// Action Section
         temp = GetGlobalData(HeatCtrl,PID_PROCESS);

			// Test/Exit section
   		if(temp > (temp_soak - 0.03))
				{
				NextState = 3;		// Go into the Soak state
				done = 0;		// Run next state immediately
				}
			break;

		case 3: // Soak State -- hold for specified time
			// Entry Section
			if(RunEntry)
				{
				soak_end = GetTimeNow() + soak_time;	// Record time at start
				}
			// Action Section

			// Test/Exit Section
			if(GetTimeNow() >= soak_end)
				{
				NextState = 4;		// Bring temperature to final value
				done = 0;	// Go to next state immediately
				}
			break;

		case 4:	// Final state -- bring temperature to temp_final
			// Entry Section
			if(RunEntry)
				{
				}

			// Action Section
         temp_final = GetGlobalData(OpInt,OPINT_FINALSETPOINT);
  			setpt = temp_final;
         PrivateGlobalData[HEATSUP_SETPOINT] = setpt;

         CopyGlobal();  // Make global data visible

			// Test/Exit section
			break;

		default:  // check for an illegal state.
			cout << "\nIllegal State assignment, Task1\n";
			return (-1);
		}
	return (done);
}