2021年10月 – ページ 3 – 三題噺：馬・カメラ・Python

2021年10月8日2021年10月8日

Pythonでマクロ：AnimatedImageControlを使ってみる

Libreofficeのダイアログ画面上で一組の画像をアニメーションのように自動的に順次見せるAnimatedImageControlを使ってみた。

このAnimatedImageControlを使ったBasic言語による雛形はここにある。これをPythonに翻訳した。注意点は：

insertImageSet(0, 画像ファイルパスの配列)というメソッドがある。Basic言語では画像ファイルパスの配列にはそのまま配列名を書く。Pythonでは画像ファイルパスの配列としてリストやタプルで構成することができるが、リストではダメでタプルで作ったものを使う。
インポートしたモジュールで定義されている定数を実引数に使うメソッド、例えばsetPosSize(10, 10, 1000, 900, モジュール定義の定数)。Basic言語ではcom.sun.star.awt.PosSize.POSSIZEのように階層構造をそのまま書く。Pythonではunoモジュールで定義されいる関数を使う。つまりuno.getConstantByName(“com.sun.star.awt.PosSize.POSSIZE”)

【マクロ】


#coding: utf-8
import uno
import screen_io as ui
import unohelper

def python_macro_clipart_anim(*arg):
#
#シート
  doc = XSCRIPTCONTEXT.getDocument()
  sheet = doc.Sheets[0]
  #データのある行数を調べる
  sRange = sheet.getCellRangeByName("A1")
  sCursor=sheet.createCursorByRange(sRange)
  sCursor.collapseToCurrentRegion()
  MaxDataRow = sCursor.Rows.Count-1
  ui.Print(MaxDataRow)
  items=[]
  imageURLs=[]
  for  i in range(MaxDataRow):
    item = sheet.getCellByPosition(0, i+1 ).String
    filePath = sheet.getCellByPosition(1, i+1 ).String
    #ui.Print(item)
    #ui.Print(filePath)
    items.append(item)
    imageURLs.append(uno.systemPathToFileUrl(filePath))
  imageURLsT=tuple(imageURLs)
#
#ダイアログ
  ctx = XSCRIPTCONTEXT.getComponentContext()
  smgr = ctx.getServiceManager()
  dialogM = smgr.createInstance('com.sun.star.awt.UnoControlDialogModel')
  # Size of DialogM
  dlgWth = 500
  dlgHgt = 400
  dialogM.Width = dlgWth
  dialogM.Height = dlgHgt
  dialogM.Title = "クリップアート・アニーション"
#ダイアログの生成とモデルの登録
  dialog = smgr.createInstance('com.sun.star.awt.UnoControlDialog')
  dialog.setModel(dialogM)
#
#
  animCtrlModel = smgr.createInstance('com.sun.star.awt.AnimatedImagesControlModel')
  animCtrlModel.insertImageSet(0, imageURLsT)
  animCtrlModel.StepTime = 1000		
  animCtrlModel.AutoRepeat = False
  animCtrlModel.ScaleMode = 1
#アニメーション・コントロールの登録
  animateCtrl = smgr.createInstance('com.sun.star.awt.AnimatedImagesControl')
  animateCtrl.setModel(animCtrlModel)
#
  dialog.addControl("animated", animateCtrl)
  POSSIZE = uno.getConstantByName("com.sun.star.awt.PosSize.POSSIZE")
  animateCtrl.setPosSize(10, 10, 1000, 900, POSSIZE)
#
#窓の生成そしてこの窓をダイアログ画面として使う
  window = smgr.createInstance('com.sun.star.awt.Toolkit')
  dialog.createPeer(window,None)		# None : OK / none : NG
#
  animateCtrl.startAnimation()

  dialog.execute()
  dialog.dispose()

属性StepTime=1000で個々画像を一秒間表示するはずだがこの値を変えて表示時間に変化はない。また属性AutoRepeat = Falseで一組の画像の表示は一度のはずだが繰り返し表示される。

2021年10月7日2021年10月8日

粟（アワ）と吉備（キビ）そしてMillet

紀元前4000年ごろの金石併用時代のウクライナ周辺の考古学の本（英文）を読んでいると出土した陶器の破片に穀物の種による圧痕があり当時の栽培植物が推定できるという記述によく遭遇する。その栽培植物の一つにMillet（英語）がある。このMilletは英和辞書では①アワ（粟）、②キビ（吉備）となっている。併記されている学名がPanicum sativumとなっていることからこの植物はキビであることがわかる。

