2003/11/24
負の方向にもループできるC言語風forマクロです。
#define global cfor(%1=logmode, %2=1, %3=logmode) \
: %1 \
: %tAzfor *%i %s2 %s3 %tAzbreak %i0 %tAzcontinue %i0
#define global ccontinue %tAzcontinue goto *%p0
#define global cbreak %tAzbreak goto *%p0
#define global cnext %tAzcontinue *%o \
: %tAzfor %o : if %o { goto *%o } : %tAzbreak *%o
cfor i=0, i<5, i++
// 標準
mes i
cnext
cfor i=5, i>0, i--
// 負の方向
mes i
cnext
Copyright(C)方位記号