pts

; $ ndisasm -b 16 -e 0 -o 0x7c00 -k 0x7e00,-1 pc/disk.03 >biosk.bootblok.ndisasm
; $ ndisasm -b 16 -e 0 -o 0 -k 0x200,-1 pc/disk.03 >biosk.bootblok0.ndisasm
;
; Memory map at boot time:
;
; * 0000:7C00...0000:7E00 0x200 boot sector
;
; Memory map before jumping to the kernel:
;
; * 0000:0580...0000:0600  ---                     0x80  boot sector stack (in use before jumping to the kernel)

pts

; by [email protected] at Sun Jan 22 01:50:33 CET 2023
;
; Compile: nasm -O0 -f bin -o hello86 hello86.nasm
;
; !! This is experimental code for hello-world.
;
; Xenix 86 syscall ABI (reverse engineered):
;
; Call: mov ax, syscall_number; mov bx, arg1; mov cx, arg2; mov si, arg3; mov di, arg4; call section_text+0x17
; On error, sets CF=1, AX=errno (error code), destroys BX, CX, DX, SI, DI, BP, FLAGS.

pts

Memory map for hellowr.com (DOS 8086 hello-world with write(2)) with
OpenWatcom 2 libc.

* = unreferenced symbol
+ = symbol only referenced locally

.text: (code)

mem_ptr     size     symbol
---------------------------

pts

#! /bin/sh --
# Passphrase-based SSH client. https://github.com/pts/sesamessh
# This is free software, GNU GPL >=2.0. There is NO WARRANTY. Use at your risk.
#
# wget https://github.com/pts/sesamessh/blob/master/sesamessh | sh
#

if true; then  # Read entire script before running it.
rmtmp() {  # Will be overwritten later.
  :

pts

#! /bin/sh
eval '(exit $?0)' && eval 'PERL_BADLANG=x;export PERL_BADLANG;: \
;exec perl -x -S -- "$0" ${1+"$@"};#'if 0;
eval 'setenv PERL_BADLANG x;exec perl -x -S -- "$0" $argv:q;#'.q+
#!perl -w
package Htex::better_afm2tfm;  $0=~/(.*)/s;unshift@INC,'.';do($1);die$@if$@;__END__+if !1;
# This Perl script was generated by JustLib2 at Sun Nov  9 21:48:57 2003.
# Don't touch/remove any lines above; http://www.inf.bme.hu/~pts/justlib
package just; BEGIN{$INC{'just.pm'}='just.pm'}
BEGIN{ $just::VERSION=2 }

pts

from ctypes import *
from struct import *
winmm = windll.winmm
vol = c_ulong()
print('res', winmm.waveOutGetVolume(0, byref(vol)))
print('left:', vol.value & 0xffff, 'right:',vol.value >> 16)

pts

/* tinygccpe.scr: GNU ld linker script for smaller PE .exe output
 * by [email protected] at Fri Feb  3 15:41:13 CET 2017
 *
 * It's different from the default by:
 *
 * * It drops initializers (e.g. .init, .ctors), and fails if the code tries
 *   to use them.
 * * It drops exceptions (e.g. .pdata), and fails if the code tries
 *   to use them.
 * * It merges .data and .rdata. 

pts

#! /usr/bin/python

import _multiprocessing
import os
import socket
import sys
import time
import thread

pts

Keybase proof

I hereby claim:

• I am pts on github.
• I am pts (https://keybase.io/pts) on keybase.
• I have a public key whose fingerprint is 537D 2E8D 6FAB 3265 9A1F 8767 33BB 974C 2FE0 93F2

To claim this, I am signing this object:

pts

#!perl -w
# let's learn pod!
=head1 NAME

ladder - Finds a word letter between two words

=head1 SYNOPSIS

B<ladder> I<word1> I<word2> [I<dictfile>]