キビはインド原産であるが、アワは中央アジア、インド亜大陸などが原産地となっていてキビ以上に人類の食料として重要であったことが示唆されている、古代中国では北の地方ではアワが主食であった由。「米」という漢字も本来はアワを示す文字であったといわれている。米は華南のものであった。西から来た「米」が粟だったのかもしれない。

2021年10月6日2021年10月6日

Pythonでマクロ：ImageControlでクリップアートのカタログを作成

ダイアログの部品の一つにImageControlがある。ダイアログに複数の画像を表示する機能を持ったコントロールである。いろんな使い道がありそうであるがここでは多数のクリップアートを表示する一種のカタログを作ってみることにする。

クリップアート・カタログ

上図のようにCalcのシート上にクリップアートのタイトルと画像ファイルへのpathが書かれたものがあるとする。マクロではこのシート上のデータを読み込んでダイアログ上にこれらのクリップアートが閲覧できる一種のカタログを作る。

ImageControlの詳細はここにある。特に重要な属性は

ImageURL：イメージデータのある場所をURL形式で指定する。
ScaleMode：ダイアログ上の決められた枠にどのように画像を表示するかを指定する。この値が2であると兎に角画像をこの枠に納めて表示する（ANISOTROPIC）。この値が1であると画像のアスペクト比を保持して表示する（ISOTROPIC）。

ファイルpathのURL形式への変換（またはその逆）はPythonでは以下のunoモジュールが使える：

 path = "/home/foo/Documents/file.odt"
url = uno.systemPathToFileUrl(path)
path = uno.fileUrlToSystemPath(url)

カタログはダイアログ画面に納まらないので垂直スクロールの機能を付ける。

【実行画面】

【マクロ】


#coding: utf-8
import uno
import screen_io as ui
import unohelper
from com.sun.star.awt import XActionListener
from com.sun.star.awt import XAdjustmentListener

#「スクロールバー」の処理
class MyAdjustmentListener(unohelper.Base, XAdjustmentListener):
  def __init__(self, dlgHgt, catHgt, labs, imcs):
    self.labs = labs
    self.imcs = imcs
    self.scrollVMax=100
    self.dlgHgt=dlgHgt
    self.catHgt=catHgt
    self.labsPositionY0 = []
    self.imcsPositionY0 = []
    for i, lab in enumerate(labs):
      print(lab.PositionY, imcs[i].PositionY)
      self.labsPositionY0.append(lab.PositionY)
      self.imcsPositionY0.append(imcs[i].PositionY)
  def adjustmentValueChanged(self, event):
    ratio = event.Value/self.scrollVMax
    print(ratio)
    for i,lab in enumerate(self.labs):
      lab.PositionY = self.labsPositionY0[i]-(self.catHgt - self.dlgHgt)*ratio
      self.imcs[i].PositionY = self.imcsPositionY0[i]-(self.catHgt - self.dlgHgt)*ratio
    #print(event.Type)
    #print(event.Value)

def python_macro_clipart(*arg):
#
#シート
  doc = XSCRIPTCONTEXT.getDocument()
  sheet = doc.Sheets[0]
  #データのある行数を調べる
  sRange = sheet.getCellRangeByName("A1")
  sCursor=sheet.createCursorByRange(sRange)
  sCursor.collapseToCurrentRegion()
  MaxDataRow = sCursor.Rows.Count-1
  ui.Print(MaxDataRow)
  items=[]
  filePaths=[]
  for  i in range(MaxDataRow):
    item = sheet.getCellByPosition(0, i+1 ).String
    filePath = sheet.getCellByPosition(1, i+1 ).String
    #ui.Print(item)
    #ui.Print(filePath)
    items.append(item)
    filePaths.append(filePath)
#
#ダイアログ
  ctx = XSCRIPTCONTEXT.getComponentContext()
  smgr = ctx.getServiceManager()
  dialogM = smgr.createInstance('com.sun.star.awt.UnoControlDialogModel')
  # Size of DialogM
  dlgWth = 150
  dlgHgt = 200
  dialogM.Width = dlgWth
  dialogM.Height = dlgHgt
  dialogM.Title = "クリップアート・カタログ"
#

#コントロールの作成・登録
  tabIndex = 0 
