2018-07-26

温度によって、ダイキンエアコンを制御したい。

赤外線センサーPL-IRM2121 (38kHz)のつなぎ方

qiita.com
ダイキンエアコンは101バイト超以上のコードが出力されているので、下記ブログの
ダンパーを使用して見ました。
hawksnowlog.blogspot.com

赤外線LEDの電流制限抵抗

５ｍｍ赤外線ＬＥＤ　９４５ｎｍ　ＳＬＲ－９３８ＣＶ－Ａというものを秋月で購入。
1.3V 50mAの赤外線LEDに入れる抵抗値
5-1.3/0.05=74Ω

制御できないす。

扇風機は制御できたのですが、エアコンはうまくできませんでした。
色々と信号が行き来しているかもしれないし。LEDの出力が足りないかもしれない。

デジタル3番ピン

40mAしか、電流が取り出せない。波のある出力なので、（1/3換算するとして)赤外線LEDを駆動するには若干非力かも。
トランジスタの増幅回路を組む必要があるようなので2N5088というのを使っている回路で勉強。
再度秋月で購入。もっと下調べしないとダメだなぁ。送料が・・
www.pinterest.co.uk

トランジスタ入れて見たが

増幅しようとトランジスタ入れて見たが・・LEDが壊れてしまったようです。

他にもサインを計測する方法が

mag.switch-science.com

4009.jp

もうダメか・・

再度LED注文中。。

そんな感じです。

やっぱり動かない。

信号が、上手く再現されていないんだろうなぁ。

mixi.jp

qiita.com

2018-07-19

今流行のAIではない俳句ジェネレーター。「俳人さん」のアルゴリズムの全貌

https://haijinsan.dokechin.com/

適当なアルゴリズムの全貌を紹介。

上五

現在月から適当に季語のリストの中からランダムに選ぶ。

function getKami(){
    var date = new Date();
    var month = date.getMonth();
    var kamis = [];

    if (month == 0 ) {
        kamis.push("新年の", "寒月の");
    } else if ( month == 1) {
        kamis.push("梅が香に", "寒明し");
    } else if ( month == 2) {
        kamis.push("暖かき", "啓蟄の");
    } else if ( month == 3) {
        kamis.push("清明の", "春眠の");
    } else if ( month == 4) {
        kamis.push("薫風の", "夏めくや");
    } else if ( month == 5) {
        kamis.push("夏至の日に", "六月の");
    } else if ( month == 6) {
        kamis.push("七月の", "梅雨明けや");
    } else if ( month == 7) {
        kamis.push("八月の", "真夏日の");
    } else if ( month == 8) {
        kamis.push("長月の", "夏彼岸");
    } else if ( month == 9) {
        kamis.push("十月の", "秋の日の");
    } else if ( month == 10) {
        kamis.push("霜月の", "落ち葉降る");
    } else if ( month == 11) {
        kamis.push("数え日の", "十二月");
    }   
    index = Math.floor(Math.random() * 2)
    return kamis[index];
}

中七

Azure Vision APIに画像を投げて、画像を要約した日本語を取得。Yahoo 形態素 APIに投げて、
形容詞＋名詞の部分を抽出して中７とする。形容詞だったら１、名詞だったら７とマッピングしておいて正規表現17でサーチをかけるようにした。

「白い新聞」のように７文字なら、そのまま。
「白い水菜」のように6文字なら、「よ」を後ろに足して、「白い水菜よ」にして７文字とする。
「白いシャツ」のように５文字なら、「その」を前に足して、「その白いシャツ」にして７文字とする。
「白い酢」のように４文字なら、「その」を前に足して、「や」を後ろに足して、「その白い酢や」にして７文字とする。

形容詞＋名詞がなかったら、「今日思い入る」と入れる。
形容詞＋名詞が複数あったら、ランダムで選択する。

座五

Azure Vision APIの結果で、タグが配列で帰るので、Yahoo形態素 APIに配列を文字列に展開して、呼び出し。
形容詞だけにフィルタリング。「若い」のように末尾の「い」を「さ」に変える。

３文字だったら「かな」を足して、５文字にする。例。「若さかな」
５文字だったら。そのまま代入。「美しい」→「美しい」

形容詞がなかったら、「朝ぼらけかな」にする。
形容詞が複数あったら、ランダムで選択する。

async await

Azure Vision APIとYahoo形態素 APIは共にAxiosで呼び出し。promise baseなAPIとなっている。
Yahoo形態素 APIの結果はxmlが帰ってくる、xmlだと扱いが面倒なので、jsonへ変換。
変換部分はxml-to-json-promiseモジュールを利用。これもpromise baseなAPIとなっている。
全部promisebaseに寄せれば、async awaitを利用できて、スッキリ書ける。
async functionも非同期なので、promiseベースなんだなぁと発見した。

2018-07-11

M5Stack

ここにインストール方法がまとまっていました！
M5Stack Documentation

あとは、セキュリティブロックの解除が必要でした
ESP32 > M5Stack > Hello world!

