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();
}
