1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116
|
for(;;) {
nxttok();
if(Tokenf(TF_MACRO)) ParseError("Unexpected macro\n");
if(Tokenf(TF_DIR)) {
cl->codes[ptr++]=tokenv&15;
} else if(Tokenf(TF_NAME)) {
switch(tokenv) {
case OP_ADD: case OP_CLIMB: case OP_EIGHT: case OP_FOUR:
case OP_HEIGHT: case OP_LOC: case OP_MARK: case OP_SUB:
case OP_DIR: case OP_DIR_C: case OP_DIR_E: case OP_DIR_EC:
case OP_OBJTOPAT: case OP_OBJBOTTOMAT: case OP_CUT: case OP_MUL:
case OP_OBJABOVE: case OP_OBJBELOW: case OP_TRACE: case OP_NEXT:
case 0x0200 ... 0x02FF: // message
case 0x4000 ... 0x7FFF: // class
case 0xC000 ... 0xFFFF: // message
cl->codes[ptr++]=tokenv;
|
|
|
>
|
1101
1102
1103
1104
1105
1106
1107
1108
1109
1110
1111
1112
1113
1114
1115
1116
1117
|
for(;;) {
nxttok();
if(Tokenf(TF_MACRO)) ParseError("Unexpected macro\n");
if(Tokenf(TF_DIR)) {
cl->codes[ptr++]=tokenv&15;
} else if(Tokenf(TF_NAME)) {
switch(tokenv) {
case OP_ADD: case OP_CLIMB: case OP_HEIGHT:
case OP_LOC: case OP_MARK: case OP_SUB:
case OP_QUEEN: case OP_ROOK: case OP_BISHOP:
case OP_DIR: case OP_DIR_C: case OP_DIR_E: case OP_DIR_EC:
case OP_OBJTOPAT: case OP_OBJBOTTOMAT: case OP_CUT: case OP_MUL:
case OP_OBJABOVE: case OP_OBJBELOW: case OP_TRACE: case OP_NEXT:
case 0x0200 ... 0x02FF: // message
case 0x4000 ... 0x7FFF: // class
case 0xC000 ... 0xFFFF: // message
cl->codes[ptr++]=tokenv;
|