來氏《 
》易註︰
九二，包荒，用馮河，不遐遺，朋亡，得尚于中行。
包荒者，包乎初也。初為草茅，荒穢之象也 。因本卦小往大來，陽來乎下，故包初。馮河者，二變則中爻成坎水矣，河之象也。河水在前，乾健利涉大川，馮之象也。用馮河者，用馮河之勇往也。二居柔位，故教之以勇。二變與五隔河，若馮河而往，則能就乎五矣。二與初為邇，隔三四，與五為遐。不遐遺者，不遺乎五也。朋者初也，三同陽體 ，牽連而進，二居其中，朋之象也，故咸卦中爻成乾，四居乾之中，亦曰朋從。朋亡者 ，亡乎初而事五也。尚者，尚往而事五也。中行，指六五，六五小《象》曰中以行願是也。卦以上下交為泰，故以尚中行為辭。曰得尚者，慶幸之辭也。若惟知包乎荒，則必不能馮河而就五矣，必遐遺乎五矣，必不能亡朋矣。用馮河以下，聖人教占者之辭。陽來居內，不向乎外，有惟知包乎內卦之初，遐遺乎外卦君上之象，故聖人于初教之以征 ，于二教之以尚。舊註不識象，所以失此爻之旨。
當泰之時，陽來于下，不知有上，故九二有包初之象，然二五君臣同德，天下太平，賢人君子，正當觀國用賓之時，故聖人教占者用馮河之勇，以奮其必為之志，不可因邇而忘遠。若能忘其所邇之朋，得尚往于中行之君，以共濟其泰，則上下交而其志同，可以收光大之事業，而泰道成矣。故其象占如此 。
《象》曰：包荒，得尚于中行，以光大也。
曰包荒兼下三句而言也。孔子小象多是如此 ，捨相比溺愛之朋，而尚往以事中德之君 ，豈不光明正大。乾陽大之象也，變離光之象也。
䷊︰地氣居上而性趨下；天氣處下而情往上 。天地氤氳，萬物化醇。不泰又待何時？
今兒學堂氣氛有些低迷，同學們意興闌珊，有點悶悶不樂。想來是因為昨天有些議題，不能定奪結論，某些改寫嘗試，失敗告終。這因『辨』而『辯』與由『辯』能『辨』，應該如何決定分際？
《 
》文說︰
辨，判也。从刀辡聲。
辯，治也。从言在辡之閒。
，彷彿說了似沒說！
沒多時學長來了。
派︰同學們，大家好。昨兒因故請假，晚上讀了 M♪o 的課堂摘記，看到大家合力完成的 TuxIOme 程式深感驚豔。別說當年我們學習時沒有這樣的創舉，就算當初在小學堂課綱之訂定時，也未曾設想過，真可以小學堂裡講程式文法的哩！所以今兒自備禮物 ── 環境溫度感測器 ──，給你們嘉獎，替同學們加油。同時特傳能看影音的 Kodi 安裝 
秘技，為大家助興。【熱烈鼓掌】
雖然說『包荒馮河』在於『勇』，更在『朋不遐遺』。 
議論之旨，重在得 
理。同或不同，以 
或 
，貴能 
同異，方謂得 
宜。
程式語言的文法，道理博大精深，大家既已敲門叩關，更應當細思幕後法則，往往牽一髮而動全身。於此略對入出針文法，作個 
平說︰
【函元之不妥】
通常研習程式文法實務，精通了算術表達式，大概思過半矣。這事早由 λ 運算所揭示，所以知道『函式求值』與『變元代換』的概念看來似乎簡單，其中的精巧細密，除非深入探究，並不容易掌握。如果考察派生語法，它並沒有『抽象函數』運算︰
，這是因為首先『 def 』關鍵字所定義的『函式』，可以不是數學上講的『函數』，而是執行某種『功能』 function 。 再者從語用上說，針對特定領域應用，設計特殊語法，並不是普通程式語言應該專注的目標，多半經由『程式庫』來作擴充。比方講 NumPy 方便了科學運算， SymPy 開啟符號代數系統。它們並不直接擴張 Python 的基本語法。因此對於入出針文法，也需要思考它的『目的性』。由於 TPG 只是普通派生定義的『 class 』類，所謂文法的『內』與『外』就有很多彈性，可以在應用上作適度規劃。由此觀之，函元 ，或該叫做函式，之擴張並非『必要的』，因此認為不妥。
【文法之整合】
假使將 TuxIOme 的系統溫度文法，如此修改
# 原先
| "系統溫度" 
self["CPU溫度"] = e = 讀取系統溫度()
;
，原先的用法依舊，『變元』裡將增加一項『 CPU溫度』，於是就可以用『顯示』文法，將系統溫度顯示在數碼管上。現今又多了『環境溫度』的感測器，可以思考如何『相容』『整合』的作文法擴充 。
【功能之衡量】
現在已經有了 IRTX 和 IRRX 的『功能』。如果我們將 
紅外線發射碼中的 KEY_0、KEY_1 … KEY_9 看成『數字碼』，用來傳遞『四位數字訊息』，舉例︰
1314 ──→ 一生一世
5200 ──→ 我愛人人
等等，可以用『明文』，也可以用『亂數加密』成『密訊』。如此除了將需要『明文』或『密訊』的『發文』與『收文』之文法外，還需要『亂數』產生器，下面程式片段定義了一種『基本』 Atom 原子資料，稱為『Random』，是『四位亂數』的製造者，
Atom/a ->
real/a
| integer/a
| Function/a
| Var/a
| '
'
| Random/a
;
Function/y ->
函數一/f '
' 
y = f(x1,x2)
;
Random/x -> "四位亂數" 
more /etc/lirc/lircd.conf
# Please make this file available to others
# by sending it to <lirc@bartelmus.de>
#
# this config file was automatically generated
# using lirc-0.9.0-pre1(default) on Tue Oct 8 07:05:38 2013
#
# contributed by
#
# brand: /home/pi/lircd.conf
# model no. of remote control:
# devices being controlled by this remote:
#
begin remote
name tuxiome
bits 16
flags SPACE_ENC|CONST_LENGTH
eps 30
aeps 100
header 9006 4447
one 594 1648
zero 594 526
ptrail 587
repeat 9006 2210
pre_data_bits 16
pre_data 0xFD
gap 107633
toggle_bit_mask 0x0
，當然『TuxIOme』程式中的
def 紅外線輸出(字碼):
global 重複次數
subprocess.call(['irsend', 'SEND_ONCE', 'tuxiome', 字碼,"--count=" +str(重複次數) ])
return "已送出"
也當對應修改。
其實所用遙控器的『lircd.conf』是由 LIRC 之『irrecord』程式產生的︰
△ IRRECORD
NAME
irrecord – application for recording IR-codes for usage with LIRC
SYNOPSIS
irrecord [-f] [-n] [-H driver] [-d device] [file]
irrecord -a <file>
irrecord -l
irrecord –help | –version
DESCRIPTION
This program will record the signals from your remote control and create a config file for lircd. A proper config file for lircd is maybe the most vital part of this package, so you should invest some time to create a working config file. Although I put a good deal of effort in this program it is often not possible to automatically recognize all features of a remote control.
If the program fails to recognize the protocol of the remote control you should use the –force option to at least create a config file in raw mode.
If file is not specified it defaults to “irrecord.conf”
If file already exists and contains a valid config irrecord will use the protocol description found there and will only try to record the buttons. This is very useful if you want to learn a remote where config files of the same brand are already available. Of course this will only work if the remotes use the same protocol but it’s worth a try. You will find template files for the most common protocols in the remotes/generic/ directory of this package. The name of the new file is created by appending .conf to the given filename in this case.
OPTIONS
- -h –help
- display this message
- -v –version
- display version
- -a –analyse
- Analyse a raw_codes config file, trying to convert it to a regular configuration.
- -f –force
- Force raw mode. Use this if recording fails otherwise. This creates a raw codes configuration file which can be used as-is or converted using the -a option.
- -n –disable-namespace
- disables namespace checks
- -l –list-namespace
- list valid button names
- -H –driver=driver
- Use given driver. -H help lists available drivers.
- -d –device=device
- read from given device
- -D –loglevel=level
- Determine the amount of logging information. [level] can be a symbolic syslog level: ‘error’,’warning, ‘info’, ‘notice’ or ‘debug’. lircd also defines three additional levels ‘trace’, ‘trace1’ and ‘trace2’ which gives even more messages (‘trace2’ bringing the most). However, in the log these messages are marked as ‘debug’. The level can also be an integer in the range 3 (almost no messages) to 10.
……
如果能深入了解它的用法與限制，你將可以『拷貝』 Copy 或應講『備份』 Backup 一般的家用遙控器，這也就是『學習型』遙控器的基本原理。
△ 如何安裝 kodi 『家庭劇院』 Home Theatre︰
sudo nano /etc/apt/sources.list.d/mene.list # 輸入內容 deb http://archive.mene.za.net/raspbian wheezy contrib # 安裝 sudo apt-get update sudo apt-get install kodi
首次用『選單』執行 Kodi Media Center 媒體中心，系統將會產生『~/.kodi/』的目錄，請建立如下的遙控器設定參考檔案︰
pi@raspberrypi ~
以及
pi@raspberrypi ~
，研究
一、為何沒有 KEY_LEFT、KEY_RIGHT、KEY_UP、KEY_DOWN 卻還能左右上下的呢？
二、遙控器難以操控的原因？
三、可以用 irsend 來控制嗎？
碼︰會 
習。學長講習後時間已經很晚，同學們興高采烈正忙著安裝與驗證諸諸種種軟體。何不……
☿ 
長︰同學們請安靜。今天的會習，改為自由習作與自由討論 ……【鼓掌通過】
訊︰☿ 今日方真知︰循循善誘，誠非易事。
![sudo apt-get install python-lirc Otherwise, download the latest relase from [here]https://github.com/tompreston/python-lirc/releases and install with:](https://www.freesandal.org/wp-content/ql-cache/quicklatex.com-1fb41514bc519eae182753d4a05568d7_l3.png "Rendered by QuickLaTeX.com")
sudo dpkg -i python3-lirc_1.2.1-1_all.deb
python3![more /etc/lirc/lircrc begin prog = TuxIOme button = KEY_1 config = 1 end begin prog = TuxIOme button = KEY_2 config = 2 end begin prog = TuxIOme button = KEY_3 config = 3 end begin prog = TuxIOme button = KEY_4 config = 4 end begin prog = TuxIOme button = KEY_5 config = 5 end begin prog = TuxIOme button = KEY_6 config = 6 end begin prog = TuxIOme button = KEY_7 config = 7 end begin prog = TuxIOme button = KEY_8 config = 8 end begin prog = TuxIOme button = KEY_9 config = 9 end begin prog = TuxIOme button = KEY_0 config = 0 end begin prog = TuxIOme button = KEY_DOWN config = DOWN end begin prog = TuxIOme button = KEY_LEFT config = LEFT end begin prog = TuxIOme button = KEY_UP config = UP end begin prog = TuxIOme button = KEY_RIGHT config = RIGHT end begin prog = TuxIOme button = KEY_BACK config = BACK end begin prog = TuxIOme button = KEY_ENTER config = ENTER end begin prog = TuxIOme button = KEY_SETUP config = SETUP end begin prog = TuxIOme button = KEY_PLAYPAUSE config = PLAYPAUSE end begin prog = TuxIOme button = KEY_STOP config = STOP end begin prog = TuxIOme button = KEY_VOLUMEUP config = VOLUMEUP end begin prog = TuxIOme button = KEY_VOLUMEDOWN config = VOLUMEDOWN end </pre> △ 按造結論新改之 TuxIOme 初始版程式︰ <pre class="lang:python decode:true ">#!/usr/bin/python3 # -*- coding: utf-8 -*- import math import operator import string import threading import RPi.GPIO as GPIO GPIO.setmode(GPIO.BCM) GPIO.setwarnings(False) 開 = 亮 = 低 = 0 關 = 滅 = 高 = 1 from time import sleep import tpg if tpg.__python__ == 3: operator.div = operator.truediv raw_input = input def make_op(op): return { '加' : operator.add, '減' : operator.sub, '乘' : operator.mul, '除' : operator.div, '剩' : operator.mod, '^' : lambda x,y:x**y, '**' : lambda x,y:x**y, '餘弦' : math.cos, '正弦' : math.sin, '切弦' : math.tan, 'acos': math.acos, 'asin': math.asin, 'atan': math.atan, '平方' : lambda x:x*x, '根號': math.sqrt, '正值' : abs, 'norm': lambda x,y:math.sqrt(x*x+y*y), }[op] 數碼賦值 = [(滅, 亮, 亮, 滅, 滅, 滅, 亮, 滅), (滅, 滅, 滅, 滅, 亮, 亮, 亮, 滅), (滅, 亮, 亮, 滅, 滅, 滅, 亮, 滅), (滅, 滅,](https://www.freesandal.org/wp-content/ql-cache/quicklatex.com-f275ecc9a78d69680f9173d997d8aaa9_l3.png "Rendered by QuickLaTeX.com")
]
遲延 = 0.012
# 數碼管
四位數碼管位選一 = 17
四位數碼管位選二 = 27
四位數碼管位選三 = 22
四位數碼管位選四 = 10
LEDA = 21
LEDB = 16
LEDC = 19
LEDD = 6
LEDE = 5
LEDF = 20
LEDG = 26
LEDH = 13
# 初始態
GPIO.setup(四位數碼管位選一, GPIO.OUT, initial=關)
GPIO.setup(四位數碼管位選二, GPIO.OUT, initial=關)
GPIO.setup(四位數碼管位選三, GPIO.OUT, initial=關)
GPIO.setup(四位數碼管位選四, GPIO.OUT, initial=關)
GPIO.setup(LEDA, GPIO.OUT, initial=滅)
GPIO.setup(LEDB, GPIO.OUT, initial=滅)
GPIO.setup(LEDC, GPIO.OUT, initial=滅)
GPIO.setup(LEDD, GPIO.OUT, initial=滅)
GPIO.setup(LEDE, GPIO.OUT, initial=滅)
GPIO.setup(LEDF, GPIO.OUT, initial=滅)
GPIO.setup(LEDG, GPIO.OUT, initial=滅)
GPIO.setup(LEDH, GPIO.OUT, initial=滅)
def 數碼管執行緒():
global 數碼賦值
global 遲延
數碼管 = [LEDA, LEDB, LEDC, LEDD, LEDE, LEDF, LEDG, LEDH]
while True :
for 單元 in range(0,4):
if 單元 == 0 :
GPIO.output(四位數碼管位選一, 開)
GPIO.output(數碼管, 數碼賦值[單元])
sleep(0.002)
GPIO.output(四位數碼管位選一, 關)
if 單元 == 1 :
GPIO.output(四位數碼管位選二, 開)
GPIO.output(數碼管, 數碼賦值[單元])
sleep(0.002)
GPIO.output(四位數碼管位選二, 關)
if 單元 == 2 :
GPIO.output(四位數碼管位選三, 開)
GPIO.output(數碼管, 數碼賦值[單元])
sleep(0.002)
GPIO.output(四位數碼管位選一, 關)
if 單元 == 1 :
GPIO.output(四位數碼管位選二, 開)
GPIO.output(數碼管, 數碼賦值[單元])
sleep(0.002)
GPIO.output(四位數碼管位選二, 關)
if 單元 == 2 :
GPIO.output(四位數碼管位選三, 開)
GPIO.output(數碼管, 數碼賦值[單元])
sleep(0.002)
GPIO.output(四位數碼管位選三, 關)
if 單元 == 3 :
GPIO.output(四位數碼管位選四, 開)
GPIO.output(數碼管, 數碼賦值[單元])
sleep(0.002)
GPIO.output(四位數碼管位選四, 關)
sleep(遲延)
數碼緒 = threading.Thread(name="數碼", target=數碼管執行緒)
數碼緒.daemon = True
數碼緒.start()
數碼管輸出字典 = { "0" : (亮, 亮, 亮, 亮, 亮, 亮, 滅, 滅) ,
"1" : (滅, 亮, 亮, 滅, 滅, 滅, 滅, 滅) ,
"2" : (亮, 亮, 滅, 亮, 亮, 滅, 亮, 滅) ,
"3" : (亮, 亮, 亮, 亮, 滅, 滅, 亮, 滅) ,
"4" : (滅, 亮, 亮, 滅, 滅, 亮, 亮, 滅) ,
"5" : (亮, 滅, 亮, 亮, 滅, 亮, 亮, 滅) ,
"6" : (亮, 滅, 亮, 亮, 亮, 亮, 亮, 滅) ,
"7" : (亮, 亮, 亮, 滅, 滅, 滅, 滅, 滅) ,
"8" : (亮, 亮, 亮, 亮, 亮, 亮, 亮, 滅) ,
"9" : (亮, 亮, 亮, 亮, 滅, 亮, 亮, 滅) ,
}
def 輸出數碼管(數據) :
global 數碼賦值
global 數碼管輸出字典
if 數據 > 999.9 :
return "數值超過 999.9"
else:
字符串 = "%05.1f" %數據
for 單元 in range(0,5):
if 單元 == 0 :
數碼賦值[單元] = 數碼管輸出字典[字符串[單元]]
elif 單元 == 1 :
數碼賦值[單元] = 數碼管輸出字典[字符串[單元]]
elif 單元 == 2 :
暫列 = list(數碼管輸出字典[字符串[單元]])
暫列[7] = 亮
數碼賦值[單元] = tuple(暫列)
elif 單元 == 3 :
continue
else:
數碼賦值[單元 - 1] = 數碼管輸出字典[字符串[單元]]
return "完成"
GPIO.setup(11, GPIO.OUT, initial=GPIO.HIGH)
小哨子 = GPIO.PWM(11, 130.8)
def 啟動蜂鳴器():
小哨子.start(100)
return "蜂鳴器已啟動"
def 響聲控制(頻率):
小哨子.ChangeFrequency(頻率)
小哨子.start(50)
return 頻率
def 噤聲控制(頻率):
小哨子.ChangeFrequency(頻率)
小哨子.start(100)
return "噤聲"
def 控制蜂鳴器(op):
return {
'響聲' : 響聲控制,
'禁音' : 噤聲控制,
}[op]
def 輸入符碼(針碼):
return GPIO.input(針碼)
def 輸出符碼(針碼, 賦值):
GPIO.output(針碼, 賦值)
return "輸出" + str(賦值)
def 出入定義(針碼, 入出):
if 入出 == "出" :
GPIO.setup(針碼, GPIO.OUT, initial = GPIO.HIGH)
else:
GPIO.setup(針碼, GPIO.IN, pull_up_down = GPIO.PUD_UP)
return "定義完成"
def 出針定義(針碼):
GPIO.setup(針碼, GPIO.OUT, initial = GPIO.HIGH)
return "定義輸出完成"
def 入針定義(針碼):
GPIO.setup(針碼, GPIO.IN, pull_up_down = GPIO.PUD_UP)
return "定義輸入完成"
def 入出針定義(op):
return {
'入針' : 入針定義,
'出針' : 出針定義,
}[op]
import subprocess
重複次數 = 1
def 紅外線輸出(字碼):
global 重複次數
subprocess.call(['irsend', 'SEND_ONCE', '/home/pi/lircd.conf', 字碼,"--count=" +str(重複次數) ])
return "已送出"
import lirc
sockid = lirc.init("TuxIOme", blocking=False)
def 紅外線輸入():
return lirc.nextcode()
def 讀取系統溫度():
t = subprocess.check_output(['vcgencmd', 'measure_temp'])
T = t.decode('utf-8')
Tb = T.find('=')
Te = T.find("'")
return float(T[Tb + 1 : Te])
class 實習機板(tpg.Parser, dict):
r"""
此為實習基板入出針語言 TuxIOme 初始版，自 Calc.py 擴充而來。由於使用中文之故，
不能使用預設的 NamedGroupLexer 。
文法定義如下 ::
set lexer = CacheLexer
separator space '\s+' ;
token 指數運算 '\^|\*\*' 
入出針定義
token 聲音控制 '(響聲|禁音)\b' ![控制蜂鳴器 token 加減運算 '[加|減]'](https://www.freesandal.org/wp-content/ql-cache/quicklatex.com-30f067b8f8503ec60d5c9a6427963b8b_l3.png "Rendered by QuickLaTeX.com")
make_op
token 乘除運算 '[乘|除|剩]' 
make_op
token 函數二 '(norm)\b' ![make_op token real '(\d+\.\d*|\d*\.\d+)([eE][-+]?\d+)?|\d+[eE][-+]?\d+'](https://www.freesandal.org/wp-content/ql-cache/quicklatex.com-5c95b40a28c7e5a1b07cc044ba7a36b2_l3.png "Rendered by QuickLaTeX.com")
float
token integer '\d+' 
e=self.記憶()
| VarId/v '=' Expr/e ![self[v]=e | Expr/e # | '定義' Expr/p '出'](https://www.freesandal.org/wp-content/ql-cache/quicklatex.com-2d6cebe7d294f3c4942510e9ad81ab31_l3.png "Rendered by QuickLaTeX.com")
e=出入定義(p, '出')
# | '定義' Expr/p '入' 
e=op(p)
| '讀入' Expr/p 
e=輸出符碼(p, 0)
| '寫出' Expr/p '關' 
e=啟動蜂鳴器()
| "蜂鳴器" 聲音控制/op Expr/p 
e = 輸出數碼管(p)
| "IRTX" VarId/s 
e = 紅外線輸入()
| "系統溫度" 
self.get(v,0)
e=op(e,t)
)*
;
Term/t -> Fact/t ( 乘除運算/op Fact/f 
f=op(0,f)
| Pow/f
;
Pow/f -> Atom/f ( 指數運算/op Fact/e 
y = f(x)
| 函數二/f '
' $ y = f(x1,x2)
;
"""
def __init__(self):
super().__init__()
self.名稱 = "實習機板"
self["一藍"] = 5
self["二藍"] = 6
self["三藍"] = 13
self["四藍"] = 19
self["五綠"] = 0
self["六綠"] = 1
self["七黃"] = 7
self["八紅"] = 8
self["按鍵一"] = 23
self["按鍵二"] = 18
self["撥碼一"] = 24
self["撥碼二"] = 25
def 記憶(self):
vars = sorted(self.items())
memory = [ "%s = %s"%(var, val) for (var, val) in vars ]
return "\n\t" + "\n\t".join(memory)
print("Calc (TPG example)")
實習機 = 實習機板()
while 1:
try:
l = raw_input("\n:")
except UnicodeDecodeError:
continue
if l:
try:
print(實習機(l))
except Exception:
print(tpg.exc())
else:
break
# 數碼緒._stop()
GPIO.cleanup()
-> VarId/v ;
Expr/e -> Term/e ( 加減運算/op Term/t 
t=op(t,f)
)*
;
Fact/f ->
加減運算/op Fact/f 
f=op(f,e)
)?
;
Atom/a ->
real/a
| integer/a
| Function/a
| Var/a
| '
y = f(x1,x2)
;
"""
def __init__(self):
super().__init__()
self.名稱 = "實習機板"
self["一藍"] = 5
self["二藍"] = 6
self["三藍"] = 13
self["四藍"] = 19
self["五綠"] = 0
self["六綠"] = 1
self["七黃"] = 7
self["八紅"] = 8
self["按鍵一"] = 23
self["按鍵二"] = 18
self["撥碼一"] = 24
self["撥碼二"] = 25
def 記憶(self):
vars = sorted(self.items())
memory = [ "%s = %s"%(var, val) for (var, val) in vars ]
return "\n\t" + "\n\t".join(memory)
print("Calc (TPG example)")
實習機 = 實習機板()
while 1:
try:
l = raw_input("\n:")
except UnicodeDecodeError:
continue
if l:
try:
print(實習機(l))
except Exception:
print(tpg.exc())
else:
break
數碼緒._stop()
GPIO.cleanup()
