很多人，無論做什么事情，剛起步當(dāng)然難。

寫了一個相當(dāng)于Hello World的NC代碼，給剛接觸的初學(xué)者。

//以下是一個燈開關(guān)NC程序的示例，相當(dāng)于Hello World吧，我一向喜歡用按鍵和燈來做第一個程序。

#pragma?num_alias_table_entries 10
#pragma?run_unconfigured
#pragma?enable_sd_nv_names
#pragma? relaxed_casting_on

//? --- Include files ---
#include <io_types.h>
#include <control.h>
#include <addrdefs.h>
#include <netmgmt.h>
#include <msg_addr.h>
#include <status.h>

extern system void _change_state(int state);

//? --- predefine variable declarations ---
#define STX 0x02??????? // start of packet
#define ETX 0x00??????? // end of packet
#define MAX?4?// max queue size
#define BUFF_SIZE 31?//buffer size
#define NM_SEND_TIME?10
#define EDEV_DELAY_TIME 10000
#define unconfigured?0x02
#define config_on_line?0x04
#define config_off_line 0x0c
//--------------------------------
#define ON 1
#define OFF 0
//--------------------------------

// io object declaration (new)-----------
IO_0 output bit ioRelay01 = TRUE;
IO_1 output bit ioRelay02 = TRUE;
IO_2 output bit ioRelay03 = TRUE;
IO_3 output bit ioRelay04 = TRUE;

IO_4 input bit ioButton01;
IO_5 input bit ioButton02;
IO_6 input bit ioButton03;
IO_7 input bit ioButton04;
//-----------------------------------------

//? --- timer declarations ---
mtimer repeating??????? Nv_ack_timer;
mtimer edev_info_timer;
stimer edev_delay_timer;

//? --- network variable declarations ---
far network input SNVT_str_asc nviHostData;
far network output SNVT_str_asc nvoData;

//? --- function declarations ---
void SelfBind(void);
void CheckDomain(void);

//? --- variable declarations ---
typedef struct queue{
??????? unsigned char buff[BUFF_SIZE];
}queue;
far?queue?rcv_que[MAX];

domain_struct?new_domain;
//-----------------------------------------------------------------------------------------------
//?--- eeprom variable declarations ---
// e-device inforamtion initialize
//-----------------------------------------------------------------------------------------------
// 4ch., use the below data
eeprom unsigned int edev_info[31]={0x02,0x22,0x00,0x04,0x00,0x05,0x00,0x90,0x00,0xBF,
? ?????????0x22,0x00,0x05,0x11,0x04,0x30,0x30,0x30,0x30,0x30,
? ?????????0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x3c,0x00};
? ?????????
// if 3ch., use the below data
//eeprom unsigned int edev_info[31]={0x02,0x22,0x00,0x03,0x00,0x05,0x00,0x90,0x00,0xBF,
//? ?????????0x22,0x00,0x05,0x11,0x03,0x30,0x30,0x30,0x30,0x30,
//? ?????????0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x3c,0x00};

// if 2ch., use the below data
//eeprom unsigned int edev_info[31]={0x02,0x22,0x00,0x02,0x00,0x05,0x00,0x90,0x00,0xBF,
//? ?????????0x22,0x00,0x05,0x11,0x02,0x30,0x30,0x30,0x30,0x30,
//? ?????????0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x3c,0x00};

// if 1ch., use the below data
//eeprom unsigned int edev_info[31]={0x02,0x22,0x00,0x01,0x00,0x05,0x00,0x90,0x00,0xBF,
//? ?????????0x22,0x00,0x05,0x11,0x01,0x30,0x30,0x30,0x30,0x30,
//? ?????????0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x3c,0x00};

//-----------------------------------------------------------------------------------------------

unsigned int sbuff_tmp[BUFF_SIZE];
unsigned int ck_checksum;
unsigned int rear_rptr, front_rptr;
unsigned int f_txOK, f_rxOK;
unsigned int ck_info_ctr;
unsigned int f_uartOK;

/* Light State buffer & flag defince------------------------------------------------------------*/?
unsigned int light_state[31];? // to save status msg temporarily
unsigned int led_state01,led_state02,led_state03,led_state04; // to save led status, i,e, flag variables
/* ---------------------------------------------------------------------------------------------*/?

