@name Binary Clock @inputs OsTime @outputs PM @outputs Hour1 Hour2 Hour3 Hour4 @outputs Min1 Min2 Min3 Min4 Min5 Min6 @outputs Sec1 Sec2 Sec3 Sec4 Sec5 Sec6 @persist @trigger local Seconds = OsTime % 60 local Minutes = int(OsTime / 60) % 60 local Hours = int(OsTime / 60 / 60) % 12 Sec1 = Seconds % 2 Sec2 = int(Seconds / 2) % 2 Sec3 = int(Seconds / 4) % 2 Sec4 = int(Seconds / 8) % 2 Sec5 = int(Seconds / 16)% 2 Sec6 = int(Seconds / 32) % 2 Min1 = Minutes % 2 Min2 = int(Minutes / 2) % 2 Min3 = int(Minutes / 4) % 2 Min4 = int(Minutes / 8) % 2 Min5 = int(Minutes / 16)% 2 Min6 = int(Minutes / 32) % 2 Hour1 = Hours % 2 Hour2 = int(Hours / 2) % 2 Hour3 = int(Hours / 4) % 2 Hour4 = int(Hours / 8) % 2 PM = Hours >= 12
Month: February 2014
wiremod 7 segments display codec
@name 7segments counter @inputs Digit @outputs A B C D E F G @trigger Digit = int(Digit % 10) if (Digit == 0) { A = 1 B = 1 C = 1 D = 1 E = 1 F = 1 G = 0 } elseif (Digit == 1) { A = 0 B = 1 C = 1 D = 0 E = 0 F = 0 G = 0 } elseif (Digit == 2) { A = 1 B = 1 C = 0 D = 1 E = 1 F = 0 G = 1 } elseif (Digit == 3) { A = 1 B = 1 C = 1 D = 1 E = 0 F = 0 G = 1 } elseif (Digit == 4) { A = 0 B = 1 C = 1 D = 0 E = 0 F = 1 G = 1 } elseif (Digit == 5) { A = 1 B = 0 C = 1 D = 1 E = 0 F = 2 G = 1 } elseif (Digit == 6) { A = 1 B = 0 C = 1 D = 1 E = 1 F = 1 G = 1 } elseif (Digit == 7) { A = 1 B = 1 C = 1 D = 0 E = 0 F = 1 G = 0 } elseif (Digit == 8) { A = 1 B = 1 C = 1 D = 1 E = 1 F = 1 G = 1 } elseif (Digit == 9) { A = 1 B = 1 C = 1 D = 1 E = 0 F = 1 G = 1 }
수강신청 매크로
#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases.
; #Warn ; Enable warnings to assist with detecting common errors.
SendMode Input ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
buffer := ""
Counter := 0
Loop, read, data.txt
{
Loop, parse, A_LoopReadLine, %A_Tab%
{
buffer .= A_LoopField . A_Tab
}
Counter += 1
}
While(Counter < 30)
{
buffer .= A_Tab . A_Tab
Counter += 1
}
buffer .= A_Tab . A_Space
^!1:: Send, %buffer%
Usage
put data in “data.txt” like this:
300012 11 120042 12 381638 01
Download & run this file and press Ctrl+Alt+1 to make keystrokes.