2018-07-08

Parserについて勉強したい

Parserについて

Perl で簡単にパーザを書く - tokuhirom's blog
パーサー
 再帰下降構文解析で電卓プログラムを実装する - embryo

式(expression)、項(term)、因子(factor)と呼ぶのかぁ。

BNF

http://www.klab.is.sci.toho-u.ac.jp/classes/images/6/64/CompProg20140423.pdf

Bool用Parserに変えて見る

下記のような真偽値をパースするパーサを作って見る。

1 | 1 & 0

ほぼ、元の四則演算そのものなんですが・・
＆の優先順位が｜よりも高いので、除算のところを＆にして、加算のところを|にして見ました。
あとは0の扱いに注意が必要でundefだとエラーにしました。
計算する部分も実装して見ました。

use 5.018000;

package Calc {
    use Carp ();

    sub parse {
        local $_ = $_[1];

        _parse_expr();
    }

    sub err {
        my ($msg) = @_;
        my $ret = join('',
            $_, "\n",
            (" " x pos()) . "^\n",
            $msg, "\n",
        );
        Carp::croak $ret;
    }

    sub _parse_expr {
        my @nodes;
        until (/\G\s*\z/gc) {
            my $m = _parse_add()
                or do {
                err "Syntax error";
            };
            push @nodes, $m;
        }
        return ['expr', @nodes];
    }

    sub _parse_add {
        my $mul = _parse_mul()
            or return undef;
        while (m{\G\s*(\|)}gc) {
            my $op = $1;
            my $lhs = _parse_mul()
                // die "Cannot parse mul after '$op' : " . pos();
            $mul = [$op, $mul, $lhs];
        }
        return $mul;
    }

    sub _parse_mul {
        my $node = _parse_term()
            // return undef;
        while (m{\G\s*(\&)}gc) {
            my $op = $1;
            my $lhs = _parse_term() // 
                die "Cannot parse expr after '$op' : " . pos();
            $node = [$op, $node, $lhs];
        }
        return $node;
    }

    sub _parse_term {
        if (/\G\s*([01])/gc) {
            return $1;
        } elsif (/\G\s*\(/gc) {
            my $expr = _parse_add();
            /\G\s*\)/gc
                or err "No closing paren after opening paren.";
            return $expr;
        }
        return undef;
    }

    sub execute {
        $DB::single = 1;
        my $node = $_[1][1];
        if (ref($node)) {
            return _execute($node);
        } else {
            return $node;
        }
    }

    sub _execute {
        my $node = shift;
        my $ope = $node->[0];
        my $left = $node->[1];
        my $right = $node->[2];
        if (ref($right)) {
            my $right = _execute( $right );
        }
        if ( $ope eq "&" ) {
            if ( $left == 1 && $right == 1 ) {
                return 1;
            }
            return 0;
        } else {
            if ( $left == 1 || $right == 1 ) {
                return 1;
            }
            return 0;
        }
    }
}

my $node = Calc->parse('1|1&0');
use Data::Dumper; warn Dumper($node);
warn Calc->execute($node);

2018-07-06

shibuya.pm テクニカルトーク#18に参加しました。

レベルが高いトークが聞けて、刺激を受けた。すごいなぁ。。

まぁ、でも、敷居は下げつつ、１mmでも近ずけるようになりたいものです。

2018-06-19

vue-cli(Webpack)のサーバーサイドを8080ポートnode(express)で3000ポートで開発したいのですが404

vueのajax部分(axios)

      this.canvas.toBlob(function (blob) {
        axios.post('./api',
          {data: blob},
          {
            headers: { 'content-type': 'multipart/form-data' },
            params: {
            }
          }
        )
      })

vueのindex.js(リバースプロキシの設定）

    proxyTable: {
      '/api': {
        target: 'http://localhost:3000',
        changeOrigin: true
      }
    },

なぜかpostで投げると404,getにすると200が帰る。
getでもデータ送れるのかな？

# 結局原因は・・・
express側の記述がgetだったので、postを受け取れなかっただけでした。
情けない・・

2018-06-16

格安心拍計を試す

AliexpressでXD-58Cと検索すると最安値1.8$で売っていた心拍センサーが届いたので
早速試して見た。

f:id:kechiya:20180616202443j:plain

スケッチ＞ライブラリをインクルード＞ライブラリを管理を開いて、
検索をフィルタのテキストボックスにPulseSensorと入力して
インストール。

ファイル＞スケッチの例＞PulseSensor PlayGroud>PulseSensor_BPMを開いて、
loop関数を以下のように書き換える

void loop() {
  delay(20);
  Serial.print("test");
  Serial.print("\t");
  Serial.println(pulseSensor.getBeatsPerMinute());
  Serial.flush();
}

github.com

問題

値は取れたのでOKだけれども。基盤むき出しで、指に巻きつけるものも何もついていないので
なんとかしないと。

鈍足ランナーのＩＴ日記

走るのが好きな5流のＩＴエンジニアのブログ。