//-----------------------------------------------------------
//
// [1] Initialize Block
//
//-----------------------------------------------------------
when ( reset )
{
?unsigned int i,j;
?ck_info_ctr = 0;
?rear_rptr = 0;
?front_rptr = 0;
//?test = 3000;
?f_txOK = 1;
?f_rxOK = 1;
?Nv_ack_timer = 0; // 300ms timer stop
?for( i = 0; i< MAX; i++)
??for( j = 0; j< BUFF_SIZE; j++)??// buffer clear
???rcv_que[i].buff[j] = 0;

/* ---------------------------*/?
?led_state01 = ON;?
?led_state02 = ON;
?led_state03 = ON;
?led_state04 = ON;
?io_out(ioRelay01,0);? // relay off
?io_out(ioRelay02,0);
?io_out(ioRelay03,0);??
?io_out(ioRelay04,0);?
/* ---------------------------*/?
?CheckDomain();
}

//-----------------------------------------------------------
//
// [2] Timer Block
//
//-----------------------------------------------------------
when( timer_expires(edev_delay_timer))
{
?(void)service_pin_msg_send();?
?edev_info_timer = EDEV_DELAY_TIME;
}

when( timer_expires(edev_info_timer))
{
?ck_info_ctr++;
?(void)service_pin_msg_send();?
?if( ck_info_ctr > 4)
?{
??ck_info_ctr = 0;
??edev_info_timer = 0;?
?}
?else
??edev_info_timer = EDEV_DELAY_TIME;
}

when( timer_expires(Nv_ack_timer))
{
?if(nv_update_succeeds( nvoData ))
?{
??rear_rptr = (rear_rptr + 1) & (MAX-1);?// que rcv index increase
??f_txOK = 1;
??Nv_ack_timer = 0;??// 300ms timer stop
?}
?else
?{
??if(nv_update_fails( nvoData ))
??{
???rear_rptr = (rear_rptr + 1) & (MAX-1);?// que rcv index increase
???f_txOK = 1;
???Nv_ack_timer = 0; // 300ms timer stop
??}
?}
}

//-----------------------------------------------------------
//
// [3] Receive Block
//
// : save the received PLC packet to buffer and do action according to msg
//-----------------------------------------------------------
when(nv_update_occurs(nviHostData))
{
?unsigned int i;

?if(nviHostData.ascii[5] == 0x10)
?{
??new_domain = *(access_domain(0));
??if(rear_rptr == ((front_rptr + 1)&(MAX-1)))
???rear_rptr = (rear_rptr + 1)&(MAX-1);?// data loss
??rcv_que[front_rptr].buff[0] = STX;
??for(i=1; i<4; i++)
???rcv_que[front_rptr].buff[i] = edev_info[i];
??rcv_que[front_rptr].buff[4] = 0;?//Opt, PN
??rcv_que[front_rptr].buff[5] = 0x11;?//SK,PT
??rcv_que[front_rptr].buff[6] = 0;?//MODE

??rcv_que[front_rptr].buff[7] = 0x10;?//Version Inform 1.0 version
??if(read_only_data.model_num == 0)
???rcv_que[front_rptr].buff[8] = 0x01;?//3150 Model Number
??else if(read_only_data.model_num == 1)
???rcv_que[front_rptr].buff[8] = 0x11;?//PL 3150 Model Number
??else if((read_only_data.model_num >=8)&&(read_only_data.model_num <=14))
???rcv_que[front_rptr].buff[8] = 0;?// 3120 Model Number
??else if(read_only_data.model_num == 15)
???rcv_que[front_rptr].buff[8] = 0x10;?// PL 3120 Model Number
??else
??rcv_que[front_rptr].buff[8] = 0x10;?// PL 3120 Model Number
??for(i=0;i<6;i++)
???rcv_que[front_rptr].buff[i+9] = read_only_data.neuron_id[i];
??for(i=0;i<6;i++)
???rcv_que[front_rptr].buff[i+15] = new_domain.id[i];
??rcv_que[front_rptr].buff[21] = new_domain.subnet;
??rcv_que[front_rptr].buff[22] = new_domain.node;
??for(i=23; i<29; i++)
???rcv_que[front_rptr].buff[i] = 0x30;?// dummy
??ck_checksum = 0;
??for(i=0; i<29; i++)
???ck_checksum = ck_checksum^rcv_que[front_rptr].buff[i];
??rcv_que[front_rptr].buff[29] = ck_checksum;?
??rcv_que[front_rptr].buff[30] = ETX;?
??front_rptr = (front_rptr + 1)&(MAX-1);?// receive que increase
?}
?else
?{
??if( f_uartOK != 0xf0 )
??{
???for( i=0; i < 31; i++ )
????sbuff_tmp[i] = nviHostData.ascii[i];?

???//---------------------------------------------------------------------------?
???// PLC Msg process
???// : do action according to msg (for example: command, requset syayus, ...)
???//---------------------------------------------------------------------------????
???if(sbuff_tmp[5]==0x01 && 0x0F)??//is this packet type[PT] "command" ?
???{
????light_state[5]=0x02;
???
????if(sbuff_tmp[7]==0x01)?? //Does 1st byte of Data Field mean 'ON'?
????{
?????io_out(ioRelay01,0);
?????led_state01=ON;
?????light_state[7]=0x01;
?????for (i=0; i<31; i++)
??????nvoData.ascii[i] = light_state[i];
????}
????else if(sbuff_tmp[7]==0x00) //Does 1st byte of Data Field mean 'OFF'?
????{
?????io_out(ioRelay01,1);
?????led_state01=OFF;
?????light_state[7]=0x00;
?????for (i=0; i<31; i++)
??????nvoData.ascii[i] = light_state[i];
????}
????
????else?//添加其他的按鍵,由網(wǎng)絡(luò)變量傳送的信息
?????;
???}??
????
???else if(sbuff_tmp[7]==0x00)??//is this packet type[PT] "request Status"?
???{
????light_state[5]=0x02;
????nvoData.ascii[i] = light_state[i];
???}
????
???else
????;
???//--------------------------------------------------------------------
??}
?}
}

