- fixed errors occured after intendation command in fsm mechanism

This commit is contained in:
zolliker
2009-02-25 14:50:47 +00:00
parent e762ecb6a1
commit 69af09fe54
14 changed files with 63 additions and 23 deletions

View File

@ -366,6 +366,7 @@ static long Euro2kRead(long pc, void *object)
switch (pc) {
default: /* FSM BEGIN ****************************** */
EasePchk(drv);
if (drv->script && drv->script[0] != '\0'
&& 0 != strcmp(drv->script, "0")) {
pTcl = InterpGetTcl(pServ->pSics);
@ -479,6 +480,7 @@ static long Euro2kSet(long pc, void *object)
switch (pc) {
default: /* FSM BEGIN ****************************** */
EasePchk(drv);
loop:
upd = EaseNextUpdate(drv);
if (upd == EASE_RUN) {
@ -548,6 +550,7 @@ static long Euro2kStart(long pc, void *object)
switch (pc) {
default: /* FSM BEGIN ****************************** */
EasePchk(drv);
ModBusRequestValue(eab, 122, modBusInt);
return __LINE__;
case __LINE__: /**********************************/