k=1;
while 1>0
 home
 k
 k=k+1;
end