void EchoList(bool doincr) { MqBufferS buf; while (ReadItemExists()) { buf = ReadU(); if (buf.Type == 'L') { ReadL_START(buf); SendL_START(); EchoList(doincr); SendL_END(); ReadL_END(); } else if (doincr) { SendI(buf.I + 1); } else { SendU(buf); } } }
public void BUF1() { MqBufferS buf = ReadU(); char typ = buf.Type; SendSTART(); SendC(typ.ToString()); switch (typ) { case 'Y': SendY(buf.Y); break; case 'O': SendO(buf.O); break; case 'S': SendS(buf.S); break; case 'I': SendI(buf.I); break; case 'F': SendF(buf.F); break; case 'W': SendW(buf.W); break; case 'D': SendD(buf.D); break; case 'C': SendC(buf.C); break; case 'B': SendB(buf.B); break; } SendRETURN(); }
public void BUF3() { SendSTART(); MqBufferS buf = ReadU(); SendC(buf.Type.ToString()); SendU(buf); SendI(ReadI()); SendU(buf); SendRETURN(); }
public void BUF2() { SendSTART(); for (int i = 0; i < 3; i++) { MqBufferS buf = ReadU(); SendC(buf.Type.ToString()); SendU(buf); } SendRETURN(); }
void ECLI() { MqBufferS opt = ReadU(); bool doincr = (opt.Type == 'C' && opt.C == "--incr"); if (!doincr) { ReadUndo(); } SendSTART(); EchoList(doincr); SendRETURN(); }
private void BUFE() { String cmd = ReadC(); SendSTART(); if (cmd == "ctxbuf") { MqBufferS tmp = ContextGetBuffer(); MqBufferS buf = ReadU(); switch (buf.Type) { case 'Y': tmp.Y = buf.Y; break; case 'O': tmp.O = buf.O; break; case 'S': tmp.S = buf.S; break; case 'I': tmp.I = buf.I; break; case 'F': tmp.F = buf.F; break; case 'W': tmp.W = buf.W; break; case 'D': tmp.D = buf.D; break; case 'B': tmp.B = buf.B; break; case 'C': tmp.C = buf.C; break; } SendU(tmp); } else if (cmd == "mulbuf") { // Append-Example for C# MqBufferS tmp = ContextGetBuffer(); while (ReadItemExists()) { tmp = tmp.AppendC(ReadC()); } SendU(tmp); } SendRETURN(); }
void SETU() { buf = ReadU(); }
void SETU() { buf = ReadU().Dup(); }