HSP-$F

関係無いけど、2.6β13のマクロ定義を使うと、

#define while(%1) repeat:if %1==0:break
#define Wend loop

#define for(%1,%2,%3):%1:repeat:if cnt:%3\
if %2==0:break
#define next loop

i=10
while i
i--
wend

for i=1,i<=10,i++
next

が出来るな。