Skip to content

Instantly share code, notes, and snippets.

View biqqles's full-sized avatar
🪔
Burning the midnight oil

biqqles

🪔
Burning the midnight oil
View GitHub Profile
@biqqles
biqqles / stride.hs
Created January 21, 2023 21:50
Strides in Haskell
import Data.Function
stride l 0 = []
stride l by =
let index = zip [0..] -- tag elements with index
check_index = (==0).(`mod` by).fst -- test index
deindex = map snd -- strip index tags
in l & index & (filter check_index) & deindex
@biqqles
biqqles / solo.hs
Last active January 16, 2023 02:21
Recursively collect eopkg revdeps
-- solo.hs // usage: solo <pkgs>
import Data.Function ((&))
import Data.List (isInfixOf, isSuffixOf, nub, sort)
import Data.List.Split (splitOn)
import System.Environment (getArgs)
import System.Process (readProcess)
import Text.Regex.PCRE ((=~))
eopkg_info :: [String] -> IO [String]
@biqqles
biqqles / rules.txt
Last active October 16, 2021 13:52
uBlock Origin rules for a cleaner, calmer, less commercial Discord interface
! uBlock Origin rules for a cleaner, calmer, less commercial Discord interface
! gift advert in input box
discord.com##.buttons-3JBrkn > .grow-q77ONN
! sticker and gif buttons in input box
discord.com##div.buttonContainer-28fw2U > .grow-q77ONN.colorBrand-3pXr91.lookBlank-3eh9lL.button-38aScr > .button-318s1X.button-3AYNKb.contents-18-Yxp
! ads in server list
discord.com##.scrollerBase-289Jih.none-2Eo-qx.scroller-1Bvpku > div.listItem-1hlISG > .listItemWrapper-t7zeg3
@biqqles
biqqles / virtualkeys.py
Created November 22, 2020 19:46
Cross-platform Win32 virtual-key codes
"""
Win32 virtual-key (VK) constants for Python, extracted from winuser.h with
comments.
Original copyright notice printed below:
/****************************************************************************
* *
* winuser.h -- USER procedure declarations, constant definitions and macros *
* *
* Copyright (c) Microsoft Corporation. All rights reserved. *