11/07/31 13:46:04.08
即席でギャグとして作ってみたw
#undef repeat
#undef loop
#undef break
#undef continue
#undef cnt
#define repeat(%1=-1,%2=0) %trepeat %i=0%c%s1%s2 *%i%c cnt=%p3+%2%c if (%p3>=(%p2)) & ((%p2)>=0):goto *%i%i0%c
#define loop %trepeat *%o%c%p4++%c goto *%p1%c*%o%o0%o0%o0%o0
#define break %trepeat goto *%p1%c
#define _continue_ cnt+1
#define continue(%1=_continue_) %trepeat %p5=%1-%p3:goto *%p2%c
これならネストの問題もなく動くでしょ