This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
""" | |
Download a remote playlist as m3u from server.manoel.dev to watch by streaming. | |
Example | |
------- | |
> python downloadplaylist.py https://server.manoel.dev/extra_animes/Serial%20Experiments%20Lain/ | |
Will write a serial-experiments-lain.m3u |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/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" |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(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 |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; Then, a winner for that round is selected: Rock defeats Scissors, | |
;; Scissors defeats Paper, and Paper defeats Rock. If both players | |
;; choose the same shape, the round instead ends in a draw. | |
(defun winner (a b) | |
(loop with hands = (cons a b) | |
and rules = '(((paper . scissors) second) | |
((paper . rock) first) | |
((rock . paper) second) | |
((rock . scissors) first) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
generated Oct 30, 2022 12:40:10 | |
system "Artix Linux" Linux 5.15.74-1-lts x86_64 | |
emacs 28.2 ~/.emacs.d.doomemacs/ | |
doom 3.0.0-pre PROFILE=_@0 HEAD -> master, origin/master, | |
origin/HEAD 3a3489449 2022-10-29 21:57:51 +0200 ~/.doom.d/ | |
shell /usr/bin/zsh | |
features ACL CAIRO DBUS FREETYPE GIF GLIB GMP GNUTLS GPM GSETTINGS | |
HARFBUZZ JPEG JSON LCMS2 LIBOTF LIBXML2 M17N_FLT MODULES | |
NATIVE_COMP NOTIFY INOTIFY PDUMPER PNG RSVG SECCOMP SOUND | |
THREADS TIFF TOOLKIT_SCROLL_BARS X11 XDBE XIM XPM GTK3 ZLIB |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env python | |
# | |
# Python Script | |
# | |
# Copyright © Juca Crispim | |
# | |
# original source: https://goo.gl/NhfKET | |
import math | |
import nltk |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env python3 | |
# coding: utf-8 | |
# | |
# Copyright © Neoway Business Solutions | |
# | |
# @project: Diário Oficial | |
# @author: Manoel Vilela | |
# | |
""" |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; 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)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env bash | |
# A command to get the keycodes of your keyboard and configure your ~/.Xmodmap | |
# I used that for configure my multimedia-keys on XFCE4 @ Manjaro | |
xev | grep -A2 --line-buffered '^KeyRelease' | sed -n '/keycode /s/^.*keycode \([0-9]*\).* (.*, \(.*\)).*$/\1 \2/p' | |
# [e.g.: ~/.Xmodmap | |
# keycode 162 = XF86AudioPlay | |
# keycode 164 = XF86AudioStop |
NewerOlder