string name
string snode
int node

node  = pcbnode()
snode = i2s (node, snode)
name  = "node" + node 

fcreate 1, ppepath() + name, O_WR, S_DN
fput 1, snode
fclose 1