https://pt.arcowiki.com/index.php?action=history&feed=atom&title=Manipula%C3%A7%C3%A3o_de_arquivosManipulação de arquivos - Histórico de revisão2026-04-11T05:15:34ZHistórico de edições para esta página nesta wikiMediaWiki 1.29.1https://pt.arcowiki.com/index.php?title=Manipula%C3%A7%C3%A3o_de_arquivos&diff=101&oldid=prevSlia: Criou a página com "=='''Write to file'''<br/>== The command <code>WRITE/</code> is used to write and store data in an open file.<br/> <code><span style="color: green; text-decoration: none;">$..."2018-06-06T14:36:29Z<p>Criou a página com "=='''Write to file'''<br/>== The command <code>WRITE/</code> is used to write and store data in an open file.<br/> <code><span style="color: green; text-decoration: none;">$..."</p>
<p><b>Página nova</b></p><div>=='''Write to file'''<br/>==<br />
The command <code>WRITE/</code> is used to write and store data in an open file.<br/><br />
<code><span style="color: green; text-decoration: none;">$$ Example of Write Command</span><br/></code><br />
::<code>DECL/CHAR,50,filnm,elnm<br/></code><br />
::<code>DECL/INTGR,i<br/></code><br />
::<code>DECL/DOUBLE,xx,yy,zz<br/></code><br />
<br />
::<code>TEXT/QUERY,(filnm),50,A,L,'insert file name'<br/></code><br />
::<code>filnm=ASSIGN/CONCAT('C:\',filnm,'.TXT')<br/></code><br />
::<code>DID(F1)=DEVICE/STOR,filnm<br/></code><br />
<br />
<br />
<code><span style="color: green; text-decoration: none;">$$ This is to create some dummy points.</span><br/></code><br />
::<code>F(POI_1)=FEAT/POINT,CART, 1.111,2.222,3.333, 0,0,0<br/></code><br />
::<code>F(POI_2)=FEAT/POINT,CART, 4.444,5.555,6.666, 0,0,0<br/></code><br />
::<code>F(POI_3)=FEAT/POINT,CART, 7.777,8.888,9.999, 0,0,0<br/></code><br />
::<code>FA(POI_1)=FEAT/POINT,CART, 1.111,2.222,3.333, 0,0,0<br/></code><br />
::<code>FA(POI_2)=FEAT/POINT,CART, 4.444,5.555,6.666, 0,0,0<br/></code><br />
::<code>FA(POI_3)=FEAT/POINT,CART, 7.777,8.888,9.999, 0,0,0<br/></code><br />
<br />
<br />
<code><span style="color: green; text-decoration: none;">$$ This row opens the file as an output device.</span><br/></code><br />
::<code>OPEN/DID(F1),DIRECT,OUTPUT,OVERWR<br/></code><br />
::::<code>DO/i,1,3<br/></code><br />
::::::<code><span style="color: green; text-decoration: none;">$$ Get the values from points</span><br/></code> <br />
::::::<code> elnm=ASSIGN/CONCAT('poi_',STR(i))<br/></code><br />
::::::<code> xx=OBTAIN/FA(@elnm),3<br/></code><br />
::::::<code> yy=OBTAIN/FA(@elnm),4<br/></code><br />
::::::<code> zz=OBTAIN/FA(@elnm),5<br/></code><br />
<br />
::::::<code><span style="color: green; text-decoration: none;">$$ Write command writes in the output file the required values</span><br/></code> <br />
::::::<code> WRITE/DID(F1),xx<br/></code><br />
::::::<code> WRITE/DID(F1),yy<br/></code><br />
::::::<code> WRITE/DID(F1),zz<br/></code><br />
::::<code>ENDDO <br/></code><br />
::<code>CLOSE/DID(F1)<br/></code><br />
<br />
<br />
=='''Read from file'''<br/>==<br />
The command <code>READ/</code> is used to get a value from an open file.<br />
<br />
<code><span style="color: green; text-decoration: none;">$$ Example of Read command</span><br/></code><br />
::<code>DECL/CHAR,50,filnm, result<br/></code><br />
::<code>DECL/CHAR,50,xyz<br/></code><br />
::<code>DECL/DOUBLE,xx,yy,zz<br/></code><br />
::<code>TEXT/QUERY,(filnm),50,A,L,'insert file name'<br/></code><br />
::<code>filnm=ASSIGN/CONCAT('C:\',filnm,'.TXT')<br/></code><br />
::<code>DID(F1)=DEVICE/STOR,filnm<br/></code><br />
<code><span style="color: green; text-decoration: none;">$$ This row opens the file as an input device.</span><br/></code><br />
::<code>OPEN/DID(F1),DIRECT,INPUT<br/></code><br />
::::<code><span style="color: green; text-decoration: none;">$$ Read command reads values from the input file and declare a point</span><br/></code><br />
::::<code>READ/DID(F1),xx<br/></code><br />
::::<code>READ/DID(F1),yy<br/></code><br />
::::<code>READ/DID(F1),zz<br/></code><br />
::::<code>F(POI_10)=FEAT/POINT,CART, xx,yy,zz, 0,0,0<br/></code><br />
::::<code>FA(POI_10)=FEAT/POINT,CART, xx,yy,zz, 0,0,0<br/></code><br />
::::<code><span style="color: green; text-decoration: none;">$$ Read command reads values from the input file and declare a point</span><br/></code><br />
::::<code>READ/DID(F1),xx<br/></code><br />
::::<code>READ/DID(F1),yy<br/></code><br />
::::<code>READ/DID(F1),zz<br/></code><br />
::::<code>F(POI_20)=FEAT/POINT,CART, xx,yy,zz, 0,0,0<br/></code><br />
::::<code>FA(POI_20)=FEAT/POINT,CART, xx,yy,zz, 0,0,0<br/></code><br />
<br />
::::<code><span style="color: green; text-decoration: none;">$$ Read command reads values from the input file and declare a point</span><br/></code><br />
::::<code>READ/DID(F1),xx<br/></code><br />
::::<code>READ/DID(F1),yy<br/></code><br />
::::<code>READ/DID(F1),zz<br/></code><br />
::::<code>F(POI_30)=FEAT/POINT,CART, xx,yy,zz, 0,0,0<br/></code><br />
::::<code>FA(POI_30)=FEAT/POINT,CART, xx,yy,zz, 0,0,0<br/></code><br />
::::<code>result=ASSIGN/CONCAT(STR(xx),' , ',STR(yy),' , ',STR(zz))<br/></code><br />
::::<code>TEXT/OPER,result<br/></code><br />
::<code>CLOSE/DID(F1)<br/></code><br />
<br />
[[it:Gestione dei file]]<br />
[[zh-cn:文件处理]]<br />
[[pt:Manipulação de arquivos]]<br />
[[de:Dateiverarbeitung]]<br />
[[es:Manejo de archivos]]<br />
[[en:File Handling]]</div>Slia