moguno’s gists

moguno / キテレツ.vbs

Last active September 21, 2023 12:46

xlsxファイルをドラッグアンドドロップするだけで初期セル位置をA1に移動させるWSHスクリプト

	Dim objExcel
	Set objExcel = CreateObject("Excel.Application")

	Dim objBook
	Set objBook = objExcel.Workbooks.Open(WScript.Arguments(0))

	Dim objSheet
	For Each objSheet In objBook.WorkSheets
	objSheet.Cells(1, 1).Select()
	Next

moguno / misaki.py

Last active July 27, 2017 22:38

Raspberry piのScroll pHAT HDで美咲フォント（FONTX2形式：全角）を使えるようにする。

	# 美咲フォント(7x7ドット)を、Scroll pHAT HDの公式ライブラリで使えるフォントデータに変換します。
	# ---------------------
	# 美咲フォント（FONTX2形式）をあらかじめダウンロードして展開しておく。
	# misakiをインポートする。
	# write_string()のfontにmisakiを指定する。
	import struct
	import string
	import io

	# FONTX2形式のビットマップをScroll pHAT HD形式に変換する

moguno / mikutter-んほぉぉ！イッぐぅぅ！！.rb

Last active May 2, 2017 02:09

	Plugin.create(:"mikutter-んほぉぉ！イッぐぅぅ！！") {
	on_gui_timeline_add_messages { \|widget, messages\|
	Thread.new {
	messages.each { \|_\|
	message = _.message.to_s.gsub("\n", "")

	if (message =~ /\&lt\;script/) && (message =~ /alert$\"([^\"]+)\"$/)
	んほぉぉ！ = $1

	Delayer.new {

moguno / mikutter-vivaldi.rb

Last active February 22, 2017 14:21

	Plugin.create(:"mikutter-vivaldi") {
	eval(%w( G
	t
	k:
	:o
	p e
	n u
	r
	l " h
	t

moguno / mikutter-datasource-akkie-new-house.rb

Created November 14, 2016 16:02

あっきぃさんちを流すmikutterデータソースプラグイン

	Plugin.create(:mikutter_datasource_akkie_new_house) {
	filter_extract_datasources { \|datasources\|
	datasources[:mikutter_datasource_akkie_new_house] = _("あっきぃさんち")

	[datasources]
	}

	on_period { \|service\|
	if service == Service.primary
	if Time.now.min % 5 == 0

moguno / mikutter-command-follow.rb

Last active November 5, 2016 04:31

選択したメッセージ作者をﾌｮﾛｰするmikutterコード片

	Plugin.create(:"mikutter-command-follow") {
	command(:follow,
	:name => _("ﾌｮﾛｰする"),
	:condition => lambda { \|opt\| Plugin::Command[:HasMessage] },
	:visible => true,
	:role => :timeline) { \|opt\|
	opt.messages.each { \|msg\|
	if msg && msg.user
	Service.primary.follow(:user_id => msg.user.id)
	end

moguno / translate_query_to_google.rb

Created January 19, 2016 15:42

mikutterでTLをGoogle翻訳するやつ。

	#coding: utf-8

	Plugin.create(:"translate_query_to_google") {
	require "cgi"

	command(:translate_query_to_google,
	name: _('グーグルで翻訳'),
	condition: Plugin::Command[:HasOneMessage],
	visible: true,
	role: :timeline) { \|opt\|

Last active December 28, 2015 22:43

	Plugin.create(:"yoi otoshi wo") {
	on_boot { \|service\|
	if service == Service.primary
	if UserConfig[:activity_kind_order].is_a?(Symbol)
	UserConfig[:activity_kind_order] = ["retweet", "favorite", "follow", "list_member_added", "list_member_removed", "dm", "system", "ratelimit", "streaming_status error"]
	end
	end
	}
	}

moguno / gist:0abc175584bdeee6d420

Created July 11, 2014 12:43

今まで謎だったあのボタンはまっくろくろすけだったプラグイン

	Plugin.create(:kurosuke) {
	class Gdk::MiraclePainter
	def iob_etc_clicked
	Delayer.new {
	Plugin[:kurosuke].timeline(:home_timeline) << Message.new(:message => "「とった！　おねえちゃーん！」", :system => true)
	}
	end
	end
	}

moguno / gist:f2e10c805d93faff9b07

Last active September 8, 2015 12:15

みくったーたいふーんー気象庁のAPIを使って最新の台風18号情報をお伝えしますー

	#coding: UTF-8

	require "net/http"
	require "json"


	chaban = File.join(CHIConfig::PLUGIN_PATH, "change_account", "interactive.rb")

	if File.exist?(chaban)
	require chaban