Skip to content

Instantly share code, notes, and snippets.

View claesjac's full-sized avatar

Claes Jakobsson claesjac

View GitHub Profile
#!/usr/bin/perl
use 5.014;
use warnings;
use Imager;
use Imager::Fill;
use constant Y_PER_STEP => 16;
use constant X_PER_STEP => 16;
@claesjac
claesjac / tannenbaum.c
Created December 10, 2013 18:01
Software for christmas tree lightning
#include <avr/io.h>
#include <avr/interrupt.h>
#include <avr/pgmspace.h>
#include <util/delay.h>
#define ANIMATION_LENGTH 65
const uint8_t animation[ANIMATION_LENGTH] = {
0b00000000,
0b00000001,
Request timeout for icmp_seq 0
64 bytes from 209.20.68.74: icmp_seq=0 ttl=42 time=1249.124 ms
64 bytes from 209.20.68.74: icmp_seq=1 ttl=42 time=1230.583 ms
64 bytes from 209.20.68.74: icmp_seq=2 ttl=42 time=1271.113 ms
64 bytes from 209.20.68.74: icmp_seq=3 ttl=42 time=1256.471 ms
64 bytes from 209.20.68.74: icmp_seq=4 ttl=42 time=1796.724 ms
Request timeout for icmp_seq 6
64 bytes from 209.20.68.74: icmp_seq=5 ttl=42 time=2135.006 ms
64 bytes from 209.20.68.74: icmp_seq=6 ttl=42 time=1295.783 ms
64 bytes from 209.20.68.74: icmp_seq=7 ttl=42 time=1264.459 ms
t/op/smartkve ................................................. Hexadecimal number > 0xffffffff non-portable at (eval 14) line 1.
Hexadecimal number > 0xffffffff non-portable at (eval 19) line 1.
Hexadecimal number > 0xffffffff non-portable at (eval 24) line 1.
ok
define-list functions
ABBREV, ABS, ACOS, AGE, AREA, ARRAY_AGG, ASCII, ASIN, ATAN, ATAN2, AVG, BIT_AND, BIT_LENGTH, BIT_OR, BOOL_AND, BOOL_OR, BOX,
BROADCAST, BTRIM, CBRT, CEIL, CEILING, CENTER, CHAR_LENGTH, CHR, CIRCLE, CLOCK_TIMESTAMP, COL_DESCRIPTION, CONCAT, CONCAT_WS,
CONVERT, CONVERT_FROM, CONVERT_TO, CORR, COS, COT, COUNT, COVAR_POP, COVAR_SAMP, CUME_DIST, CURRENT_DATABASE, CURRENT_QUERY,
CURRENT_SCHEMAS, CURRENT_SETTING, CURRVAL, DATE_PART, DATE_TRUNC, DECODE, DEGREES, DENSE_RANK, DIAMETER, DIV, ENCODE, EVERY,
EXP, EXTRACT, FAMILY, FIRST_VALUE, FLOOR, FORMAT_TYPE, GENERATE_SERIES, GENERATE_SUBSCRIPTS, GET_BIT, GET_BYTE,
GET_CURRENT_TS_CONFIG, HEIGHT, HOST, HOSTMASK, INET_CLIENT_ADDR, INET_CLIENT_PORT, INET_SERVER_ADDR, INET_SERVER_PORT, INITCAP,
ISCLOSED, ISFINITE, ISOPEN, JUSTIFY_DAYS, JUSTIFY_HOURS, JUSTIFY_INTERVAL, LAST_VALUE, LASTVAL, LEFT, LENGTH, LN, LOG, LOWER,
LPAD, LSEG, LTRIM, MASKLEN, MAX, MD5, MIN, MOD, NETMASK, NETWORK, NEXTVAL, NOW, NPOINTS, NTILE,
@claesjac
claesjac / myconfig
Created January 15, 2012 00:30
pg-checksource run!
# my config
# enable all whitespace checks
[whitespace]
--- su2kt.rb.orig 2009-10-16 16:15:26.000000000 +0200
+++ su2kt.rb 2010-04-28 23:06:39.000000000 +0200
@@ -540,13 +540,17 @@
ptx=glob_trans.xaxis
pty=glob_trans.yaxis
ptz=glob_trans.zaxis
-
+
+ if (params[5] == nil)
+ params[5] = "Inverse Square"
use strict;
use warnings;
use Encode;
use HTTP::Request;
use LWPx::ParanoidAgent;
use JavaScript;
use Try::Tiny;