Bye Bye Moore

PoCソルジャーな零細事業主が作業メモを残すブログ

2019-07-01から1ヶ月間の記事一覧

uLispでSDカードをつかう その2:読み込みとeval

実際のところ 読み込み自体は、I2C等他のインターフェースと同様、 read関数で読み込み可能です。ここで、SDカード内に以下のような単純なS式を内包した "automode.ulisp"というファイルを用意します。 (+ 1 2) こいつを読み込んで、evalする自作のload関数…

uLispでSDカードをつかう その1:準備と書き込み

実際のところ まず、 // Compile options // #define resetautorun #define printfreespace #define serialmonitor // #define printgcs // #define sdcardsupport // #define lisplibrary これの"#define sdcardsupport"を有効にします。 // Compile option…

【しらべもの】在宅医療について

在宅医療という分野について、しらべものをしたのでログに残しておきます。 実際のところ 医療業界では「2025年問題」といって、団塊世代が75歳の後期高齢者が5人に1人という割合になる状況が重大な問題として議論されています。というのも、後期高…

【読書メモ】人間の許容限界事典

人間の許容限界事典発売日: 2005/10/01メディア: 大型本図書館の貸出禁止コーナーにドッカリと置かれた、実にマニアックな本。 そのまま表題通り、人間のハードウェア面を中心に、どういうパターンで負荷かけたら壊れる./死ぬか列記してあるコワイ本です。 …

【読書メモ】 スタートアップ・バイブル シリコンバレー流・ベンチャー企業のつくりかた

スタートアップ・バイブル シリコンバレー流・ベンチャー企業のつくりかた作者: アニス・ウッザマン出版社/メーカー: 講談社発売日: 2013/09/06メディア: 単行本(ソフトカバー)この商品を含むブログ (1件) を見る

【未来2020】未来2020説明会・懇親会に行って来ました

参考もと 【未来2020】未来2020説明会・懇親会(w/未来OB・IIIコンソーシアムメンバ)を開催します|日本最大級のピッチコンテスト

uLispでWiFiにつなぐ

(wifi-connect "yourSSID" "yourPASS") 参考もと uLisp - Wi-Fi extensions uLisp - Wi-Fi examples

consp関数でリストの中身が空か確認する

listかどうかを判定する関数はlistpですが、 リストが空かどうかを判定するconsp関数もあります。 実際のところ (consp '(1 2)) ;; t (consp nil) ;; nil (consp '()) ;; nil 参考もと uLisp - Testing a result

【イベントログ】「在宅医療QOLコラボレーション:帝人ファーマ×アドライト アクセラレータープログラム」に行ってきました

【7/23 東京・大手町】「在宅医療QOLコラボレーション:帝人ファーマ×アドライト アクセラレータープログラム」説明会開催のお知らせ | 在宅医療QOLコラボレーション:帝人 ファーマ×アドライト アクセラレータープログラム 医療系ベンチャーアクセラレータ…

macar関数

