dumpdata.c

1.Ϥ˥ե򳫤

Character*132 filename
Integer filelne,flag,maxsize

Call open_dumpfile(filename,filelne,flag,maxsize)


filename ϥե̾
filelen  ˤäƥե̾Ĺ
flag     ϥե饰 (0 :  1 : Ǥ˥ե뤬¸ߤ)
maxsize  1٥ȤκΥ (֥åȤɬפˤʤ)


2.٥Ȥɲä

Integer*2 evtdata[300]

Call add_event(evtdata)


evtdata  ɲä륤٥



3.եĤ

Call close_dumpfile


 : 1֥å˽ʬ礭Υ٥ȥǡίޤä
     ե˽񤭹िᡢեĤݤ˻ĤäƤǸ
     ȾüʥΥ֥åϽ񤭹ޤʤ
