diff --git a/kenwood/ts850.c b/kenwood/ts850.c index 8e343195e..ebf3f974e 100644 --- a/kenwood/ts850.c +++ b/kenwood/ts850.c @@ -2,7 +2,7 @@ * Hamlib Kenwood backend - TS850 description * Copyright (c) 2000-2003 by Stephane Fillod * - * $Id: ts850.c,v 1.10 2003-10-01 19:31:59 fillods Exp $ + * $Id: ts850.c,v 1.11 2004-01-21 19:52:40 f4dwv Exp $ * * This library is free software; you can redistribute it and/or modify * it under the terms of the GNU Library General Public License as @@ -25,80 +25,101 @@ #endif #include +#include #include #include "kenwood.h" -#define TS850_ALL_MODES (RIG_MODE_AM|RIG_MODE_CW|RIG_MODE_SSB|RIG_MODE_FM|RIG_MODE_RTTY) -#define TS850_OTHER_TX_MODES (RIG_MODE_CW|RIG_MODE_SSB|RIG_MODE_FM|RIG_MODE_RTTY) -#define TS850_AM_TX_MODES RIG_MODE_AM +#define TS850_ALL_MODES (RIG_MODE_AM|RIG_MODE_CW|RIG_MODE_CWR|RIG_MODE_SSB|RIG_MODE_FM|RIG_MODE_RTTY|RIG_MODE_RTTYR) +#define TS850_OTHER_TX_MODES (RIG_MODE_CW|RIG_MODE_CWR|RIG_MODE_SSB|RIG_MODE_FM|RIG_MODE_RTTY|RIG_MODE_RTTYR) +#define TS850_AM_TX_MODES (RIG_MODE_AM) -#define TS850_FUNC_ALL (RIG_FUNC_NB|RIG_FUNC_COMP|RIG_FUNC_VOX|RIG_FUNC_NR|RIG_FUNC_BC|RIG_FUNC_ANF|RIG_FUNC_LOCK) +#define TS850_FUNC_ALL (RIG_FUNC_AIP|RIG_FUNC_LOCK) -#define TS850_LEVEL_ALL (RIG_LEVEL_ATT|RIG_LEVEL_SQL|RIG_LEVEL_STRENGTH|RIG_LEVEL_AF|RIG_LEVEL_RF|RIG_LEVEL_RFPOWER|RIG_LEVEL_MICGAIN|RIG_LEVEL_AGC) +#define TS850_LEVEL_GET (RIG_LEVEL_SWR|RIG_LEVEL_COMP|RIG_LEVEL_ALC|RIG_LEVEL_CWPITCH|RIG_LEVEL_RAWSTR) +#define TS850_LEVEL_SET (RIG_LEVEL_CWPITCH) #define TS850_VFO (RIG_VFO_A|RIG_VFO_B) +#define TS850_CHANNEL_CAPS \ +.freq=1,\ +.mode=1,\ +.tx_freq=1,\ +.tx_mode=1,\ +.split=1,\ +.ctcss_tone=1 + + static const struct kenwood_priv_caps ts850_priv_caps = { .cmdtrm = EOM_KEN, }; +/* forward definitions */ +int ts850_set_rit(RIG * rig, vfo_t vfo, shortfreq_t rit); +int ts850_set_xit(RIG * rig, vfo_t vfo, shortfreq_t rit); +int ts850_get_mode(RIG *rig, vfo_t vfo, rmode_t *mode, pbwidth_t *width); +int ts850_set_mode(RIG *rig, vfo_t vfo, rmode_t mode, pbwidth_t width); +int ts850_set_ctcss_tone(RIG *rig, vfo_t vfo, tone_t tone); +int ts850_set_func(RIG *rig, vfo_t vfo, setting_t func, int status); +int ts850_get_func(RIG *rig, vfo_t vfo, setting_t func, int *status); +int ts850_get_level(RIG *rig, vfo_t vfo, setting_t level, value_t *val); +int ts850_set_level(RIG *rig, vfo_t vfo, setting_t level, value_t val); +int ts850_get_mem(RIG *rig, vfo_t vfo, int *ch); +int ts850_get_channel (RIG * rig, channel_t * chan); +int ts850_set_channel (RIG * rig, channel_t * chan); + /* * ts850 rig capabilities. * Notice that some rigs share the same functions. * Also this struct is READONLY! - * - * part of infos comes from .http = //www.kenwood.net/ */ const struct rig_caps ts850_caps = { .rig_model = RIG_MODEL_TS850, .model_name = "TS-850", .mfg_name = "Kenwood", -.version = "0.2.1", +.version = "1.0", .copyright = "LGPL", -.status = RIG_STATUS_UNTESTED, +.status = RIG_STATUS_BETA, .rig_type = RIG_TYPE_TRANSCEIVER, .ptt_type = RIG_PTT_RIG, .dcd_type = RIG_DCD_RIG, .port_type = RIG_PORT_SERIAL, -.serial_rate_min = 1200, +.serial_rate_min = 4800, .serial_rate_max = 4800, .serial_data_bits = 8, .serial_stop_bits = 2, .serial_parity = RIG_PARITY_NONE, .serial_handshake = RIG_HANDSHAKE_NONE, .write_delay = 0, -.post_write_delay = 0, +.post_write_delay = 5, .timeout = 200, .retry = 3, .has_get_func = TS850_FUNC_ALL, .has_set_func = TS850_FUNC_ALL, -.has_get_level = TS850_LEVEL_ALL, -.has_set_level = RIG_LEVEL_SET(TS850_LEVEL_ALL), +.has_get_level = TS850_LEVEL_GET, +.has_set_level = TS850_LEVEL_SET, .has_get_parm = RIG_PARM_NONE, -.has_set_parm = RIG_PARM_NONE, /* FIXME: parms */ -.level_gran = {}, /* FIXME: granularity */ +.has_set_parm = RIG_PARM_NONE, +.level_gran = {}, .parm_gran = {}, .ctcss_list = kenwood38_ctcss_list, .dcs_list = NULL, -.preamp = { RIG_DBLST_END, }, /* FIXME: preamp list */ -.attenuator = { 6, 12, 18, RIG_DBLST_END, }, -.max_rit = kHz(1.2), -.max_xit = kHz(2.4), +.preamp = { RIG_DBLST_END, }, +.attenuator = { RIG_DBLST_END, }, +.max_rit = kHz(1.27), +.max_xit = kHz(1.27), .max_ifshift = Hz(0), .targetable_vfo = RIG_TARGETABLE_FREQ, .transceive = RIG_TRN_RIG, .bank_qty = 0, -.chan_desc_sz = 0, - - +.chan_desc_sz = 3, .chan_list = { - { 0, 89, RIG_MTYPE_MEM }, /* TBC */ - { 90, 99, RIG_MTYPE_EDGE }, - RIG_CHAN_END, - }, + { 0, 89, RIG_MTYPE_MEM ,{TS850_CHANNEL_CAPS}}, + { 90, 99, RIG_MTYPE_EDGE ,{TS850_CHANNEL_CAPS}}, + RIG_CHAN_END, + }, .rx_range_list1 = { {kHz(100),MHz(30),TS850_ALL_MODES,-1,-1,TS850_VFO}, @@ -152,60 +173,563 @@ const struct rig_caps ts850_caps = { RIG_FRNG_END, }, /* tx range */ .tuning_steps = { - {TS850_ALL_MODES,50}, - {TS850_ALL_MODES,100}, - {TS850_ALL_MODES,kHz(1)}, - {TS850_ALL_MODES,kHz(5)}, - {TS850_ALL_MODES,kHz(9)}, - {TS850_ALL_MODES,kHz(10)}, - {TS850_ALL_MODES,12500}, - {TS850_ALL_MODES,kHz(20)}, - {TS850_ALL_MODES,kHz(25)}, - {TS850_ALL_MODES,kHz(100)}, - {TS850_ALL_MODES,MHz(1)}, {TS850_ALL_MODES,0}, /* any tuning step */ RIG_TS_END, }, /* mode/filter list, remember: order matters! */ .filters = { - {RIG_MODE_SSB|RIG_MODE_CW|RIG_MODE_RTTY, kHz(2.4)}, - {RIG_MODE_AM, kHz(6)}, - {RIG_MODE_FM, kHz(12)}, + {TS850_ALL_MODES, kHz(12)}, + {TS850_ALL_MODES, kHz(6)}, + {TS850_ALL_MODES, kHz(2.7)}, + {TS850_ALL_MODES, Hz(500)}, + {TS850_ALL_MODES, Hz(250)}, RIG_FLT_END, }, .priv = (void *)&ts850_priv_caps, .set_freq = kenwood_set_freq, .get_freq = kenwood_get_freq, -.set_rit = kenwood_set_rit, +.set_rit = ts850_set_rit, .get_rit = kenwood_get_rit, -.set_xit = kenwood_set_xit, +.set_xit = ts850_set_xit, .get_xit = kenwood_get_xit, -.set_mode = kenwood_set_mode, -.get_mode = kenwood_get_mode, +.set_mode = ts850_set_mode, +.get_mode = ts850_get_mode, .set_vfo = kenwood_set_vfo, .get_vfo = kenwood_get_vfo, -.set_ctcss_tone = kenwood_set_ctcss_tone, +.set_ctcss_tone = ts850_set_ctcss_tone, .get_ctcss_tone = kenwood_get_ctcss_tone, .get_ptt = kenwood_get_ptt, .set_ptt = kenwood_set_ptt, -.get_dcd = kenwood_get_dcd, -.set_func = kenwood_set_func, -.get_func = kenwood_get_func, -.set_level = kenwood_set_level, -.get_level = kenwood_get_level, +.set_func = ts850_set_func, +.get_func = ts850_get_func, +.set_level = ts850_set_level, +.get_level = ts850_get_level, .vfo_op = kenwood_vfo_op, .set_mem = kenwood_set_mem, -.get_mem = kenwood_get_mem, -.set_trn = kenwood_set_trn, -.get_trn = kenwood_get_trn, -.set_powerstat = kenwood_set_powerstat, -.get_powerstat = kenwood_get_powerstat, -.reset = kenwood_reset, - +.get_mem = ts850_get_mem, +.get_channel = ts850_get_channel, +.set_channel = ts850_set_channel, +.set_trn = kenwood_set_trn }; /* * Function definitions below */ +int ts850_set_rit(RIG * rig, vfo_t vfo, shortfreq_t rit) +{ + unsigned char buf[50], infobuf[50], c; + int retval, info_len, len, i; + + + info_len = 0; + if (rit == 0) + kenwood_transaction(rig, "RT0;", 4, infobuf, &info_len); + else + kenwood_transaction(rig, "RT1;", 4, infobuf, &info_len); + + if (rit > 0) + c = 'U'; + else + c = 'D'; + len = sprintf(buf, "R%c;", c); + + info_len = 0; + retval = kenwood_transaction(rig, "RC;", 3, infobuf, &info_len); + for (i = 0; i < abs(rint(rit/10)); i++) + { + info_len = 0; + retval = kenwood_transaction(rig, buf, len, infobuf, &info_len); + } + + return RIG_OK; +} + +int ts850_set_xit(RIG * rig, vfo_t vfo, shortfreq_t xit) +{ + unsigned char buf[50], infobuf[50], c; + int retval, info_len, len, i; + + info_len = 0; + if (xit == 0) + kenwood_transaction(rig, "XT0;", 4, infobuf, &info_len); + else + kenwood_transaction(rig, "XT1;", 4, infobuf, &info_len); + + info_len = 0; + retval = kenwood_transaction(rig, "RC;", 3, infobuf, &info_len); + if (xit > 0) + c = 'U'; + else + c = 'D'; + len = sprintf(buf, "R%c;", c); + + for (i = 0; i < abs(rint(xit/10)); i++) + { + info_len = 0; + retval = kenwood_transaction(rig, buf, len, infobuf, &info_len); + } + + return RIG_OK; +} + +/* + * modes in use by the "MD" command + */ +#define MD_NONE '0' +#define MD_LSB '1' +#define MD_USB '2' +#define MD_CW '3' +#define MD_FM '4' +#define MD_AM '5' +#define MD_FSK '6' +#define MD_CWR '7' +#define MD_FSKR '9' + + +int ts850_get_mode(RIG *rig, vfo_t vfo, rmode_t *mode, pbwidth_t *width) +{ + unsigned char infobuf[50]; + int info_len, retval; + int f,f1,f2; + + info_len = 50; + retval = kenwood_transaction (rig, "IF;", 3, infobuf, &info_len) +; + if (retval != RIG_OK) + return retval; + + if (info_len != 38 || infobuf[1] != 'F') { + rig_debug(RIG_DEBUG_ERR,"kenwood_get_mode: wrong answer len=%d\n", info_len); + return -RIG_ERJCTED; + } + + switch (infobuf[29]) { + case MD_CW: *mode = RIG_MODE_CW; break; + case MD_CWR: *mode = RIG_MODE_CWR; break; + case MD_USB: *mode = RIG_MODE_USB; break; + case MD_LSB: *mode = RIG_MODE_LSB; break; + case MD_FM: *mode = RIG_MODE_FM; break; + case MD_AM: *mode = RIG_MODE_AM; break; + case MD_FSK: *mode = RIG_MODE_RTTY; break; + case MD_FSKR: *mode = RIG_MODE_RTTYR; break; + case MD_NONE: *mode = RIG_MODE_NONE; break; + default: + rig_debug(RIG_DEBUG_ERR,"kenwood_get_mode: unsupported mode '%c'\n", infobuf[29]); + return -RIG_EINVAL; + } + + info_len = 50; + retval = kenwood_transaction (rig, "FL;", 3, infobuf, &info_len) +; + if (retval != RIG_OK) + return retval; + + if (info_len != 9 || infobuf[1] != 'L') { + rig_debug(RIG_DEBUG_ERR,"kenwood_get_mode: wrong answer len=%d\n", info_len); + return -RIG_ERJCTED; + } + + infobuf[8]='\0'; + f2=atoi(&infobuf[5]); + infobuf[5]='\0'; + f1=atoi(&infobuf[2]); + + if(f2>f1) f=f2; + else f=f1; + + switch(f) { + case 2: + *width=kHz(12); + break; + case 3: + case 5: + *width=kHz(6); + break; + case 7: + *width=kHz(2.7); + break; + case 9: + *width=Hz(500); + break; + case 10: + *width=Hz(250); + break; + } + + return RIG_OK; +} + +static char mode_to_char(rmode_t mode) +{ + switch (mode) { + case RIG_MODE_CW: return(MD_CW); + case RIG_MODE_CWR: return(MD_CWR); + case RIG_MODE_USB: return(MD_USB); + case RIG_MODE_LSB: return(MD_LSB); + case RIG_MODE_FM: return(MD_FM); + case RIG_MODE_AM: return(MD_AM); + case RIG_MODE_RTTY: return(MD_FSK); + case RIG_MODE_RTTYR: return(MD_FSKR); + default: + } + return(RIG_MODE_NONE); +} + +int ts850_set_mode(RIG *rig, vfo_t vfo, rmode_t mode, pbwidth_t width) +{ + unsigned char mdbuf[16],ackbuf[16]; + int mdbuf_len, ack_len, kmode, retval; + + kmode=mode_to_char(mode); + if(kmode==RIG_MODE_NONE) { + rig_debug(RIG_DEBUG_ERR,"kenwood_set_mode: " "unsupported mode %d\n", mode); + return -RIG_EINVAL; + } + + mdbuf_len = sprintf(mdbuf, "MD%c;", kmode); + ack_len = 0; + retval = kenwood_transaction (rig, mdbuf, mdbuf_len, ackbuf, &ack_len); + + if (retval != RIG_OK) + return retval; + + ack_len = 0; + if(width <= Hz(250)) + mdbuf_len = sprintf(mdbuf, "FL010009;"); + else + if(width <= Hz(500)) + mdbuf_len = sprintf(mdbuf, "FL009007;"); + else + if(width <= kHz(2.7)) + mdbuf_len = sprintf(mdbuf, "FL007007;"); + else + if(width <= kHz(6)) + mdbuf_len = sprintf(mdbuf, "FL005005;"); + else + mdbuf_len = sprintf(mdbuf, "FL002002;"); + + retval = kenwood_transaction (rig, mdbuf, mdbuf_len, ackbuf, &ack_len); + + return retval; +} + +int ts850_set_ctcss_tone(RIG *rig, vfo_t vfo, tone_t tone) +{ + const struct rig_caps *caps; + unsigned char tonebuf[16], ackbuf[16]; + int tone_len, ack_len; + int i; + + caps = rig->caps; + + for (i = 0; caps->ctcss_list[i] != 0 && i<38; i++) { + if (caps->ctcss_list[i] == tone) + break; + } + if (caps->ctcss_list[i] != tone) + return -RIG_EINVAL; + + tone_len = sprintf(tonebuf,"TN%03d;", i+1); + + ack_len = 0; + return kenwood_transaction (rig, tonebuf, tone_len, ackbuf, &ack_len); +} + +int ts850_set_func(RIG *rig, vfo_t vfo, setting_t func, int status) +{ + unsigned char fctbuf[16], ackbuf[16]; + int fct_len, ack_len; + + if (vfo != RIG_VFO_CURR) + return -RIG_EINVAL; + + ack_len = 0; + switch (func) { + case RIG_FUNC_AIP: + fct_len = sprintf(fctbuf,"MX%c;", status?'1':'0'); + return kenwood_transaction (rig, fctbuf, fct_len, ackbuf, &ack_len); + + case RIG_FUNC_LOCK: + fct_len = sprintf(fctbuf,"LK%c;", status?'1':'0'); + return kenwood_transaction (rig, fctbuf, fct_len, ackbuf, &ack_len); + + default: + rig_debug(RIG_DEBUG_ERR,"Unsupported set_func %#x", func); + return -RIG_EINVAL; + } + + return RIG_OK; +} + + +int ts850_get_func(RIG *rig, vfo_t vfo, setting_t func, int *status) +{ + unsigned char fctbuf[16], ackbuf[16]; + int retval, fct_len, ack_len; + + if (vfo != RIG_VFO_CURR) + return -RIG_EINVAL; + + switch (func) { + case RIG_FUNC_AIP: + fct_len = sprintf(fctbuf,"MX;"); + break; + case RIG_FUNC_LOCK: + fct_len = sprintf(fctbuf,"LK;"); + break; + default: + rig_debug(RIG_DEBUG_ERR,"Unsupported get_func %#x", func); + return -RIG_EINVAL; + } + + ack_len = 16; + retval = kenwood_transaction (rig, fctbuf, fct_len, ackbuf, &ack_len); + + if (retval != RIG_OK) + return retval; + + *status=ackbuf[2]=='1'?1:0; + + return RIG_OK; +} + +int ts850_get_level(RIG *rig, vfo_t vfo, setting_t level, value_t *val) +{ + unsigned char lvlbuf[50]; + int lvl_len, retval; + + if(vfo!=RIG_VFO_CURR) + return -RIG_EINVAL; + + switch (level) { + case RIG_LEVEL_STRENGTH: + case RIG_LEVEL_RAWSTR: + lvl_len = 50; + retval = kenwood_transaction (rig, "SM;", 3, lvlbuf, &lvl_len); + if (retval != RIG_OK) + return retval; + + if (lvl_len != 7 || lvlbuf[1] != 'M') { + rig_debug(RIG_DEBUG_ERR,"kenwood_get_level: wrong answer le n=%d\n", lvl_len); + return -RIG_ERJCTED; + } + + lvlbuf[6]='\0'; + val->i=atoi(&lvlbuf[2]); + if(level==RIG_LEVEL_STRENGTH) + val->i = (val->i * 4) - 54; + break; + case RIG_LEVEL_SWR: + lvl_len = 0; + retval = kenwood_transaction (rig, "RM1;", 4, lvlbuf, &lvl_len); + if (retval != RIG_OK) + return retval; + lvl_len = 50; + retval = kenwood_transaction (rig, "RM;", 4, lvlbuf, &lvl_len); + if (retval != RIG_OK) + return retval; + + lvlbuf[7]='\0'; + val->f=(float)atoi(&lvlbuf[3])/30.0; + break; + case RIG_LEVEL_COMP: + lvl_len = 0; + retval = kenwood_transaction (rig, "RM2;", 4, lvlbuf, &lvl_len); + if (retval != RIG_OK) + return retval; + lvl_len = 50; + retval = kenwood_transaction (rig, "RM;", 4, lvlbuf, &lvl_len); + if (retval != RIG_OK) + return retval; + + lvlbuf[7]='\0'; + val->f=(float)atoi(&lvlbuf[3])/30.0; + break; + case RIG_LEVEL_ALC: + lvl_len = 0; + retval = kenwood_transaction (rig, "RM3;", 4, lvlbuf, &lvl_len); + if (retval != RIG_OK) + return retval; + lvl_len = 50; + retval = kenwood_transaction (rig, "RM;", 4, lvlbuf, &lvl_len); + if (retval != RIG_OK) + return retval; + + lvlbuf[7]='\0'; + val->f=(float)atoi(&lvlbuf[3])/30.0; + break; + case RIG_LEVEL_CWPITCH: + retval = kenwood_transaction (rig, "PT;", 3, lvlbuf, &lvl_len); + if (retval != RIG_OK) + return retval; + + lvlbuf[4]='\0'; + val->i=atoi(&lvlbuf[2]); + val->i=(val->i-8)*50+800; + break; + + default: + rig_debug(RIG_DEBUG_ERR,"Unsupported get_level %d", level); + return -RIG_EINVAL; + } + + return RIG_OK; +} + +int ts850_set_level(RIG *rig, vfo_t vfo, setting_t level, value_t val) +{ + unsigned char lvlbuf[16], ackbuf[16]; + int lvl_len, ack_len; + + if(level != RIG_LEVEL_CWPITCH) + return -RIG_EINVAL; + + if(val.i>1000 || val.i<400) + return -RIG_EINVAL; + + ack_len=0; + lvl_len = sprintf(lvlbuf,"PT%02d;",(val.i/50)-8); + + return kenwood_transaction (rig, lvlbuf, lvl_len, ackbuf, &ack_len); +} + +int ts850_get_mem(RIG *rig, vfo_t vfo, int *ch) +{ + unsigned char infobuf[50]; + int info_len, retval; + + info_len = 50; + retval = kenwood_transaction (rig, "IF;", 3, infobuf, &info_len) +; + if (retval != RIG_OK) + return retval; + + if (info_len != 38 || infobuf[1] != 'F') { + rig_debug(RIG_DEBUG_ERR,"kenwood_get_mode: wrong answer len=%d\n", info_len); + return -RIG_ERJCTED; + } + + infobuf[28]='\0'; + *ch=atoi(&infobuf[26]); + + return RIG_OK; +} + +static rmode_t char_to_mode(char c) +{ + switch (c) { + case MD_CW: return(RIG_MODE_CW); + case MD_CWR: return(RIG_MODE_CWR); + case MD_USB: return(RIG_MODE_USB); + case MD_LSB: return(RIG_MODE_LSB); + case MD_FM: return(RIG_MODE_FM); + case MD_AM: return(RIG_MODE_AM); + case MD_FSK: return(RIG_MODE_RTTY); + case MD_FSKR: return(RIG_MODE_RTTYR); + case MD_NONE: return(RIG_MODE_NONE); + } + return(RIG_MODE_NONE); +} + +int ts850_get_channel (RIG * rig, channel_t * chan) +{ + unsigned char cmdbuf[16], membuf[30]; + int retval, cmd_len,mem_len,num; + + num=chan->channel_num; + + cmd_len = sprintf(cmdbuf, "MR0 %02d;", num); + mem_len = 25; + retval = kenwood_transaction (rig, cmdbuf, cmd_len, membuf, &mem_len); + if (retval != RIG_OK) + return retval; + + memset(chan,0,sizeof(channel_t)); + chan->channel_num=num; + + + if (membuf[19]=='0') + chan->ctcss_tone=0; + else { + membuf[22]='\0'; + chan->ctcss_tone= rig->caps->ctcss_list[atoi(&membuf[20])]; + } + + chan->mode=char_to_mode(membuf[17]); + + membuf[17]='\0'; + chan->freq=atoi(&membuf[6]); + + cmd_len = sprintf(cmdbuf, "MR1 %02d;", num); + mem_len = 25; + retval = kenwood_transaction (rig, cmdbuf, cmd_len, membuf, &mem_len); + if (retval != RIG_OK) + return retval; + + chan->tx_mode=char_to_mode(membuf[17]); + membuf[17]='\0'; + chan->tx_freq=atoi(&membuf[6]); + + if(chan->freq==chan->tx_freq && + chan->mode==chan->tx_mode) { + chan->tx_freq=RIG_FREQ_NONE; + chan->tx_mode=RIG_MODE_NONE; + chan->split=RIG_SPLIT_OFF; + } else + chan->split=RIG_SPLIT_ON; + + return RIG_OK; +} + + +int ts850_set_channel (RIG * rig, channel_t * chan) +{ + unsigned char cmdbuf[30], membuf[30]; + int retval, cmd_len,mem_len; + int num,freq,tx_freq,tone; + char mode,tx_mode,split,tones; + + num=chan->channel_num; + freq=(int)chan->freq; + mode=mode_to_char(chan->mode); + if(chan->split==RIG_SPLIT_ON) { + tx_freq=(int)chan->tx_freq; + tx_mode=mode_to_char(chan->tx_mode); + split='1'; + } else { + tx_freq=0; + tx_mode='\0'; + split='0'; + } + + for (tone = 1; rig->caps->ctcss_list[tone-1] != 0 && tone<39; tone++) { + if (rig->caps->ctcss_list[tone-1] == chan->ctcss_tone) + break; + } + if(chan->ctcss_tone!=0) { + tones='1'; + } else { + tones='0'; + tone=0; + } + + cmd_len = sprintf(cmdbuf, "MW0 %02d%011d%c0%c%02d ;", + num,freq,mode,tones,tone); + mem_len = 0; + retval = kenwood_transaction (rig, cmdbuf, cmd_len, membuf, &mem_len); + if (retval != RIG_OK) + return retval; + + cmd_len = sprintf(cmdbuf, "MW1 %02d%011d%c0%c%02d ;", + num,tx_freq,tx_mode,tones,tone); + mem_len = 0; + retval = kenwood_transaction (rig, cmdbuf, cmd_len, membuf, &mem_len); + if (retval != RIG_OK) + return retval; + + return RIG_OK; +} + +