
                     Addin programs for Ngraph version 6.03 

                                Copyright (C) 2015, Satoshi ISHIZAKA.

                                    e-mail: isizaka@msa.biglobe.ne.jp
                            URL: http://www2e.biglobe.ne.jp/~isizaka/

 Ngraph for Windows p̃AhCvOłB


ygp@z

Ɋ܂܂ĂAhCvÓANgraph for Windows ̔zz
 NGRAPH.INI Ɋɓo^Ă܂̂ŁANGRAPH.EXE ƓfBNg
ɉ𓀂邾ŁANgraph  [Ot]-[AhC]j[gp
Ƃł܂B


yeAhCvOɊւ⑫z

legend.nsc
legend.exe
              }쐬ׂ̃AhCXNvgƎst@CB
              uMix:v`FbNƁAt@CAXJAYJ
              f[^܂Ƃ߂Ĉ̖}ƂĈ悤ɂȂ܂B
              Xg{bNXf[^t@CIсAuCaption:v
              }eLXg͂ĂBuCaption:v͂
              Ȃɂ̓f[^t@Cg܂B

fitrslt.nsc
fitrslt.exe
              tBbeBǑʂ̖}쐬ׂ̃AhCXNv
              gƎst@CBuExpandv`FbNꍇÃ݂t
              Bbgʂ̐lLegend-Text ƂĐ܂̂ŁAtB
              bgʂςĂALegend-Text͕ύX܂B`F
              bN̏ꍇɂLegend-Text̃IuWFNgu@\g܂
              ̂ŁAtBbgʂς΁ALegend-Text̓eI
              ω܂B
              
append.nsc
              łɓǂݍłOtNANGPt@Cǂ
              ވׂ̃AhCXNvg

mprint.nsc
               NGP t@Cׂ̃AhCłBOhC
              o GRA2PRNW.EXE pX̒ʂfBNgɂȂ΂Ȃ
              ܂B܂t@CɃXy[X̓ NGP t@C
              ܂B

calc.nsc
calc.exe
              Cӊ֐̕`ׂ̃AhCXNvgƎst@CB
              ۂɂ͓Ԋuf[^쐬Af[^t@CƂNgraph
              ɃZbgAϊ@\gĊ֐`悵܂B

clip2gra.nsc
clip2gra.exe
              Nbv{[h Windows Metafile Picture ` GRAt
              @CɕϊAhCXNvgƎst@CBGRA
              T|[gĂȂrbg}bvhԂȂǂ͖
              ܂B
              (version 1.00.01  PatBlt ɂΉBDesigner ̃Of
               F[V}` GRA ɕϊ\)

math.nsc
              dłB͂Ɠ\܂BNgraph̐
              ϊ@\̊֐g܂B

text-in.nsc
              f[^t@C̎w肵J legend-text Ƃăvb
              gf[^_ׂ̗ɑ}AhCXNvgBf[^
              XNvg̗łB

yAhCvO쐬ׂ̊ȒPȐz

Ngraph for Windows [Ot]-[s]j[œo^ĂAhC
IԂ Ngraph ͂uNgraph}NXNvgvƂĎs܂B}N
XNvgɂ Ngraph ̐ݒp^[SĂQƁAύX@\
܂̂ŁAAhCvO Ngraph ̏ԕϐɃANZXāC
݂ Ngraph ̏Ԃ擾CύX肷邱Ƃł܂B}NX
NvgłȂ̎ł̂łA[UC^[tF[XȂ
̓_AƗX̃vONǂꍇ
B}NXNvgɂ͊OvON@\܂̂ŁA
\łȀꍇɂ
(1)ǂ̂悤ɊOvO Ngraph ̏Ԃm点邩H
(2)OvOAǂ̗l Ngraph ̏ԂύX邩H
ƂȂ܂B̊ȒPȈ̕@̗Ƃ legend.nsc グA
ȉŐ܂B


ylegend.nsc ̓z

legend.nsc NOvO legend.exe łB܂ legend.exe
KvƂ錻݂ Ngraph ̏ԂLqԃt@C쐬܂B

DATALIST=${system:0:temp_file}                                          
object file -instance > "$DATALIST"                                
get file:0-! -id -field file x y type >> "$DATALIST"

ł́Asystem:0:temp_file Ńe|t@C擾AobjectR}
h file (f[^t@C)̃CX^X̐Aget R}hŊeݒ
p^[e|t@Cɏł܂B̒ԃt@C̃tH
[}bg͋NOvOȉꍇɂ legend.exejŗL̃tH[
}bgɂȂ܂B̃t@C̒g݂͌Ngraph̃f[^t@C̐ݒ
󋵂Xg

0
demo1.dat
1
2
mark

̗lȂ̂ɂȂ܂B

SCRIPT=${system:0:temp_file}                                          

ŁAlegend.exe ̏o͗p̕ʂ̃e|t@C擾AϐSCRIPT
Ɋi[Ă܂Bɂ̃t@C Ngraph }NXNvgƂĎs
܂B]āÃt@C̒g̓}NXNvg̕@ɑĂ
Ȃ΂Ȃ܂B

legend "$DATALIST" "$SCRIPT"

ŊOvO legend.exe NĂ܂Blegend.exe  R}
hC̈ԖڂɎw肳ꂽt@C Ngraph ̏Ԃ擾AԖ
Ɏw肳ꂽt@CɁAύXׂԂ}NXNvgƂďo͂
悤ɐ݌vĂ܂BႦ "STRING" ƌ legend-text (0,0)ɐ
ɂ́A$SCRIPT ̃t@C̓e

new text
text::x=0
text::y=0
text::text="STRING"

ƂȂ܂B̃XNvgŝ
               
if [ -f "$SCRIPT" ];                                                  
then                                                                  
    new shell                                                     
    shell::shell "$SCRIPT"                                        
    del shell                                                     
fi                                                                    

łBŁAϐ SCRIPT Ɋi[t@C݂Ăꍇ(if)
ɁAshell IvWFNg̃CX^X𐶐(new)ÃCX^X
̃t@Cߎs(shell)AŌɕsvɂȂCX^X
(del)Ă܂BŌ

system:0:unlink_temp_file "$DATALIST"                                             
system:0:unlink_temp_file "$SCRIPT"                                 

ŁAsKvɂȂԃt@C($DATALIST)ƃXNvgt@C($SCRIPT)
폜܂B


yAhCXNvǧ`z

ȏ܂Ƃ߂ƁAOvONAhCXNvǵA
----------------------------------------------------------------------
... OvOɕKvȒԃt@C𐶐 ...
SCRIPT=${system:0:temp_file}                                          
OvO  ԃt@C  "$SCRIPT"
if [ -f "$SCRIPT" ];                                                  
then                                                                  
    new shell                                                     
    shell::shell "$SCRIPT"                                        
    del shell                                                     
fi                                                                    
system:0:unlink_temp_file "$SCRIPT"
----------------------------------------------------------------------
ƂȂ܂B

ANgrapȟ݂̏Ԃ擾KvȂ΁A
----------------------------------------------------------------------
SCRIPT=${system:0:temp_file}                                          
OvO  "$SCRIPT"
if [ -f "$SCRIPT" ];                                                  
then                                                                  
    new shell                                                     
    shell::shell "$SCRIPT"                                        
    del shell                                                     
fi                                                                    
system:0:unlink_temp_file                                             
----------------------------------------------------------------------
ŏ\łB


yf[^AhCXNvgz

AhCXNvg̒f[^𒼐ڈł܂B̗Ƃ 
text-in.nsc ܂B̂悤ȃf[^t@CLƂ܂B
=====test.dat=========
0 0 sampleA 
1 1 sampleB
2 2 sampleC
======================
JxWɁAJyWɂOt쐬Ƃ܂B
Ngraphɂ͂łtest.datJĂAvbg^Cv "mark" Ńvbg
ĂƂ܂B text-in.nsc sA
"Input legend-text column"  3 ͂ƁAf[^_ׂ̗ɑOJ
̃eLXglegend-textƂđ}邱Ƃł܂B

̃XNvgł́A܂ dialog IuWFNggāAlegend-text ̃J
͂Aϐ(COLUMN)ɑ܂B

new dialog
COLUMN=${dialog::input:'Input legend-text column'}
del dialog

 file IuWFNg file::opendatac găf[^t@CJA
file::getdata Ńf[^Ȃ܂Ńf[^擾AŌ
file::closedata Ńf[^܂B

  file:0:opendatac
  while file:0:getdata
  do
    ... eLXg̐ݒ ...
  done
  file:0:closedata

while [v̒ł́A܂ text IuWFNg𐶐܂B

    new text

܂ file::getdata sAf[^̐l file::data_x, file::data_y
ɓA0.01mmPʂł̗pł̈ʒu file::coord_x, file::coord_y ɓ
Asԍ file::line ɓ܂BpĐtext̍Wl
肵Ă܂B

    text::x=${file:0:coord_x} 
    text::y=${file:0:coord_y}

܂ file::column păJ̃g[NoĂ܂Bfile::column 
̑̓t@C̍sŁAfile::line gA͎oJ
ŕϐ COLUMN ̒lpĂ܂Bog[N text::text ɐݒ肵
܂B

    text::text=`get file:0 -field column:"${file:0:line} ${COLUMN}"`

Afile::column ͌Ăяo閈Ƀt@C̐擪瑖ĖړI̕
擾܂̂ŁAf[^t@C傫ꍇɂ͓삪xłB

ʓIɃf[^AhCXNvǵA
----------------------------------------------------------------------
file::opendatac
while file::getdata
do
  ... ړȊ
  file::data_x file::data_y file::coord_x file::coord_y file::line g
done
file::closedata
----------------------------------------------------------------------
ƂȂ܂Bfile::opendatac ̑ file::opendata pꍇA
file::coord_x, file::coord_y ̒l͕sƂȂ܂Ȃ莲̐ݒ肪Ȃ
ĂȂĂG[ɂ͂Ȃ܂B


ygpKEzzz

ENgraph for Windows ̃CZX GNU GENERAL PUBLIC LICENSE
  Version 2 ɏ]܂B
 

Ngraph for Windows. Copyright (C) 2015, Satoshi ISHIZAKA. 

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.


Ngraph for Windows. Copyright (C) 2015, ΍q

̃vO̓t[\tgEFAłBȂ͂At[\tgEF
AcɂĔsꂽ GNUʌOp_(o[W2A]
ɂĂ͂ȍ~̃o[Ŵǂꂩ)̒߂̉ōĔЕz
͉ς邱Ƃł܂B

̃vO͗Lpł邱ƂĔЕz܂A*S̖ۏ* 
łBƉ\̕ۏ؂̖ړIւ̓ḰAOɎꂽ̂
ߑS݂܂BڂGNUʌOp_񏑂B

Ȃ͂̃vOƋɁAGNUʌOp_񏑂̕ꕔ
󂯎͂łB󂯎ĂȂ΁At[\tgEFAc
ŐĂ( the Free Software Foundation, Inc., 59
Temple Place, Suite 330, Boston, MA 02111-1307 USA)B