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