Skip to content

Instantly share code, notes, and snippets.

View AeroNotix's full-sized avatar
💭
🇺🇦

Aaron France AeroNotix

💭
🇺🇦
View GitHub Profile
.
`-- TV Shows
`-- A TV Show Name
`-- Season 04
|-- A TV Show Name - S04E05.mp4
`-- A TV Show Name - s04E04.mkv
{
"message": "sites-list:update",
"payload": {
"sites_list": [{
"subsystems": [{
"num_guest": 0,
"status": "error",
"num_adopted": 2,
"rx_bytes-r": 0,
"num_pending": 0,
import time
import sys
import vlc
from datetime import datetime
def main(rtsp_stream, period=1, output='snapshot%s.png'):
player = vlc.MediaPlayer(rtsp_stream)
player.play()
time.sleep(5)
(ql:quickload :lispbuilder-sdl)
(defvar *SIZE* 800)
(defvar *SHADES* 50)
(defvar *STEP* (/ *SIZE* *SHADES*))
(defvar *COL* 0)
(defun box (n)
(cond ((>= n *SHADES*) nil)
((< n *SHADES*)
(progn
-module(proxy_protocol).
%% Code between markers is stolen from Cowboy
%%% BEGIN STOLEN CODE
-export([parse_request/3]).
-export([start_link/4]).
-export([init/4]).
def requires_open_websocket(f):
def wrapper(self, *args):
if not self.ws_connection:
return
return f(self, *args)
return wrapper
import asyncio
@asyncio.coroutine
def foo1():
while True:
print("foo1 running")
yield from asyncio.sleep(3)
(in-package :cl-zk)
(defun make-clos-field (name)
(let ((keyword-name (values (alexandria:make-keyword name))))
`(,name :accessor ,name :initarg ,keyword-name)))
(defun writer-for-type (fieldspec stream)
(let ((name (first fieldspec))
(type (second fieldspec)))
(ccase type

Keybase proof

I hereby claim:

  • I am aeronotix on github.
  • I am aeronotix (https://keybase.io/aeronotix) on keybase.
  • I have a public key whose fingerprint is A0C5 DFA0 D23F FC0C 3E56 D5DC E69A C4BD 2964 3B6D

To claim this, I am signing this object:

(defun make-id-flipper ()
(let ((state nil)
(id nil))
(lambda (client)
(if state
(return-stream-id client id)
(setf id (next-stream-id client)))
(setf state (not state)))))