august/august.oc
int m[40000 ];
int main() {
int *q,s,f,r,o,l,p,c,b;
char *d;
d=" \t\n;{}\0AP@赁gE챰0q";
b=256;
q=m;
getchar() ;
o= getchar() ;
c= getchar() ;
c=c+ getchar() *b;
p=c;
if (o){while (p){o= getchar() ;
if (o== 59 ){ r=2 ;}else if (o== '{' ){ r=5 ;}else if (o== '}' ){ r=8 ;}else r=0;
if (r){r=r+ getchar() %4;
l=1- getchar() -r;
while (r--){*q=q[l];
q++;
p--;
}}else {if ((o==32)+(o==9)+(o==10)){r= getchar() ;
o=o%4+(r+(r==123))%8*3;
if (8<o)o=o+ getchar() %4*9;
o=d[o]+b;
}*q++=o%b;
p--;
}}while (getchar() !=12);
getchar() ;
}else {while (p--)*q++= getchar() ;
}s= 40000 ;
p=0;
while (1){o= m[p++] ;
if (o== 17 ){ m[s] = ! m[s] ;}else if (o== 18 ){ m[s] = - m[s] ;}else if (o== 12 ){ r= m[s++] ;m[s] = m[s] + r ;}else if (o== 13 ){ r= m[s++] ;m[s] = m[s] - r ;}else if (o== 14 ){ r= m[s++] ;m[s] = m[s] * r ;}else if (o== 15 ){ r= m[s++] ;m[s] = m[s] / r ;}else if (o== 16 ){ r= m[s++] ;m[s] = m[s] % r ;}else if (o== 6 ){ r= m[s++] ;m[s] = m[s] == r ;}else if (o== 7 ){ r= m[s++] ;m[s] = m[s] != r ;}else if (o== 8 ){ r= m[s++] ;m[s] = m[s] < r ;}else if (o== 1 ){ r= m[s++] ;m[m[s] ]=r;m[s] =r ;}else if (o== 9 ){ r= m[s++] ;m[m[s] ]=r;s++ ;}else if (o== 10 ){ r= m[s] ;
s=f;
p= m[s- 1];
f= m[s- 2];
l= m[s- 3];
s=s+l/2;m[s] =r;if (l%2)s++ ;}else if (o== 22 ){ s++ ;}else if (o== 27 ){ return m[s] ;}else if (o== 21 ){ r= m[s] ;
s--;m[s] = r ;}else if (o== 23 ){ m[s] =m[m[s] ] ;}else if (o== 19 ){ m[s] =m[m[s] ]++ ;}else if (o== 25 ){ m[s] =m[m[s] ]-- ;}else {l=o%16;
o=o/16;
if (l==7){l= m[p++] ;
l=l+ m[p++] *b;
}else if (7<l)l=l+ m[p++] *8-1;
if (o== 2 ){ s--;m[s] = f+l ;}else if (o== 4 ){ s--;m[s] = f-l-4 ;}else if (o== 3 ){ s--;m[s] = m[f+l] ;}else if (o== 5 ){ s--;m[s] = m[f-l-4] ;}else if (o== 6 ){ s--;m[s] = c+l ;}else if (o== 7 ){ s--;m[s] = m[c+l] ;}else if (o== 12 ){ s--;m[s] = l ;}else if (o== 8 ){ s--;m[s] = l ;}else if (o== 9 ){ s--;m[s] = p ;
p=p+l ;}else if (o== 11 ){ r= m[s- -l/2];
if (r<3){if (r)r=putchar(m[s] );
else
r= getchar() ;
s=s+l/2;m[s] =r;if (l%2)s++ ;
}else {m[s- 1]=p;
m[s- 2]=f;
m[s- 3]=l;
f=s;
s=s-19;
p=r;
} ;}else if (o== 13 ){ p=l ;}else if (o== 15 ){ if (m[s++] )p=l ;}else if (o== 14 ){ if (! m[s++] )p=l ;}else ;
}}}