Skip to content

Instantly share code, notes, and snippets.

@kirbyUK
kirbyUK / Computer of Death (1987).srt
Last active December 2, 2022 23:26
Computer of Death (1987) English Subtitles
1
00:00:00,000 --> 00:00:04,500
Greece, 2080 AD
Computer Science has infiltrated every aspect of life
2
00:01:39,860 --> 00:01:41,020
Blessed be the rears of the lady,
3
@kirbyUK
kirbyUK / 6502_instructions.json
Created October 17, 2017 15:24
6502 instruction set in JSON
[
{
"bytes" : "2",
"description" : "Add with Carry",
"name" : "ADC",
"opcode" : "$69",
"mode" : "Immediate"
},
{
"opcode" : "$65",

Keybase proof

I hereby claim:

  • I am kirbyUK on github.
  • I am kirbyuk (https://keybase.io/kirbyuk) on keybase.
  • I have a public key whose fingerprint is F9DF 5D0F 1333 466B F826 4D38 7B61 92DE AA07 001A

To claim this, I am signing this object:

@kirbyUK
kirbyUK / sample.c
Created April 3, 2016 23:04
Reversing Example
#include <stdio.h>
void f1()
{
int a = 1, b = 2, c = 3;
}
void f2()
{
int a, b, c;
@kirbyUK
kirbyUK / mp3-tag.pl
Created January 24, 2016 16:40
Update MP3 tags from the command line
#!/usr/bin/perl -w
use Getopt::Long;
use MP3::Tag;
use strict;
my %tags;
GetOptions(
"artist=s" => \$tags{"artist"},
"album=s" => \$tags{"album"},
"comment=s" => \$tags{"comment"},
@kirbyUK
kirbyUK / enron-rename.pl
Created January 24, 2016 15:04
Rename Enron E-mail corpus to Windows-friendly filename
#!/usr/bin/perl -w
use File::Spec::Functions qw/catfile/;
use strict;
sub recurse
{
my $root = shift;
opendir my $dir, $root or die "Cannot open directory: '$root': $!\n";
for my $file(readdir $dir)
{
@kirbyUK
kirbyUK / cat.pl
Created March 11, 2015 20:29
cat.pl
#!/usr/bin/perl -w
use strict;
while(<>) { print "$_" }
@kirbyUK
kirbyUK / sfUtil.h
Created October 10, 2014 17:12
SFML Utilities Header
/*
* sfUtil.h
* A simple, header only file (so you don't have to edit any Makefiles) used
* for common SFML debugging tasks.
*/
#ifndef SF_UTIL_H
#define SF_UTIL_H
#include <SFML/Graphics.hpp>
#include <iostream>
#include <string>