mapcar関数はリストに対し特定の命令を連続して実行して新しいリストを用意する関数です。 実際のところ (mapcar - '(4 5 6) '(1 2 3) ) ;; (3 3 3) 二つ目のリストを省略し、lambdaを使うことも 1213> (mapcar (lambda (x) (+ x 1)) '(1 2 3 4 5)) ;; (2 3 …

【読書メモ】会社を辞めずに収入を月50万円増やす! 小さく始めて成功させる「自分ビジネス」

会社を辞めずに収入を月50万円増やす! 小さく始めて成功させる「自分ビジネス」作者: 船ヶ山哲出版社/メーカー: 集英社発売日: 2019/07/05メディア: 単行本この商品を含むブログを見る50代のセミリタイア組をターゲットにしているようです。 著者の船ヶ山…

【読書メモ】日本とフランス「官僚国家」の戦後史

日本とフランス 「官僚国家」の戦後史 (NHKブックス No.1245)作者: 大嶽秀夫出版社/メーカー: NHK出版発売日: 2017/03/23メディア: 新書この商品を含むブログを見る日本の官僚機構の優秀さと硬直性は世界でも割と有名です。 遠く欧州はフランスでも、同じよ…

uLispのapply関数の中で">"や"<"を使うと……???

apply function Syntax: (apply function list)Returns the result of evaluating the function specified by the first argument with the list of arguments specified by the second parameter. 実際のところ (apply > '(0) ) ; t (apply > '(1) ) ; t (a…

uLispのsave-imageとload-image

実際のところ uLisp 2.7 1213> (defun myadd (val) (+ val 2)) myadd 1199> (myadd 23) 25 このmyaddを初期状態で含んだイメージとして保存しときます。 1199> (save-image) 25 ここでリセットを押すと……一旦消されるので、 先ほどの関数は無効になっていま…

uLispでUTF-8な文字を扱う

やってきたUTF-8な文字を取り扱います。 実際のところ 文字に変換 1213> (code-char 41) #\) 1213> (code-char 42) #\* 1213> (code-char #x41) #\A 数値からUTF-8へ 1213> (char-code #\A) 65 制御文字の置き換えも可能。 使える文字は Null, SOH, STX, ETX…

uLispまでビットシフト

実際のところ uLisp 2.7 1213> (ash 2 3) 16 後ろに倒すことも 1213> (ash 16 -3) 2 参考もと uLisp - Language reference

【読書メモ】 問題解決大全――ビジネスや人生のハードルを乗り越える37のツール

問題解決大全――ビジネスや人生のハードルを乗り越える37のツール作者: 読書猿出版社/メーカー: フォレスト出版発売日: 2017/11/19メディア: 単行本この商品を含むブログ (13件) を見る

【読書メモ】 最初のペンギン ストーリーでわかる! らくらく外国語習得術

最初のペンギン ストーリーでわかる! らくらく外国語習得術作者:杉原 洋紀,堀口 美奈発売日: 2013/10/30メディア: 単行本(ソフトカバー)タイトルは初見だと自己啓発風ですが、実際には言語学の本です。エスニック料理店や出先での対話形式という体で、言語…

【読書メモ】言語学の考え方

外国語を学ぶための 言語学の考え方 (中公新書)作者: 黒田龍之助出版社/メーカー: 中央公論新社発売日: 2016/02/24メディア: 新書この商品を含むブログ (13件) を見る中公新書から出ている、言語学入門の本です。 黒田龍之介先生の別の本を読んだので、もう…

【イベントログ】FOOMA Japan 2019に行ってきました

www.foomajapan.jp 食品工業の展示会、FOOMA Japan 2019にいってきました。 今回はロボット盛りだくさん。 ……レベルはピンキリでしたね(ボソっ

"read-from-string"で文字列をアトム/リストとして

Lispの強みといえば、S式です。 これをシリアル経由で取得できれば外部のつよつよデバイスで計算したS式を手元で受け取り評価という脳汁出る動きができます。 実際のところ 文字列で記述された要素を変数aにぶち込んでみます。 1213> (defvar a "(* 7 8)") a…

uLispの"let"と"let*"の違い

uLispの"let"と"let*"の違い 実際のところ letはローカル変数を定義する関数です。 ただ、uLispにおいては関数定義の外に結果を出す場合にもエラーを吐かれます。 (defun tst () (let ((a 7) (b a)) (print a) (print b))) 実行すると uLisp 2.7 1213> (defu…

subseq関数で文字列を切り出す

uLispの関数 文字列 実際のところ (subseq string start [end]) Lisp的に書くと…… (defun day (d) (subseq "MonTueWedThuFriSatSun" (* 3 d) (* 3 (1+ d)))) 実行するとこんな塩梅 uLisp 2.7 1213> (defun day (d) (subseq "MonTueWedThuFriSatSun" (* 3 d) …

Arduino UNO系でも動くLISP実装 uLISP その5:obnizでシリアル通信をうける

実際のところ obniz側 <html> <head> <meta charset="utf-8"> <meta name="viewport" content="width=device-width, initial-scale=1"> <script src="https://obniz.io/js/jquery-3.2.1.min.js"></script> <script src="https://unpkg.com/obniz@2.2.0/obniz.js" crossorigin="anonymous"></script> </head> <body> </body></html>

【読書メモ】習慣の力

習慣の力 The Power of Habit (講談社+α文庫)作者: チャールズ・デュヒッグ,渡会圭子出版社/メーカー: 講談社発売日: 2016/02/19メディア: 文庫この商品を含むブログを見るタイトルの通り、習慣に関する本です。 このブログや中国語学習が何やかんやで続いて…

【読書メモ】2日で人生が変わる「箱」の法則 決定版 人間関係のモヤモヤを解決するために

2日で人生が変わる「箱」の法則 決定版 人間関係のモヤモヤを解決するために作者: アービンジャー・インスティチュート,門田美鈴出版社/メーカー: 祥伝社発売日: 2017/06/02メディア: 単行本(ソフトカバー)この商品を含むブログを見る海外の本でよくある、…

【イベントログ】インターフェックスWeek2019に行ってきました

医薬産業向けの展示会インターフェックスWeek2019に行ってきました。展示会の性質上、他のイベント以上に撮影禁止が多かったです……。 動画撮った程度で漏れる内容なら出すなって個人的には思っちゃいますね。定量滴下機 組み立て式冷蔵倉庫 医療向けロボット…

Arduino UNO系でも動くLISP実装 uLISP その4:obnizからシリアル通信を送る

実際のところ ポート的に限界があるため、Mega系列のシリアル2番を使いました。 obniz側 <html> <head> <meta charset="utf-8"> <meta name="viewport" content="width=device-width, initial-scale=1"> <script src="https://obniz.io/js/jquery-3.2.1.min.js"></script> <script src="https://unpkg.com/obniz@2.2.0/obniz.js" crossorigin="anonymous"></meta></meta></head></html>

Arduino UNO系でも動くLISP実装 uLISP その3:シリアル通信をやる

お ま た せ。 シリアル通信をやります。 実際のところ シリアル通信はこんな構文 (with-serial (stream port [baud]) form*) というわけで……ストリームを"str"にいれて、Portは0番を使い、ボーレートは115200……のときは以下の通り。 (with-serial (str 0 1…

Arduino UNO系でも動くLISP実装 uLISP その2:Digital/Analog Pinを扱う

Arduinoの上で動いているので、DigitalやAnalogも使えます。 公式リファレンスによると以下のような関数があります。 Arduino interface millis, for-millis, with-i2c, restart-i2c, with-serial, with-spi, with-sd-card, pinmode, digitalread, digitalwr…