# HG changeset patch # User boisy # Date 1041357229 0 # Node ID 2ec2125b6527cfa32fba6a9d7cedf001dec92af2 # Parent b0501e9fb255ce78f653407772b42bac6381e820 Shortened secret message, removed useless ldu diff -r b0501e9fb255 -r 2ec2125b6527 level2/modules/scf.asm --- a/level2/modules/scf.asm Tue Dec 31 12:35:35 2002 +0000 +++ b/level2/modules/scf.asm Tue Dec 31 17:53:49 2002 +0000 @@ -150,7 +150,8 @@ * Default input buffer setting for SCF devices when Opened/Created * 123456789!123456789!1234567890 -msg fcc 'by B.Nobel,C.Boyle,W.Gale-1993' +*msg fcc 'by B.Nobel,C.Boyle,W.Gale-1993' +msg fcc 'OS-9 Rocks!' msgsize equ *-msg Size of default input buffer message fcb C$CR 2nd CR for buffer pad fill blksize equ 256-msgsize Size of blank space after it @@ -241,7 +242,7 @@ puls y Restore path descriptor pointer bcs L0111 Couldn't attach to device, detach & exit with error stu PD.DV2,y Save new output (echo) device table pointer - ldu PD.DEV,y Get device table pointer +* ldu PD.DEV,y Get device table pointer L00CF ldu V$STAT,u Point to it's static storage IFNE H6309