＜紙＞さんＬｏＧ

18

 P    1.1838    0.0676    0.0739
 F    1.0452   -1.4941    0.1906
 O   -0.2911    0.6007    0.4781
 O    2.2598    0.5542    1.0027
 C   -1.4205    0.1633   -0.2568
 C   -1.5272   -1.3507   -0.1570
 C   -2.6649    0.8557    0.2779
 C    1.4150    0.6033   -1.6094
 H   -1.3068    0.4562   -1.3052
 H   -2.5263   -1.6914   -0.4502
 H   -0.8289   -1.8422   -0.8407
 H   -1.3258   -1.7064    0.8589
 H   -3.5578    0.5646   -0.2835
 H   -2.5523    1.9435    0.2160
 H   -2.8207    0.6155    1.3355
 H    2.4201    0.3370   -1.9485
 H    0.7022    0.1253   -2.2858
 H    1.3024    1.6879   -1.6891

gsl-shell  A_Prog.gsl  B_Data.txt

@echo  off
cd  /d  %0\..
gsl-shell  A_Prog.gsl  %1

function mysplit( inputstr, sep )
    if sep == nil then    sep = '%s'    end
    local t={} ; i=1
    for str in string.gmatch(inputstr, "([^"..sep.."]+)") do
        t[i] = str     i = i + 1
    end
    return t
end
charA = |s|  ffi.cast( 'char*', s )
voidA = |x|  ffi.cast( 'void*', x )

local iup = ffi.load( 'iup' )
ffi.cdef[[
  typedef void  Ihandle;
  typedef void ( __stdcall  *Icallback ) ( void*, const char* fnm, int num, int x, int y );
  void     IupOpen( int );
  void     IupClose( );
  Ihandle* IupDialog( Ihandle* child );
  void   IupSetAttribute( Ihandle*, const char* name, const char* value );
  void   IupSetCallback( void*, char*, Icallback );
  void   IupPopup( void*, int, int );
]]
iup.IupOpen( 0 )

Fcb = ffi.cast( 'Icallback', function( z, F, n, x, y )
            Fname=ffi.string(F)
            iup.IupClose()
   end )

