If P=0
 Disp "NULL PTR",i
End