Skip to content

Instantly share code, notes, and snippets.

@nihilismus
nihilismus / README
Created Jan 28, 2018
SlackBuild for menulibre (https://bluesabre.org/projects/menulibre/). Tested in Slackware64 14.2. Slackware Linux
View README
MenuLibre is an advanced menu editor that provides modern features
in a clean, easy-to-use interface and full quicklist support. All
without GNOME dependencies, so even lightweight systems can benefit
from the sanity that MenuLibre offers. MenuLibre is your one-stop
shop for menus in Linux, whether you use Gnome, LXDE, XFCE, or Unity.
@nihilismus
nihilismus / recursividad.clj
Last active Dec 23, 2017
Ejemplos de recursividad en Clojure
View recursividad.clj
(ns recursividad)
;; Ejemplos de recursividad en Clojure
;; Lecturas:
;; http://biolab.uspceu.com/aotero/recursos/docencia/TEMA%207.pdf
;; https://gheize.wordpress.com/2007/09/28/recursividad/
;; http://www.grycap.upv.es/gmolto/docs/eda/EDA_Tema_5_Parte_I_gmolto.pdf
;; Tipos de recursividad lineal:
@nihilismus
nihilismus / Main.java
Created Jul 4, 2017
Main.java: $ java -jar operaciones.jar "+" 10 20 30 40 50
View Main.java
package operaciones;
import java.util.ArrayList;
import java.util.List;
public class Main {
/*
* args <- [] -> "Excepción."
* args <- ["@" "10" "20" "30"] -> "Excepción."
@nihilismus
nihilismus / rfc.clj
Created May 9, 2017
Dígito verificador del RFC (México) y RUT (Chile) en Clojure.
View rfc.clj
(ns plf.rfc)
;; Registro Federal de Contribuyentes (México)
;; El Registro Federal de Contribuyentes (o RFC) es una clave que requiere
;; toda persona física o moral en México para realizar cualquier actividad
;; económica lícita por la que esté obligada a pagar impuestos a toda persona
;; moral, con algunas excepciones.
;; - https://es.wikipedia.org/wiki/Registro_Federal_de_Contribuyentes_(M%C3%A9xico)
;; Procedimiento para calcular el dígito verificador del Registro Federal de Contribuyentes
View Main.asm
title Main
include Irvine32.inc
;;;; Escriba las instrucciones necesarias en lenguaje ensamblador para el algoritmo
;;;; del Cifrado Atbash que opere sobre una palabra:
;;;; Este método consiste en sustituir la primera letra por la última del alfabeto
;;;; que se esté utilizando, la segunda por la penúltima, la tercera por la antepenúltima
;;;; y así sucesivamente con todo el alfabeto. A este método también suele llamársele
;;;; código espejo ya que el cifrado del criptograma es nuevamente el texto en claro.
;;;; Fuente: http://bit.ly/2gbni5U
View Main.asm
;;;; Main.asm
title Main
include Irvine32.inc
;;;; Escriba las instrucciones necesarias en lenguaje ensamblador para que
;;;; dado un desplazamiento y un mensaje_claro se obtenga un mensaje_cifrado
;;;; a partir de desplazar los caracteres del mensaje_claro tantos caracteres
;;;; a la derecha lo establezca el desplazamiento.
;;;;
@nihilismus
nihilismus / infinality-fonts-local-install.sh
Created Nov 1, 2016
infinality-fonts-local-install.sh: install the latest versions available of Infinality fonts in $HOME/.local/share/fonts
View infinality-fonts-local-install.sh
#!/bin/bash
# infinality-fonts-local-install.sh: download the latest versions available of
# Infinality fonts: http://bohoomil.com/repo/fonts/
# and install them into $HOME/.local/share/fonts
# Copyright © 2016 Antonio Hernández Blas <hba.nihilismus@gmail.com>
# This work is free. You can redistribute it and/or modify it under the
# terms of the Do What The Fuck You Want To Public License, Version 2,
# as published by Sam Hocevar. See http://www.wtfpl.net/ for more details.
@nihilismus
nihilismus / XHR.js
Created May 22, 2016
Módulo de JavaScript / XMLHttpRequest, similar al encontrado en https://gist.github.com/nihilismus/ebbf0e1a2dd8e4ef6a8b
View XHR.js
var XHR = (function() {
var _get = function(_url, _en_caso_de_exito, _en_caso_de_error) {
var _detectar_cambios_de_estado = function(_xhr, _en_caso_de_exito, _en_caso_de_error) {
return function() {
if (_xhr.readyState === 4) {
if (_xhr.status >= 200 && _xhr.status <= 299) {
_en_caso_de_exito(_xhr);
} else {
_en_caso_de_error(_xhr);
}
@nihilismus
nihilismus / startx-linux-tty1.sh
Created May 15, 2016
Execute startx automatically in a linux system (/dev/tty1 or Ctrl+Alt+F1)
View startx-linux-tty1.sh
#!/bin/bash
# sdm.sh : Start X **automagically** when login-in /dev/tty1
#
# Add the execution of this script, or the next lines, at the
# end of ~/.bashrc or ~/.bash_profile
TTY="$(/usr/bin/tty | sed 's:.*/::')"
if [[ ! ${DISPLAY} && ${TERM} == 'linux' && ${TTY} == 'tty1' ]]; then
unset TTY
exec startx
@nihilismus
nihilismus / fos.clj
Last active May 20, 2016
Funciones de Orden Superior y Funciones Sobre Colecciones en Clojure haciendo uso de recursividad (first, rest y conj)
View fos.clj
(def lmap (fn [f xs]
(letfn [(g ;; Función Recursiva (FR): recorre la LO para regresar la LA conformada con los resultados
;; obtenidos de aplicar la FA sobre cada E en la LO.
;; Elemento (E): es cada valor (val) en la LO
;; '(valor1 valor2 valorN)
[ys ;; Lista Original (LO) o Lista de Entrada (LE)
zs ;; Lista de Acumulación (LA) o Lista de Salida (LS)
h ;; Función a Aplicar (FA)
]
(if (nil? (first ys))
You can’t perform that action at this time.