dlg = iup.IupDialog( voidA(0) )   -- 枠だけ
iup.IupSetAttribute( dlg, charA('SIZE'), charA('100x80') )
iup.IupSetAttribute( dlg, charA('TITLE'), charA('DnD here') )
iup.IupSetCallback(  dlg, charA('DROPFILES_CB'), Fcb )
iup.IupPopup( dlg, 100, 100 )
----------------------------------------------------------------------------
print( Fname )
FN = mysplit( Fname, '\\' )     print( FN[#FN] )       -- これで、ファイル名

local IUP = { }
local iup = ffi.load( 'iup' )

function split_path( p )
  return  string.match( p, "(.-)([^\\]-([^%.]+))$" )  end
charA = |s|  ffi.cast( 'char*', s )
voidA = |x|  ffi.cast( 'void*', x )
-----
ffi.cdef[[
  typedef struct Ihandle_ Ihandle;
  typedef int (*Icallback)(Ihandle*);
  int     IupOpen( int );   // int IupOpen( int *argc, char ***argv );
  void    IupClose( );
  Ihandle* IupDialog( Ihandle* child );
  void   IupDestroy( void* );
  void   IupSetAttribute( Ihandle*, char* name, char* value );
  char*  IupGetAttribute( Ihandle*, char* name );
  void   IupSetCallback( Ihandle*, char*, Icallback func );
  void   IupPopup( void*, int, int );

  Ihandle* IupLabel( char* title );
  Ihandle* IupText(  char* action );
  Ihandle* IupButton( char*title, char* action );
  Ihandle* IupVbox( Ihandle* child, ... );
  Ihandle* IupHbox( Ihandle* child, ... );
]]

function  IUP.Open( z )   return  iup.IupOpen( z )   end
function  IUP.Close(  )   iup.IupClose(  )   end
function  IUP.Dialog( z )   return  iup.IupDialog( z )   end
function  IUP.Destroy( )   return  iup.IupDestroy( z )   end

function  IUP.Label( s )   return  iup.IupLabel( charA(s) )   end
function  IUP.Text ( s )   return  iup.IupText ( charA(s) )   end
function  IUP.Button( s1, s2 )
  return  iup.IupButton( charA(s1), charA(s2) )   end

function  IUP.Hbox( ... )   return  iup.IupHbox( ... )   end
function  IUP.Vbox( ... )   return  iup.IupVbox( ... )   end

function  IUP.SetAttribute( z, s1, s2 )
  iup.IupSetAttribute( z, charA(s1), charA(s2) )   end
function  IUP.GetAttribute( z, s )
  return  iup.IupGetAttribute( z, charA(s) )   end
function  IUP.SetCallback( z, s, f )
  iup.IupSetCallback( z, charA(s), f )   end

function  IUP.Popup( z, x, y )   iup.IupPopup( z, x, y )   end

return  IUP

local Iup = require'IUP'
Iup.Open( 0 )    ---------- これ必須！！！
NULL=voidA(0)
---------------  BUTTON の 'ACTION' コールバック関数
Bcb = ffi.cast( 'Icallback', function( z )
      tt1 = ffi.string( Iup.GetAttribute( txt1, 'VALUE') )
      tt2 = ffi.string( Iup.GetAttribute( txt2, 'VALUE') )
         print( 'Button Clicked' )
         print( tt1 )
         print( tt2 )
    return -2
  end )
---------------------------------------
s7='       ';   s14=s7..s7    -- ７文字、１４文字空白

txt1 = Iup.Text('')
txt2 = Iup.Text('')
btn1 = Iup.Button(' Go ', '')

dlg = Iup.Dialog( Iup.Vbox(
       Iup.Hbox( Iup.Label(s7), NULL ),
       Iup.Hbox( Iup.Label(s7), Iup.Label('TEXT1 :  '), txt1, NULL ),
       Iup.Hbox( Iup.Label(s7), Iup.Label('TEXT2 :  '), txt2, NULL ),
       Iup.Hbox( Iup.Label(s7), NULL ),
       Iup.Hbox( Iup.Label(s14), btn1, NULL ),      NULL )
     )
Iup.SetAttribute( dlg,  'SIZE', '100x90' )
Iup.SetAttribute( dlg,  'TITLE', 'test' )  -- 窓のタイトル
Iup.SetCallback(  btn1, 'ACTION', Bcb )

Iup.Popup( dlg, 350, 250 )                 -- 窓表示左上隅
Iup.Close()        -- ＜===右上[Ｘ]で終了。
---------------------------------------
print( tt1 )
print( tt2 )
_ = io.read(1)     -- [Enter]キー入力待ち。

local Iup = require'IUP';  Iup.Open( 0 )  -- これは必須
NULL=voidA(0)
----------------------  ファイル名Ｄ＆Ｄ
             -- 'F_DnD' は、'Icallback' 同等
Fcb = ffi.cast( 'F_DnD', function( z, F, n, x, y )
      Fname=ffi.string(F);    nn, xx, yy = n, x, y
      print( Fname, n, x, y )         ----- ここ※１
    return -2
  end )
----------------------
dlg = Iup.Dialog(
  Iup.Vbox( Iup.Hbox( Iup.Label(' '), NULL ),
     Iup.Hbox( Iup.Label('  Drop Here   Then Close Window'), NULL ),
     NULL )
  )
Iup.SetAttribute( dlg,  'SIZE', '180x100' )         -- 窓サイズ
Iup.SetCallback(  dlg,  'DROPFILES_CB', Icb(Fcb) )  -- Icb() 

Iup.Popup( dlg, 350, 220 )                          -- 窓左上隅
Iup.Close()
-----------------------------------------------------------------

Dir, Fnm, Ext = split_path( Fname )   ----- ここ※２
print( Dir, Fnm, Ext, nn, xx, yy ) -- パス名、ファイル名、拡張子、
                                   -- 0, 窓内のドロップ位置
_ = io.read(1)

Iup=require'IUP'; Iup.Open(0);  NL=voidA(0)
Fcb=ffi.cast('F_DnD',function(z,F,n,x,y) Fname=ffi.string(F); return -2 end)
dlg=Iup.Dialog(Iup.Hbox(Iup.Label('\n Drop & Close '),NL))
Iup.SetAttribute(dlg,'SIZE','180x100')
Iup.SetCallback(dlg,'DROPFILES_CB',Icb(Fcb))
Iup.Popup(dlg,350,220); Iup.Close(); _,Fnm,_=split_path(Fname)
print(Fnm); _=io.read(1)

Iup=require'IUP'; Iup.Open(0);  NL=voidA(0)
Fcb=ffi.cast('F_DnD',function(z,F,n,x,y) Fnm=ffi.string(F); return -2 end)
dlg=Iup.Dialog(Iup.Label('\n Drop and\n Close Window \n'),NL)
Iup.SetCallback(dlg,'DROPFILES_CB',Icb(Fcb))
Iup.Popup(dlg,350,220); Iup.Close(); _,Fname,_=split_path(Fnm)
print(Fname); _=io.read(1)

import PySimpleGUI27 as sg
Input_File_Name = sg.popup_get_file( 'Document to open' )

sg.popup_get_file('Doc. to open', file_types=(('VTK File', '*.vtk'),))

SP = ' ';   SPx = ' '*20;   SPa = ' '*10
L_Col = [
   [sg.Text( SPa + 'タイトル', font=('Helvetica',18) )],
   [sg.Text(SP)],
   [sg.Text(u'最大値:'),sg.InputText(vmax,key='-vmax-',size=(16,1)),sg.Text(vmax)],
   [sg.Text(SP)],
   [sg.Text(SPx), sg.Button('Display Graph', key='-DISP-')],
   [sg.Text(SP)],
   [sg.Canvas( key='-CANVAS3-')]  ]
R_Col = [ [sg.Canvas( key='-CANVAS1-')],
          [sg.Canvas( key='-CANVAS2-')]  ]

layout = [ [sg.Column(L_Col, size=(650,900)), sg.Column(R_Col, size=(650,1000))] ]

window = sg.Window('Title', layout=layout, finalize=True, size=(1350,1000))

def DISP():
   fig = plt.Figure(figsize=(6.0, 4.3))    # ここでsizeを指定。単位：インチ

   ax2 = fig.add_subplot(121)           　 # Axesを作る。
   ax2.set_xlabel( '～～～' )
   ax2.set_ylabel( '～～～' )
   ax2.set_xlim( x0, x1 )
   ax2.set_ylim( y0, y1 )
   ax2.set_title( '～～～' )
   ax2.plot( X, Y, 'b-' )                  # データをプロット

   ####### その他、もろもろ・・・

##### embedded-matplotlib.py
import numpy as np
import PySimpleGUI as sg
import matplotlib.pyplot as plt
from matplotlib.backends.backend_tkagg import FigureCanvasTkAgg

# GUIがぼやける現象を防ぐための関数
def make_dpi_aware():
  import ctypes
  import platform
  if int(platform.release()) >= 8:
    ctypes.windll.shcore.SetProcessDpiAwareness(True)
make_dpi_aware()

# 描画用の関数
def draw_figure(canvas, figure):
   figure_canvas_agg = FigureCanvasTkAgg(figure, canvas)
   figure_canvas_agg.draw()
   figure_canvas_agg.get_tk_widget().pack(side='top', fill='both', expand=1)
   return figure_canvas_agg

# レイアウト作成
layout = [[sg.Text('Embed Matplotlib Plot')],
          [sg.Canvas(key='-CANVAS-')],
          [sg.Button("Add"), sg.Button("Clear")]]

# windowを作成する．finalize=Trueにする必要がある．
window = sg.Window('Demo App', layout, finalize=True, font='Monospace 18')

# 埋め込む用のfigを作成する．
fig = plt.figure(figsize=(5, 4))
ax = fig.add_subplot(111)
ax.set_ylim(-10, 10)

# figとCanvasを関連付ける．
fig_agg = draw_figure(window['-CANVAS-'].TKCanvas, fig)

# イベントループ
while True:
   event, values = window.read()
   print(event, values)
   # sg.Print(event, values)

   if event in (None, "Cancel"):
      break

   elif event == "Add":
      # 適当なプロット用データ作成
      t = np.linspace(0, 7, 100)
      afreq = np.random.randint(1, 10)
      amp = np.random.randint(1, 10)
      y = amp * np.sin(afreq * t)

      # プロット
      ax.plot(t, y, alpha=0.4)

      # 変更を加えたあと，fig_agg.draw()で変更を反映させる．
      fig_agg.draw()

   elif event == "Clear":
      ax.cla()
      fig_agg.draw()

# ウィンドウを閉じる．
window.close()

# -*- coding: utf-8 -*-              # 文字コード：UTF-8

import  numpy  as  np
import  matplotlib.pyplot  as  plt
from PIL import Image

from matplotlib.backends.backend_tkagg import FigureCanvasTkAgg   #####
# ------------------------------------------
import PySimpleGUI27 as sg                # Python 2.7 版

# ====================
def DISP():
   fig = plt.Figure()                     # Figureインスタンスを生成

   ax2 = fig.add_subplot(121)             # Axesを作る。
   ax2.set_xlabel( '～～～' )
   ax2.set_ylabel( '～～～' )
   ax2.set_xlim( x0, x1 )
   ax2.set_ylim( y0, y1 )
   ax2.set_title( '～～～' )
   ax2.plot( X, Y, 'b-' )                 # データをプロット

   ####### その他、等々・・・

   figure_canvas_agg = FigureCanvasTkAgg(fig, window['-CANVAS-'].TKCanvas)
   figure_canvas_agg.draw()
   figure_canvas_agg.get_tk_widget().grid(row=0, column=1)


# =============================================

#######　ファイル入力処理

#######　x0、x1、y0、y1、X[]、y[]　設定処理

# =============================================
# 関数とkeyをセットにして辞書にする
handler = { '-DISP-' : DISP,
            ####### 等々,
          ]

layout = [
   [sg.Text('     タイトル', font=('Helvetica',18))],
   [sg.Text(' ')],
   [sg.Text('               '), sg.Button('Display Graph', key='-DISP-')],

   [sg.Canvas(key='-CANVAS-')]   ]      #####

window = sg.Window('Title', layout=layout, finalize=True, size=(700,900) )

while True:
   event, value = window.read()
   if event is None:
      break

   function = handler[event]     # handlerからeventに応じた関数を呼び出す
   function()

window.close()                   # 終了処理

# -*- coding: utf-8 -*-                  # コードは、UTF-8

from tkinter import *
from matplotlib import pyplot as plt
from matplotlib.backends.backend_tkagg import FigureCanvasTkAgg
import numpy as np
 
# プロットをする関数
def plot_wave(x, y):
   # Figureインスタンスを生成する。
   fig = plt.Figure()

   # 目盛を内側にする。
   plt.rcParams['xtick.direction'] = 'in'
   plt.rcParams['ytick.direction'] = 'in'

   # Axesを作り、グラフの上下左右に目盛線を付ける。
   ax1 = fig.add_subplot(111)
   ax1.yaxis.set_ticks_position('both')
   ax1.xaxis.set_ticks_position('both')

   # 軸のラベルを設定する。
   ax1.set_xlabel('x')
   ax1.set_ylabel('y')

   # データをプロットする。
   ax1.plot(x, y)
   return fig

ef button1():
   x = np.arange(0, 10, 0.1)
   y = np.random.rand(len(x))
   fig = plot_wave(x, y)
   canvas = FigureCanvasTkAgg(fig, frame_2)
   canvas.draw()
   canvas.get_tk_widget().grid(row=0, column=0)

# Windowの設定
root = Tk()
root.title("Plot window")
root.geometry()

# Frameの設定
frame_1 = Frame(root, bd=4, relief=GROOVE)
frame_2 = Frame(root, bd=4, relief=GROOVE)

# widgetの設定
btn1 = Button(frame_1, text='Update', command=button1)
fig = plot_wave(0, 0)
canvas = FigureCanvasTkAgg(fig, frame_2)

# widgetの配置
frame_1.grid(row=0, column=0, sticky=W + E)
frame_2.grid(row=1, column=0)
btn1.pack(fill=X)
canvas.get_tk_widget().grid(row=0, column=0)

root.mainloop()

from matplotlib import pyplot as plt

import  matplotlib.pyplot  as  plt

from matplotlib.backends.backend_tkagg import FigureCanvasTkAgg

import tkinter

from matplotlib.backends.backend_tkagg import (
                  FigureCanvasTkAgg, NavigationToolbar2Tk)
from matplotlib.backend_bases import key_press_handler
from matplotlib.figure import Figure

import numpy as np


root = tkinter.Tk()
root.wm_title("Embedding in Tk")

fig = Figure(figsize=(5, 4), dpi=100)
t = np.arange(0, 3, .01)
fig.add_subplot(111).plot(t, 2 * np.sin(2 * np.pi * t))

canvas = FigureCanvasTkAgg(fig, master=root)  # A tk.DrawingArea.
canvas.draw()

・・・・・
・・・・・