GearHeads Forum

Code: Select all

global SpindleSpeed = function( speed )
{
      CRC=0xffff;
      print("speed set to " + speed);
      vfd={0x0,0x0,0x0,0x0,0x0,0x88,0x0,0x0,0x0}; 
      vfd[0]=0x01;
      vfd[1]=0x05;    
      vfd[2]=0x03;   
      freq=(speed/55.0)*100;
      vfd[3]=ToInt(freq/256);
      vfd[4]=ToInt(freq%256);    
      FreeSetSpeed( MySpindleAxis, speed);
      print("Frequency set to : " + freq ); 
&nbsp; &nbsp; &nbsp; for (inx=0;inx<6;inx+=1)
&nbsp; &nbsp; &nbsp; {
&nbsp; &nbsp; &nbsp; &nbsp; print("vfd ",vfd[inx]);
&nbsp; &nbsp; &nbsp; &nbsp; CRC=Crc16(CRC,vfd[inx]);
&nbsp; &nbsp; &nbsp; }
&nbsp; &nbsp; &nbsp; print("the CRC " + CRC);
&nbsp; &nbsp; &nbsp; vfd[6]=ToInt(CRC%256);
&nbsp; &nbsp; &nbsp; vfd[7]=ToInt(CRC/256);
&nbsp; &nbsp; &nbsp; for (inx=0;inx<8;inx+=1)
&nbsp; &nbsp; &nbsp; {
&nbsp; &nbsp; &nbsp; &nbsp; print("the vfd["+ inx + "] " + vfd[inx]);
&nbsp; &nbsp; &nbsp; }
&nbsp; &nbsp; &nbsp; myser.Table = vfd;
&nbsp; &nbsp; &nbsp; myser.SendTable();
};&nbsp;  

Code: Select all

global SpindleSpeed = function( speed )
{
 
      CRC=0xffff;
      print("speed set to " + speed); 
      //FreeSetSpeed( MySpindleAxis, speed);
      vfd=table(0x01,0x05,0x03);
      freq=speed/55.0;
      freq=freq*100;
      vfd[3]=ToInt(freq/256);
      vfd[4]=ToInt(freq%256); 
      vfd[5]=0;
      print("Frequency  set to " + freq );
&nbsp; &nbsp; &nbsp; for (inx=0;inx<tableCount(vfd);inx+=1)
&nbsp; &nbsp; &nbsp; {
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; CRC=Crc16(CRC,vfd[inx]);
&nbsp; &nbsp; &nbsp; };
&nbsp; &nbsp; &nbsp; // print("the CRC " + CRC);
&nbsp; &nbsp; &nbsp; vfd[7]=ToInt(CRC/256);
&nbsp; &nbsp; &nbsp; vfd[6]=ToInt(CRC%256);
&nbsp; &nbsp; &nbsp; myser.Table = vfd;
&nbsp; &nbsp; &nbsp; myser.SendTable();
};&nbsp; 
 

Code: Select all

// Library SystemCallBacks 
// Created  Thursday, December 31, 2015 
// Author  Art       -- Do not edit above this line
  
//  Enter Global vars below this line. 
 
 
   
 
// This script will be called 
//whenever the system is going from 
//Enabled to Disable. It is called after the 
// system shuts down motion.
 
global OnDisable = function()
{

  myser.Close();   // shut vfd port
 
  print( "--System -- System Disabled.");
  //shut off any spindle since I use one..
  if( lookup("SpindleOff")) { SpindleOff(); };
  //shut down any other Estop process here..
};
 
 
//This script is called whenever 
//the system is going from disabled to
//enabled. It is called before removing Estop 
//conditions.
 
global OnEnable = function()
{

   Vfd_Open();  //  open vfd port

   print( "--System -- System enabling.");
};
 
//This script is called whenever 
//the user presses RUN if the run was allowed
 
global OnRun = function()
{
   
   print( "--System -- System about to run.");
};
 
//This script is called whenever 
//the user zeroes an axis, axis is a bitfield
//value, bit 1 is axis 1, bit 2 is axis 2....
//do not change the zero here, that would
//cause an infinite loop
 
global OnZero = function( axis )
{
   print( "--System -- User has zeroed an axis"  );
};
 
//This script is called whenever 
//the user homes an axis, axis is a bitfield
//value, bit 1 is axis 1, bit 2 is axis 2....
//called after homing and zeroing
 
global OnHome = function( axis )
{
   print( "--System -- User has homed an axis" );
};
 
//This script is called whenever 
//the user regens the toolpath
 
global OnRegen = function()
{
   print( "--System -- User has Regened the toolpath.");
};
 
//This script is called whenever 
//the Scripting system has reset and 
// reloaded all scripts. You may do additional 
// startup tasks here.
 
global OnAllScriptsLoaded = function()
{
   print( "--System -- System has reset Scripting system.");
};