Skip to content

Instantly share code, notes, and snippets.

iamgreaser

  • New Zealand
Block or report user

Report or block iamgreaser

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
@iamgreaser
iamgreaser / sh2-seeds-1000-lines.txt
Created Sep 18, 2019
1000 Silent Hill 2 seeds for slow menu days
View sh2-seeds-1000-lines.txt
(Fr), Seed,Clock,Blod,Carb,Spin,Bug,H,Br,iefcase
0,0x6A4F8C55,10:10,3338,3869,6583,921,6,15,time
1,0x1F5ED66A,10:47,7414,3338,2275,687,1, 4,dark
2,0x00B1C75B,08:20,8699,7414,9532,794,4,10,luck
3,0x41D1CBF8,00:13,3386,8699,5834,653,1, 2,hell
4,0x2C4998D1,03:22,4147,3386,2756,473,2,17,kill
5,0x0A8BEF36,07:15,6996,4147,5322,147,1, 0,open
6,0x5A3B7E37,06:20,3864,6996,8341,642,4,14,dust
7,0x2153AFA4,07:41,1471,3864,7564,128,1,16,help
8,0x2CFDF10D,08:06,9966,1471,3221,429,2, 0,open
@iamgreaser
iamgreaser / sh2-briefcase.txt
Created Jun 13, 2019
The Silent Hill 2 Briefcase: The Actual Word List
View sh2-briefcase.txt
The Silent Hill 2 Briefcase: The Actual Word List
PC version:
0048f640 50 01 a0 00 6f 01 df 00 30 01 e0 00 4f 01 ff 00 |P...o...0...O...|
0048f650 90 00 20 01 ff 01 ff 01 a0 00 00 01 4f 01 1f 01 |.. .........O...|
0048f660 c0 00 e0 00 2f 01 ff 00 50 01 e0 00 ff 01 1f 01 |..../...P.......|
0048f670 6f 70 65 6e 64 61 6d 6e 68 65 6c 6c 74 6f 77 6e |opendamnhelltown|
0048f680 64 61 72 6b 6d 61 6d 61 64 6f 77 6e 6c 6f 76 65 |darkmamadownlove|
0048f690 6c 6f 63 6b 6d 69 73 74 6c 75 63 6b 6c 6f 73 65 |lockmistlucklose|
@iamgreaser
iamgreaser / packaroo.cl
Created Jun 16, 2018
IT214 sample brute force optimal thing finder
View packaroo.cl
;; vim: set sts=2 sw=2 et sm lisp :
(declaim (optimize (debug 3)
(speed 3)
(compilation-speed 0)
(safety 3)
(space 0)))
(defun range0x (n)
(do ((i (1- n) (1- i))
View actualmandel.cbl
*> vim: set syntax= et sts=2 sw=2 :
*> free syntax. compile like so:
*> cobc -x -free -o actualmandel actualmandel.cbl
identification division.
program-id. actualmandel.
environment division.
data division.
working-storage section.
01 template-string.
03 template-elems occurs 10 times pic x.
@iamgreaser
iamgreaser / head.S
Created Apr 23, 2018
how to make a light blink on a SAMC21-XPRO kit
View head.S
.thumb
.text
.global vector_table
vector_table:
.word 0x20007FF0
.word _start+1
.word isr_lockup+1 // NMI
.word isr_lockup+1
.word isr_lockup+1
@iamgreaser
iamgreaser / infix-mode.cl
Last active Feb 27, 2018
infix notation for common lisp - first reader macro attempt
View infix-mode.cl
;; vim: set sts=2 sw=2 et sm lisp :
(defvar *reading-a-list* nil)
(defun read-terminator (stream char)
(declare (ignore stream))
(error (format nil "unexpected ~S" char)))
(defun get-infix-precedence (symbol)
(case symbol
@iamgreaser
iamgreaser / update-timer-combined.py
Created Jan 27, 2018
MegaZeux autotimer for speedruns for Zeux 2,3,4,5
View update-timer-combined.py
#!/usr/bin/env python3 --
# vim: set sts=4 sw=4 et :
'''
update-timer-combined.py
Autotimer for the 4 original MegaZeux games
by GreaseMonkey, 2018 - Public Domain
Dependencies:
sudo pip3 install inotify_simple
@iamgreaser
iamgreaser / backtrack.scm
Created Jan 6, 2018
Prolog-style backtracking in Scheme using continuations
View backtrack.scm
;; vim: set sts=2 sw=2 et lisp sm :
(define *bt-chain* '())
(define (bt-fork starter . remains)
(call/cc (lambda (ret)
(set! *bt-chain*
(append
(map (lambda (x)
`(,ret . ,x))
View lzify.py
#!/usr/bin/env python3 --
# vim: set ts=8 sw=8 noet :
"""
lzify: pure LZSS pack/depack routines
by GreaseMonkey, 2018 - Public Domain
Usage:
python3 lzify.py infile.tar outfile.tar.lzified
@iamgreaser
iamgreaser / update-timer.py
Created Dec 7, 2017
My split timer for Zeux 2
View update-timer.py
#!/usr/bin/env python3 --
TIMERFILE = "/home/ben/timer.txt"
import math
import time
import inotify_simple
IFlags = inotify_simple.flags
You can’t perform that action at this time.