Download this file
FUNCTION func:BOOL; c:=c+1; (c:=c+1); c:=c-1; (c:=c-1); p := ( p:=p+1 )^; p := ( (p:=p+1) )^; p := ( p:=p-1 )^; p := ( (p:=p-1) )^; p := p:=p+1^; p := (p:=p+1)^; p := p:=p-1^; p := (p:=p-1)^; END_FUNCTION