Skip to content

Instantly share code, notes, and snippets.

View GlassGhost's full-sized avatar

GlassGhost GlassGhost

View GitHub Profile
@GlassGhost
GlassGhost / format.sh
Last active August 29, 2015 14:17
format
#!/bin/bash
ISO_8601=`date -u "+%FT%TZ"` #ISO 8601 Script Start UTC Time
utc=`date -u "+%Y.%m.%dT%H.%M.%SZ"` #UTC Time (filename safe)
owd="$( cd "$( dirname "${BASH_SOURCE[0]}" )" && pwd )" #Path to THIS script.
# Copyright 2013 Roy Pfund
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
@GlassGhost
GlassGhost / LC.sh
Last active August 29, 2015 14:26
Generate LC-min.js Binary Lambda Calculus Interpreter
#!/bin/bash
ISO_8601=`date -u "+%FT%TZ"` #ISO 8601 Script Start UTC Time
utc=`date -u "+%Y.%m.%dT%H.%M.%SZ"` #UTC Time (filename safe)
owd="$( cd "$( dirname "${BASH_SOURCE[0]}" )" && pwd )" #Path to THIS script.
# Copyright 2015 Roy Pfund
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
@echo off
title Activate Windows 10 ALL versions for FREE!&cls&echo ============================================================================&echo #Project: Activating Microsoft software products for FREE without software&echo ============================================================================&echo.&echo #Supported products:&echo - Windows 10 Home&echo - Windows 10 Home N&echo - Windows 10 Home Single Language&echo - Windows 10 Home Country Specific&echo - Windows 10 Professional&echo - Windows 10 Professional N&echo - Windows 10 Education N&echo - Windows 10 Education N&echo - Windows 10 Enterprise&echo - Windows 10 Enterprise N&echo - Windows 10 Enterprise LTSB&echo - Windows 10 Enterprise LTSB N&echo.&echo.&echo ============================================================================&echo Activating your Windows...&cscript //nologo slmgr.vbs /upk >nul&wmic os | findstr /I "enterprise" >nul
if %errorlevel%==0 (cscript //nologo slmgr.vbs /ipk NPPR9-FWDCX-D2C8J-H872K-2YT43 >nul&cscript //nolog
@GlassGhost
GlassGhost / automaton.scm
Last active November 1, 2021 14:26
gsi v4.9.3 owner@localhost:~/sync/Scripts/Lambda$ gsi ./automaton.scm *** ERROR IN "automaton.scm"@21.30 -- Ill-formed selector list
;#!/usr/bin/env scheme-r5rs
;https://github.com/carld/automata-via-macros
(define-syntax automaton ;https://cs.brown.edu/~sk/Publications/Talks/SwineBeforePerl/
(syntax-rules (:)
[(_ init-state
(state : response ...) ...)
(let-syntax
([process-state
(syntax-rules (accept ->)
[(_ accept)