ryukinix

;; pseudo-random numbers don't follows Benford's Law.

(ql:quickload :cl-spark)


(defun random-numbers (max count)
  (loop repeat count
        for n := (random max)
        when (plusp n)
          collect n))

ryukinix

~/.wine/drive_c/Program Files (x86)/EA GAMES/Need For Speed Underground
❯ wine Speed.exe
01e8:fixme:ntdll:NtQuerySystemInformation info_class SYSTEM_PERFORMANCE_INFORMATION
INTEL-MESA: warning: Ivy Bridge Vulkan support is incomplete
01e8:fixme:d3d9:Direct3DShaderValidatorCreate9 Returning stub validator 7EB6F364.
01e8:fixme:d3d9:Direct3DShaderValidatorCreate9 Returning stub validator 7EB6F364.
01e8:fixme:d3d9:Direct3DShaderValidatorCreate9 Returning stub validator 7EB6F364.
01e8:fixme:d3d9:Direct3DShaderValidatorCreate9 Returning stub validator 7EB6F364.
01e8:fixme:d3d9:Direct3DShaderValidatorCreate9 Returning stub validator 7EB6F364.
01e8:fixme:d3d9:Direct3DShaderValidatorCreate9 Returning stub validator 7EB6F364.

ryukinix

<lerax> hey, can someone point to me a good and fresh SDL2 + C++ guide? I only
know from lazy foo. Is there something better?
<pulse> lazyfoo gives you most of what you need tho                     [07:47]
<pulse> when i was learning SDL i just went through each tutorial, making my
own source as i went                                            [07:50]
<pulse> and now i have all those examples in an executable format with a clear
source along with it                                            [07:51]
<pulse> so i'd recommend just doing that
<pulse> the good thing about those tutorials is that every one of them is
concise and gets straight to the point

ryukinix

(defun executables ()
  (loop with path = (uiop:getenv "PATH")
        for p in (uiop:split-string path :separator ":")
        for dir = (probe-file p)
        when (uiop:directory-exists-p dir)
          append (uiop:directory-files dir)))

(defun find-executable (name)
  (find name (executables)
        :test #'equalp

ryukinix

/*
 *  Manoel Vilela © 2019
 *
 *  Why this? Just because I was bored
 *  Date: Tue 12 Mar 2019 12:21:48 AM -03
 */

#include <stdio.h>
#include <stdlib.h>

ryukinix

;; ▓█████  ███▄ ▄███▓ ▄▄▄       ▄████▄    ██████
;; ▓█   ▀ ▓██▒▀█▀ ██▒▒████▄    ▒██▀ ▀█  ▒██    ▒
;; ▒███   ▓██    ▓██░▒██  ▀█▄  ▒▓█    ▄ ░ ▓██▄
;; ▒▓█  ▄ ▒██    ▒██ ░██▄▄▄▄██ ▒▓▓▄ ▄██▒  ▒   ██▒
;; ░▒████▒▒██▒   ░██▒ ▓█   ▓██▒▒ ▓███▀ ░▒██████▒▒
;; ░░ ▒░ ░░ ▒░   ░  ░ ▒▒   ▓▒█░░ ░▒ ▒  ░▒ ▒▓▒ ▒ ░
;; ░ ░  ░░  ░      ░  ▒   ▒▒ ░  ░  ▒   ░ ░▒  ░ ░
;; ░   ░      ░     ░   ▒   ░        ░  ░  ░
;; ░  ░       ░         ░  ░░ ░            ░

ryukinix

(require 'package)

(setq packages-archives '("melpa" . "https://melpa.org/packages/"))
(defvar *my-packages* '(company
                        slime-company
                        doom-themes
                        powerline
                        airline-themes)
  "My wonderful packages")

ryukinix

#!/usr/bin/sbcl --script

#|

Manoel Vilela © 2018

This script helps me building a simple ASDF project for Common Lisp
based in the library quickproject.

|#

ryukinix

#!/bin/sh
#
# /lib/elogind/system-sleep/lock.sh
# Lock before suspend integration with elogind

username=lerax
userhome=/home/$username
export XAUTHORITY="$userhome/.Xauthority"
export DISPLAY=":0.0"

ryukinix

#!/bin/sh
#
# /lib/elogind/system-sleep/lock.sh
# Lock before suspend integration with elogind

username=lerax
userhome=/home/$username
export XAUTHORITY="$userhome/.Xauthority"
export DISPLAY=":0.0"