Received: from j.cc.purdue.edu by VM.CC.PURDUE.EDU ; Tue, 07 Jun 88 18:03:49 EST
Received: by j.cc.purdue.edu (5.54/1.14)
    id AA21326; Tue, 7 Jun 88 18:00:38 EST
Date: Tue, 7 Jun 88 18:00:38 EST
From: ain@j.cc.purdue.edu (Patrick White)
Message-Id: <8806072300.AA21326@j.cc.purdue.edu>
To: fys-ma@fintuvm.BITNET
Subject: comp.binaries.amiga:   binaries/amiga/volume6/hp11.patch.sh
 
Newsgroups: comp.binaries.amiga
Subject: hp11 patch (binaries 1 of 1)
Keywords: patch, hp11, untested.
Approved: ain@j.cc.purdue.edu    (Patrick White)
 
Program Name:    hp11 patch  (binaries)
Submitted by:    gay@clsepf51.bitnet  (David Gay)
Summary:    a patch to fix bugs in the hp11 calculator emulator.
Poster Boy:    Patrick White    (ain@j.cc.purdue.edu)
Archive Name:    binaries/amiga/volume6/hp11.patch.sh.Z
Untested.
 
NOTES:
   This is a patch program (sorry, only sources) for the hp11 calculator
emulator.  If I had gottne through my mail sooner, I would have been able to
apply this before it went out.. too late now though.  Sorry all.
 
 
-- Pat White   (co-moderator comp.sources/binaries.amiga)
ARPA/UUCP: j.cc.purdue.edu!ain  BITNET: PATWHITE@PURCCVM  PHONE: (317) 743-8421
U.S.  Mail:  320 Brown St. apt. 406,    West Lafayette, IN 47906
[How do you get to heaven?   Go to Pluto and hang a left.]
 
========================================
 
#    This is a shell archive.
#    Remove everything above and including the cut line.
#    Then run the rest of the file through sh.
#----cut here-----cut here-----cut here-----cut here----#
#!/bin/sh
# shar:    Shell Archiver
#    Run the following text with /bin/sh to create:
#    hp11-patch.c
# This archive created: Mon Jun  6 18:35:00 1988
# By:    Patrick White (PUCC Land, USA)
echo shar: extracting hp11-patch.c '(748 characters)'
cat << \SHAR_EOF > hp11-patch.c
#include <stdio.h>
 
#define patch(val, adr) { fseek(mod, adr - 1, 0); putc(val, mod); }
 
void main()
{
    FILE *mod;
 
    mod = fopen("df1:hp", "r+");
 
    patch(0x48, 0x3599);
    patch(0x78, 0x359a);
    patch(0x00, 0x359b);
    patch(0x02, 0x359c);
    patch(0x58, 0x35a1);
    patch(0x4c, 0x6313);
    patch(0x44, 0x6314);
    patch(0x4c, 0x6317);
    patch(0x3e, 0x6318);
    patch(0x3f, 0x631b);
    patch(0x5c, 0x631c);
    patch(0x00, 0x6841);
    patch(0x03, 0x6842);
    patch(0x08, 0x6843);
    patch(0xc8, 0x6844);
    patch(0x00, 0x6845);
    patch(0x00, 0x6846);
    patch(0x00, 0x8455);
    patch(0x00, 0x8456);
    patch(0x2d, 0x8457);
    patch(0x48, 0x8458);
    patch(0x00, 0x8459);
    patch(0x00, 0x845a);
 
    fclose(mod);
}
SHAR_EOF
if test 748 -ne "`wc -c hp11-patch.c`"
then
echo shar: error transmitting hp11-patch.c '(should have been 748 characters)'
fi
#    End of shell archive
exit 0