scruss

#!/usr/bin/env bash
# quakerdate - use GNU date to generate Quaker (Society of Friends)
#  customary date format. Any args will be passed as the date to print
# scruss, 2022-09
# Mon 26 Sep 2022 -> Second day, the twenty-sixth of ninth month 2022

ordinals=(none First Second Third Fourth Fifth Sixth Seventh Eighth \
	       Ninth Tenth Eleventh Twelfth Thirteenth Fourteenth \
	       Fifteenth Sixteenth Seventeenth Eighteenth Nineteenth \
	       Twentieth Twenty-first Twenty-second Twenty-third \

scruss

/*                        Copyright (c) 1987 Bellcore
 *                            All Rights Reserved
 *       Permission is granted to copy or use this program, EXCEPT that it
 *       may not be sold for profit, the copyright notice must be reproduced
 *       on copies, and credit should be given to Bellcore where it is due.
 *       BELLCORE MAKES NO WARRANTY AND ACCEPTS NO LIABILITY FOR THIS PROGRAM.
 */
/*	$Header: art_data.c,v 4.2 88/06/22 14:37:09 bianchi Exp $
	$Source: /tmp/mgrsrc/demo/misc/RCS/art_data.c,v $
*/

scruss

#!/usr/bin/env python3
#
# Implementation of Oliver Darkshire's one page RPG
# "The Prime Minister Won't Resign", published 2022-07-08
# https://twitter.com/deathbybadger/status/1545372201402114049
#
# written in deliberately simple python by scruss, 2022-07
# -*- coding: utf-8 -*-

import random

scruss

%!PS-Adobe-2.0
%%BoundingBox: 36 400 286 550
%%HiResBoundingBox: 35.999999 399.995988 286.001991 550.007983
%%Title: modified from Blue Book Program 16, on page 203
%%EndComments

% scruss, 2022-05
% see https://stardot.org.uk/forums/viewtopic.php?f=3&t=24845

/makeoutlinedict 7 dict def

scruss

#!/bin/sh
# snoopycal.sh - output old-school ASCII art Snoopy calendar
#   scruss, 2021-11
#
# optional argument: year
#   otherwise, chooses one for you
#
# requires: cal, banner
#   typically in the ncal and sysvbanner packages
#

scruss

5 REM Mad Computer Edition with Logo Code October 1985 - PC GW-BASIC
6 REM https://redd.it/s9sudr
10 SIZE=1.2:XC=150:YC=110
20 KEY OFF:SCREEN 1:CLS:COLOR 7,0
30 READ X,Y,X1,Y1
40 IF X=999 THEN GOTO 90
50 FX=X*SIZE+XC:FY=199-(Y+YC)
60 LX=X1*SIZE+XC:LY=199-(Y1+YC)
70 LINE (FX,FY)-(LX,LY),2:LINE (FX+1,FY)-(LX+1,LY),2
80 GOTO 30

scruss

10 SIZE=1.2:XC=640:YC=512:SCL=5
20 MODE 2:COLOUR 4:COLOUR 135:GCOL 0,1:CLS:VDU 23,1,0;0;0;0;
30 READ X,Y,X1,Y1
40 IF X=999 THEN GOTO 90
50 FX=SCL*X*SIZE+XC:FY=SCL*Y+YC
60 LX=SCL*X1*SIZE+XC:LY=SCL*Y1+YC
70 MOVE FX,FY:DRAW LX,LY: REM MOVE FX+1,FY:DRAW LX+1,LY
80 GOTO 30
90 VDU 31,2,30:PRINT"WHAT, ME WORRY?";
100 A$=INKEY$(0):IF A$="" THEN GOTO 100

scruss

<canvas id="c" width="1024" height="1024">
<script>
  const context = c.getContext('2d');
  for (let x = 0; x < 256; x++) {
      let y = 255 - 4 * 256 * ((x / 256) - 0.5)**2;
      context.fillRect(x*4, y*4, 4, 4);
  }
</script>

scruss

#!/usr/bin/python3
# lazy caterer sequence - 'thank' you josh millard ...
# scruss - 2021-05
# usage: lazy_caterer.py [lines] > output.eps

from random import uniform
from math import sin, cos, radians
from sys import argv

lines = 9

scruss

# micropython for raspberry pi pico
# potentiometer between AGND and 3V3, with the wiper going to ADC pin 2
# prints 0-100 depending on how far potentiometer is turned
# 3 columns so the Thonny plotter will scale correctly

from machine import Pin, ADC
from time import sleep

led = Pin(25, Pin.OUT)
adc = ADC(2)