[Date Prev] [Date Index] [Date Next]
[Thread Prev] [Thread Index] [Thread Next]

[xyzzy:05913] xyzzyから偽春菜への sstp 送信



デスクトップアクセサリーで「偽春菜」と呼ばれているソフトがあるのですが、
xyzzyからsstp通信で偽春菜におしゃべりさせる事が出来ました。
こんな感じです。

(defun sstp-send(script &optional arg)
  (let (s status)
    (setq s (connect "127.0.0.1" "11000"))
    (format s "SEND SSTP/1.0~%")
    (format s "Sender: xyzzy~%")
    (format s "Script: ~A\\e~%" script)
    (if arg
        (format s "Option: ~A~%" arg))
    (format s "~%")
    (setq status (read-line s nil))
    (close s)
    status))


こんな風にすると、

(sstp-send "\\hこんにちは。\\e")

ふきだしに「こんにちは。」と出てきます。
xyzzyで何かの操作をした時に偽春菜にメッセージを言わせたりなど、いろいろ
お遊びが出来そうですね。

偽春菜を知らない人、興味がない人ごめんなさい。
大変失礼いたしました。


田家 守一

Index Home