Skip to content

Instantly share code, notes, and snippets.

Input =
(
$.O...O...
...O......
..........
O..O..O...
..........
O..O..O...
..........
......OO..
#SingleInstance, Force
#NoEnv
SetBatchLines, -1
SetMouseDelay, 2
CoordMode, Mouse, Screen
; Start gdi+
If !pToken := Gdip_Startup()
{
MsgBox, 48, gdiplus error!, Gdiplus failed to start. Please ensure you have gdiplus on your system
Input =
(LTrim0 C
60 30
'"^+$
linear 30 30 0 0
)
Gui, Font,, Courier New
Gui, Add, Edit, w640 h480, % GenerateGradient(Input)
Gui, Show
// ==UserScript==
// @name Code box to CodeQuickTester
// @namespace https://github.com/G33kDude
// @version 0.6
// @description Adds a button to open AHKScript code boxes in CodeQuickTester
// @author GeekDude
// @match *://autohotkey.com/boards/viewtopic.php*
// @grant none
// @updateURL https://gist.github.com/G33kDude/d3d9e4fd7c739dab3527/raw/CodeBox2QuickTest.user.js
// ==/UserScript==
@G33kDude
G33kDude / BinClock.ahk
Created March 13, 2015 02:22
Binary clock
On := "●"
Off := "○"
Blank := " "
Gui, Color, Black
Gui, font, s12 cRed, Courier New
Gui, Add, Text, vDisplay, % MakeDisplay(On, Off, Blank)
Gui, +ToolWindow +E0x40000 +AlwaysOnTop
Gui, Show,, BinClock
SetTimer, UpdateDisplay, 1000
#NoEnv
SetBatchLines, -1
Input := "13 743"
Start := A_TickCount
for each, Link in FindChain([2, 1], StrSplit(Input, " ")*)
Out .= ", " Link
Elapsed := A_TickCount - Start
MsgBox, % SubStr(Out, 3) "`n" Elapsed "ms"
#NoEnv ; Don't try to pull variables from the environment (speeds things up)
SetBatchLines, -1 ; Don't pause between lines (also speeds things up)
Macbeth := Shakespeare.Writeth("Macbeth")
MsgBox, % Shakespeare.ReadethPassage(Macbeth.PassageThatContaineth("Eye of newt"))
class Shakespeare
{
static Phrases := StrSplit("Bated breath,Cold comfort,Devil incarnate,"
. "Elbow room,Faint hearted,Fancy-free,Flaming youth,Foregone conclusion,"
Macbeth := FileOpen("macbeth.txt", "r`r`n").Read() ; `r`n in the read options to normalize line endings to just "`n"
; Find which Act, scene, and dialog contains our phrase
; ---
; Replace multiple newlines with `r, which is not actually being used for anything.
; Makes it idea for a temporary separator. Then, split it based on `r (you can only
; split based on character, not based on string of characters)
Sections := StrSplit(RegExReplace(Macbeth, "\n{2,}", "`r"), "`r")
for each, Section in Sections
{
import random
ID_AIR = 0
ID_DIRT = 1
ID_SAND = 2
ID_LAVA = 3
ID_DIAMOND = 4
ID_HERO = 5
DEBUG = True

#Description

It's 2015 and we've all moved on from IRC, right? Wrong! Freenode (the largest FOSS focused IRC network) has over 80,000 users, and gains around 5000 new users every year. /r/DailyProgrammer, as awesome as it is, happens to have its very own IRC channel on freenode (#reddit-dailyprogrammer), but it's missing one thing: Bots.

The goal of this channel is to create an interactive IRC bot capable of performing one or more basic bot-like things.