# HG changeset patch # User boisy # Date 1079542321 0 # Node ID 82200a2c5721c1006c223ec0b024bede9b841a83 # Parent c1ea211c5750b8bd5ff5bb342e065c4861798eed Added mpi utility diff -r c1ea211c5750 -r 82200a2c5721 level1/ChangeLog --- a/level1/ChangeLog Thu Feb 19 03:24:41 2004 +0000 +++ b/level1/ChangeLog Wed Mar 17 16:52:01 2004 +0000 @@ -1,4 +1,5 @@ NitrOS-9/6809 Level 1 V03.02.01: +- The mpi utility has been added to the CMDS directory. - The dmode utility has been updated. - Shell+ has been backported and is now the default shell for Level 1. - vrn has been backported and the nil descriptor now requires vrn. diff -r c1ea211c5750 -r 82200a2c5721 level1/cmds/makefile --- a/level1/cmds/makefile Thu Feb 19 03:24:41 2004 +0000 +++ b/level1/cmds/makefile Wed Mar 17 16:52:01 2004 +0000 @@ -9,7 +9,7 @@ date dcheck debug ded deiniz del deldir devs dir disasm \ display dmode dsave dump echo edit error exbin exmode format \ free grfo help ident iniz irqs link list load login makdir \ - mdir merge mfree os9gen padrom park prompt printerr procs pwd pxd \ + mdir merge mfree mpi os9gen padrom park prompt printerr procs pwd pxd \ rename runb save setime shellplus shell_21 sleep \ tee tmode touch tsmon tuneport unlink verify xmode SUBS = gfx inkey syscall diff -r c1ea211c5750 -r 82200a2c5721 level1/cmds/mpi.asm --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/level1/cmds/mpi.asm Wed Mar 17 16:52:01 2004 +0000 @@ -0,0 +1,63 @@ +******************************************************************** +* mpi - Determines if a Multi-Pak Interface is present +* +* $Id$ +* +* Edt/Rev YYYY/MM/DD Modified by +* Comment +* ------------------------------------------------------------------ +* 1 2004/03/16 Rodney Hamilton +* Created. + + nam mpi + ttl Determines if a Multi-Pak is present + + ifp1 + use defsfile + use rbfdefs + endc + +tylg set Prgrm+Objct +atrv set ReEnt+rev +rev set $00 +edition set 1 + + mod eom,name,tylg,atrv,start,size + + org 0 + rmb 200 +size equ . + +name fcs /mpi/ + fcb edition + +no fcc "No " +mpi fcc "MPI found" + fcb C$CR + +start equ * + tfr cc,a + pshs a + ldx #$FF7F + lda #$CC + orcc #IntMasks + eora ,x + sta ,x + cmpa ,x + puls a + tfr a,cc + beq is_mpi + leax