CLEAR
case CLEAR:
sendcom(pp, CLEAR);
#define clear() (*lpnt++ =CLEAR, cbak[SPELLS]= -50)
case CLEAR:
if ((code == CLEAR) && block_compress) {
if (output(zs, (code_int) CLEAR) == -1)
if ((zs->u.r.zs_code == CLEAR) && zs->zs_block_compress) {
clear = CLEAR;