#スクロールバー
  scb1 = dialogM.createInstance('com.sun.star.awt.UnoControlScrollBarModel')
  tabIndex += 1
  scrollVMin=0
  scrollVMax=100
  scb1.Name = 'ScrollBar'
  scb1.TabIndex = tabIndex
  scb1.PositionX = dlgWth-10
  scb1.PositionY = 0
  scb1.Width = 10
  scb1.Height = dlgHgt
  scb1.Orientation=1
  scb1.ScrollValueMin = scrollVMin
  scb1.ScrollValueMax = scrollVMax
  scb1.LiveScroll= 1
  dialogM.insertByName('ScrollBar', scb1)
#タイトル・画像の登録
  imageX = 100
  imageY = int(imageX*3/4)
  labs=[]
  imcs=[]
  for i in range(MaxDataRow):
    #タイトル
    lab2 = dialogM.createInstance('com.sun.star.awt.UnoControlFixedTextModel')
    labY=10+(imageY+10+10)*i
    tabIndex += 1
    lab2.Name = items[i]
    lab2.TabIndex = tabIndex
    lab2.PositionX =10
    lab2.PositionY =labY
    lab2.Width = dlgWth - 10
    lab2.Height = 10
    lab2.Label = items[i]
    lab2.Align = 0					# 0 : Left / 1 : Center / 2 : Right
    lab2.Border = 0
    dialogM.insertByName(items[i], lab2)
    labs.append(lab2)
    #画像
    imc2 = dialogM.createInstance('com.sun.star.awt.UnoControlImageControlModel')
    imcY = labY+10
    tabIndex += 1
    imc2.Name = items[i]
    imc2.TabIndex = tabIndex
    imc2.PositionX = 10
    imc2.PositionY = imcY
    imc2.Width = imageX
    imc2.Height = imageY
    imc2.ImageURL = uno.systemPathToFileUrl(filePaths[i])
    imc2.ScaleMode = 1
    dialogM.insertByName(items[i]+'image', imc2)
    imcs.append(imc2)
#最終的なチェックボックス表の高さ
  catHgt=imcY + (imageY + 10)

# Create the dialog and set the model
#ダイアログの生成とモデルの登録
  dialog = smgr.createInstance('com.sun.star.awt.UnoControlDialog')
  dialog.setModel(dialogM)
#コントロールの登録
  cmdScb1 = dialog.getControl('ScrollBar')
#エヴェント監視（スクロールバー）
  scb1_listener = MyAdjustmentListener(dlgHgt, catHgt, labs, imcs)
  cmdScb1.addAdjustmentListener(scb1_listener)
#
#窓の生成そしてこの窓をダイアログ画面として使う
  window = smgr.createInstance('com.sun.star.awt.Toolkit')
  dialog.createPeer(window,None)		# None : OK / none : NG
#
  dialog.execute()
  dialog.dispose()

2021年10月5日2021年10月5日

ノーベル医学・生理学賞：温度と触覚の受容体発見の２氏

今朝の新聞の記事のタイトルである。

熱いものに触ると熱く感じたり、ものを掴むとものの感触がえられるのは神経細胞の末端にその刺激を感ずる受容体があるからである。

今年のノーベル医学・生理学賞はこれら受容体を発見したデービット・ジュリアス米カリフォルニア大学教授と米ハワード・ヒューズ医学研究所のアダム・バタフーティアン博士が受賞した。

基礎的な研究が受賞したことは大変に喜ばしいことである。

2021年10月2日2021年10月2日

ウシにシマウマ模様を描いてみた

今朝のラジオの地方ニュースである。

仙台にあるウシの放牧場で放牧しているウシに蝿などが集るのを減らす試みとして放牧しているウシに顔料でシマウマのような縞模様を描いてみた。

虫を追い払う仕草の頻度は模様を付けていないウシと比較すると7割程度減少するという結果になった由。有効らしい。ただ同じ実験の二回目ではこの値は3割と落ちてくる。虫も学習しているのかもしれない。

因みのシマウマの縞模様は多くの人の興味を引くらしくその効果については実に多くの説がある。詳しくはここを参照してもらいたい。

日	月	火	水	木	金	土
					1	2
3	4	5	6	7	8	9
10	11	12	13	14	15	16
17	18	19	20	21	22	23
24	25	26	27	28	29	30
31