//-----------------------------------------------------------
//
// [4] Transmit Block
//
// : save PLC packet to Tx Que
//-----------------------------------------------------------
when((f_txOK == 1)&&(rear_rptr != front_rptr))
{
?unsigned int i;
?for (i=0; i<31; i++)
??nvoData.ascii[i] = rcv_que[rear_rptr].buff[i];
?Nv_ack_timer = 300; ?// 300ms timer start
?f_txOK = 0;
}

//-----------------------------------------------------------
//
// [5] Biding Block
//
// : bind and do someting
//-----------------------------------------------------------
when(msg_arrives)
{
?if(msg_in.code == 0x31)
?{
??if(msg_in.data[15] == 0xf0)?// Binding Start
???SelfBind();
??else if(msg_in.data[15] == 0x0f)?// go_unconfigured?
??{
???_change_state(unconfigured);
???clear_status();
???node_reset();
??}
??else if(msg_in.data[15] == 0x07)
??{
???edev_info_timer = 0;?
???ck_info_ctr = 0;
??}
??else
??;?
?}
?else
?;
}

//-----------------------------------------------------------
//
// [6] I/O process Block
//
// : check button and control relays or leds
//-----------------------------------------------------------
when (io_changes(ioButton01) to 0)
{
??? // The below codes are just example for our former product.
??? // please, customize to your product.
?int i;
?light_state[5]=0x07; // event notification
????????????????????? // to set PT field to 0x07

?if(led_state01==ON)
?{??
??io_out(ioRelay01,0);
??led_state01=OFF;
??
??light_state[7]=0x01;
??
??for (i=0; i<31; i++)
???nvoData.ascii[i] = light_state[i];
?}
?else if(led_state01==OFF)
?{
??io_out(ioRelay01,1);
??led_state01=ON;
??
??light_state[7]=0x00;
??
??for (i=0; i<31; i++)
???nvoData.ascii[i] = light_state[i];
?}
?else
?;
}

when (io_changes(ioButton02) to 0)??//其他按鍵被直接近下時的動作
{
// insert your code here
}

when (io_changes(ioButton03) to 0)
{
// insert your code here
}

when (io_changes(ioButton04) to 0)
{
// insert your code here
}

//-----------------------------------------------------------
//
// Subroutines
//
//-----------------------------------------------------------
void SelfBind()
{
?unsigned int i;
?address_struct?my_address;
?nv_struct?my_nv;
?my_address = *(access_address(1));?// set address table 1
?my_address.sn.type = SUBNET_NODE;
?my_address.sn.domain = 0;
?my_address.sn.node = 127;?
?my_address.sn.tx_timer = NM_SEND_TIME;
?my_address.sn.retry = 3;
?my_address.sn.subnet = 1;
?update_address(&my_address, 1);

?my_nv = *(access_nv(1));
?my_nv.nv_selector_hi = 0x00;
?my_nv.nv_selector_lo = 0x7C;
?my_nv.nv_addr_index = 1;
?update_nv(&my_nv, 1);
?if(rear_rptr == ((front_rptr + 1)&(MAX-1)))
??rear_rptr = (rear_rptr + 1)&(MAX-1);?// data loss
?for(i=0;i<31;i++)
??rcv_que[front_rptr].buff[i] = edev_info[i];
?front_rptr = (front_rptr + 1)&(MAX-1);?// receive que increase
}

void CheckDomain()
{
?unsigned int i;
?
?new_domain = *(access_domain(1));
?new_domain.len = 0;
?for(i=0; i<6; i++) new_domain.id[i] = 0;??
?new_domain.subnet = 0;
?new_domain.node = 0;
?update_domain(&new_domain, 1);
}

總結(jié)

以上是生活随笔為你收集整理的偶初学的时候写的，同给初学者参考的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。