[過去ログ]
マイクロスイッチ仕様のマウス 総合スレ (1002レス)
マイクロスイッチ仕様のマウス 総合スレ http://mevius.5ch.net/test/read.cgi/hard/1171295410/
上
下
前
次
1-
新
通常表示
512バイト分割
レス栞
このスレッドは過去ログ倉庫に格納されています。
次スレ検索
歴削→次スレ
栞削→次スレ
過去ログメニュー
124: 不明なデバイスさん [sage] 2016/07/14(木) 20:17:49.11 ID:huExdvtu proc tvval {b} {join [dict values [.tv set $b]] ", "} proc tvcsv0 {} {join [lmap b [n5] {tvval $b}] "\n"} proc tvcsv {} {join [list [join [cols] ", "] [tvcsv0]] "\n"} proc mult {i} {lindex {Button Double Triple Quadruple} [expr $i-1]} set multPrev 0 proc setP {m} {global multPrev; set multPrev $m} proc mP {} {global multPrev; return $multPrev} proc tvAdd {ic b n} {set v [.tv set $b $ic]; .tv set $b $ic [expr $v+$n]} proc p1 {b} {tvAdd Total $b 1; setP 1} proc p2 {b} {tvAdd Double $b 1; setP 2} proc p3 {b} {if {[mP]!=3} {tvAdd Triple $b 1; tvAdd Double $b -1}; setP 3} proc p4 {b} {if {[mP]!=4} {tvAdd Quadruple $b 1; tvAdd Triple $b -1}; setP 4} proc bindl {b m} {bind .l <[mult $m]-$b> "eval p$m $b"} foreach {b} [n5] {foreach {m} [n4] {bindl $b $m}} http://mevius.5ch.net/test/read.cgi/hard/1171295410/124
メモ帳
(0/65535文字)
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 878 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
Google検索
Wikipedia
ぬこの手
ぬこTOP
0.187s*