<html>
<title>Simple Page Counter</title>
<body bgcolor=#FFFFFF>
<<
mycounter=REPLACE(page,".html","_counter.txt")
COPY FILE=mycounter TO pagecounter /COPY
IF ISINTEGER(pagecounter) THEN
pagecounter=pagecounter+1 ELSE pagecounter=1 /IF
COPY pagecounter TO FILE=mycounter /COPY
>>
<br><br>
<center>
My Counter is <<pagecounter>><br>
<a href=counter.html>RELOAD</a> to see page counter grow.
</html>
<<
mycounter=^
mycounter=REPLACE(page,".html","_COUNT.txt")
COPY FILE=mycounter TO pagecounter /COPY
IF ISINTEGER(pagecounter) THEN
pagecounter=pagecounter+1 ELSE pagecounter=1 /IF
COPY pagecounter TO FILE=mycounter /COPY
^
>>