read new nonstop follow
91998 8-MAR 20:12  OSK Applications
     RE: cbdemo.lzh (Re: Msg 91990)
     From: MITHELEN     To: AJMLFCO (NR)

The problem seems to be that the file itself (the executable cbdemo) inside
the archive appears to have been damaged BEFORE it was archived. It is the
proper length (according to the size within its header) but the last part
of the file seems to be junk... Frank is working on resubmitting a new
archive, which I will move as soon as I see it is here... I'll also make
sure I do a full extract, and ident this time to make sure everything is OK.
--
Paul Jerkatis
OS-9 Sig Database Manager

-*-

92004 9-MAR 20:46  OSK Applications
     RE: cbdemo.lzh (Re: Msg 91972)
     From: JOHNBAER     To: DBREEDING


   David

> Yeah, I figured the series of E5's was that..  Umm.. what's the diff
> between 208 and 206 - worth changing?

  Lets see if I can get this right :).  There's a version of lzh
on the 6809 side that did things differently and the OSK version
couldn't read the archive so, 207 came to be.  But, the 207 version
would try to read/extract the 6809 version wothout you telling it
to do so.  Well the 208 version has a flag that you can set to
tell 208 to do it if the flag is there.  I think I got this right <g>.

> I did "dump".  Do you have dEd for OSK?  If so, where'd ya get it?  I
> looked here and on CI$ and couldn't find it, would like to have it...

  Check your mail box <g>.  I got that from the ACS bbs a long ago.
I was going nuts trying to remember where I did get that... I did get
back on that bbs just to make sure it was still there.

  Anyway, I'll upload a copy of it here and another one I just found
on chestnut called hexedit.

--
   John -  < Posted with Ved 2.3.1  &  InfoXpress 1.2.0 >

I am Pentium of Borg.  You will be approximated.
Resistance is more or less futile.


-*-

92005 9-MAR 20:46  OSK Applications
     RE: cbdemo.lzh (Re: Msg 91990)
     From: JOHNBAER     To: AJMLFCO (NR)


   Allen,

> How about chopping the file length to the point where the E5's
> start?  Will Lha accept it?

  After unarchiving the file, doing a ident gives the correct file
size but the CRC's is what is trashed with E5E5E5 :).

  So, chopping the file down is no good.  This tells ya that the
file really is bad :(.  I wouldn't want to `fix' it and try running
it <G>.

--
   John -  < Posted with Ved 2.3.1  &  InfoXpress 1.2.0 >

I am Pentium of Borg.  You will be approximated.
Resistance is more or less futile.


-*-

92010 10-MAR 00:24 OSK Applications
     RE: cbdemo.lzh (Re: Msg 92004)
     From: DBREEDING    To: JOHNBAER

 > Lets see if I can get this right :).  There's a version of lzh
 > on the 6809 side that did things differently and the OSK version
 > couldn't read the archive so, 207 came to be.

Would that be the Matt Thompson version?  I know that caused quite a bit
of confusion.. <G>  I have 2.01 and 2.06 for OSK.. So far, I've been
able to extract anything with one or the other.. may need to get one of
the later versions for just in case, I guess..

 >  But, the 207 version
 > would try to read/extract the 6809 version wothout you telling it
 > to do so.  Well the 208 version has a flag that you can set to
 > tell 208 to do it if the flag is there.  I think I got this right <g>.

<Whew!>  Sorry I asked <G>  That sounds a little confusing.

 > > I did "dump".  Do you have dEd for OSK?  If so, where'd ya get it?  I
 > > looked here and on CI$ and couldn't find it, would like to have it...
 >
 > Check your mail box <g>.  I got that from the ACS bbs a long ago.

Done checked, and again, thanks..

 > Anyway, I'll upload a copy of it here and another one I just found
 > on chestnut called hexedit.

Very good.. I consider DEd to be a _very_ useful utility (wanted to
call it an app.. almost is)

                         -- David Breeding --
       CompuServe : 72330,2051              Delphi :  DBREEDING
           ***  Sent via   InfoXpress/OSK - Vr. 1.02   ***

-*-

End of Thread.

-*-

91999 8-MAR 20:52  General Information
     RE: Tymenet/Sprintnet (Re: Msg 91944)
     From: TEDJAEGER    To: REVKAK

 > You can contact SprintNet at 1-800-877-5045, extension 5 and Tymnet at
 > 1-800-336-0149.  They can tell you the nearest node to you from your
 > area code and/or zip code.   Hope this helps.  Keith

 Thanks. Its not so much that I want to know the nearest node as I want
 to see if there's a way to get a local one. I'm tired of LONG DISTANCE
 BILLS!

Bests
---TedJaeger

-*-

92000 9-MAR 01:12  General Information
     RE: Internet IRC (Re: Msg 91976)
     From: CHARLESAM    To: ISC

I found my old V-Term and used that but was unable to connect up with my pals
due to bad timimg. V-Term worked great on the IRC. Thanx again Charlie

-*-

92001 9-MAR 01:21  General Information
     RE: Internet IRC (Re: Msg 91984)
     From: CHARLESAM    To: MMCCLELLAND

I was looking at PCs today at CompUSA and drooling.... I would love to have
a machine that could run MYST. The prices aren't as high as I thought. I even
bought the idiot's guide to MS-DOS and Windows to start getting a head start.
I figure by years end I should have a PC with CD-ROM. That is if I keep
working this Summer. My line of work rins hot and cold. rin=run. In the
mean time my Coco is still good company. I'll probaly keep my basic system
and sell off my backup stuff which is alot. The prices are going down and I
could give someone a good deal on a system. Thanx for the tip... Charlie

-*-

92002 9-MAR 15:36  General Information
     RE: Internet IRC (Re: Msg 92000)
     From: ISC          To: CHARLESAM

> I found my old V-Term and used that but was unable to connect up with my pals
> due to bad timimg. V-Term worked great on the IRC. Thanx again Charlie
>
You're welcome, Charlie.  Have fun on the net.

Bill

-*-

92006 9-MAR 22:16  General Information
     RE: Internet IRC (Re: Msg 91984)
     From: DSRTFOX      To: MMCCLELLAND

The PC HAS caught up in the DTP arena! Long-time DTP houses will continue
using and preferring Macs more out of habit or current investments than
anything else. But if you're familiar with PageMaker on the Mac, you can run
it equally well on the PC.. I cross between platforms all the time!!


Francis (Frank) Swygert
Publisher, "the world of 68' micros" Magazine

`[1;30;40mRainbow V 1.11 for Delphi - Registered

-*-

92009 10-MAR 00:23 General Information
     RE: Internet IRC (Re: Msg 92001)
     From: DBREEDING    To: CHARLESAM

 > I was looking at PCs today at CompUSA and drooling.... I would love to

TRAITOR!!!

 > have a machine that could run MYST. The prices aren't as high as I

No, seriously.. I've seriously thought I'd also like to have a "mainstream"
system to run all that cool stuff, but in final analysis, haven't yet
been able to justify purchasing one..  Of course, as you said, they're
really getting cheap..

 > thought. I even bought the idiot's guide to MS-DOS and Windows to start
 > getting a head start. I figure by years end I should have a PC with
 > CD-ROM.

A CD-ROM would be the main thing I'd be getting a PC or Mac for.  It's really
fascinating to see what they have done with the graphics and animation.
 > That is if I keep working this Summer. My line of work rins hot
 > and cold.

Tell me about it.. So does mine, although it's been fairly warm for the last
year or better.

 > In the mean time my Coco is still good company. I'll
 > probaly keep my basic system

Can't beat it.  I still have mine set up.. Had been using it for infoxpress
till about a month ago, when I got my OSK copy.

RE: new computers, do you plan on getting an OSK machine?

                         -- David Breeding --
       CompuServe : 72330,2051              Delphi :  DBREEDING
           ***  Sent via   InfoXpress/OSK - Vr. 1.02   ***

-*-

92017 10-MAR 23:51 General Information
     RE: Internet IRC (Re: Msg 92009)
     From: CHARLESAM    To: DBREEDING

I'd like to stay with OSK but none of the 68K machines I've seen have the
speed for CD-ROM graphics like the PCs. If I skimp a little on a monitor,
I could have a pentium 90 or 100 with quad speed CD-ROM for under $3000.
I do believe that I can get OSK for a PC, at least I recall reading that
here. Its still elementary right now. Yeah, I'm a traitor but I held out
a long time. If I consider what I've spent on 3 cocofests and buying thru
mail, I could have had my PC already. Then again I won't have had the fun
of meeting all the good people in the coco community, and sharing at the
Fests. This forum will always be HOME, PC or no PC. Thanx for your input!
Regards Charlie

-*-

92021 11-MAR 01:59 General Information
     RE: Internet IRC (Re: Msg 92017)
     From: DBREEDING    To: CHARLESAM (NR)

 > I'd like to stay with OSK but none of the 68K machines I've seen have the
 > speed for CD-ROM graphics like the PCs. If I skimp a little on a monitor,
 > I could have a pentium 90 or 100 with quad speed CD-ROM for under $3000.

I'd say if you want to go mailorder, you should be able to get it quite a
bit under $3000.  I don't know about quad-speed.. I don't know about the
future, but I've seen a couple of reviews and articles where they say that
as of now, you can't really realize the extra performance from a quad-speed
CD-ROM, but possibly with a high speed Pentium, perhaps it would be worth
the difference.. You might look into it.

RE: skimping on the monitor..  I'd suggest don't.  Go with the very best
you can stand. I think you'll be very glad you did.  I got a 15" monitor
(the cheapest one I could find).. It does very well, has a good display,
but sometimes I wish I had a 17".

 > Yeah, I'm a traitor but I held out
 > a long time. If I consider what I've spent on 3 cocofests and buying thru

I was just kidding about the traitor stuff <G>..  Yes, before I got my OSK
system, I did some serious looking at PC's and Macs.  If you have a specific
need, and must depend on canned software, perhaps it is best to go with one
of the "mainlines"..  I decided that for my purpose, I would be happier with
an OSK machine.  I must admit that I do, on occasion, look wistfully at
a PC doing all that fancy graphics animation, but OTOH, I tire quite
easily of stuff like that, so it would probably be something I would play
with a week or two and then drop it.. so I dunno.

 > Then again I won't have had the fun
 > of meeting all the good people in the coco community, and sharing at the
 > Fests.

That is one of the main reasons that helped me make my decision.


                         -- David Breeding --
       CompuServe : 72330,2051              Delphi :  DBREEDING
           ***  Sent via   InfoXpress/OSK - Vr. 1.02   ***

-*-

92034 12-MAR 07:59 General Information
     RE: Internet IRC (Re: Msg 92021)
     From: JEJONES      To: DBREEDING

 > I'd say if you want to go mailorder, you should be able to get it quite a
 > bit under $3000.  I don't know about quad-speed.. I don't know about the
 > future, but I've seen a couple of reviews and articles where they say
 > that as of now, you can't really realize the extra performance from a
 > quad-speed CD-ROM...

Depends.  "N-tuple speed" CD-ROM drives are really only N times as fast
on large sequential reads.  When you start doing random access, their
advantage falls off fast.

Opinions herein are solely those of their respective authors.

Clipper Chip: Big Brother Inside

-*-

End of Thread.

-*-

92003 9-MAR 20:46  General Information
     coco3 problems
     From: THIB         To: ALL


 Ok.. I have been using my coco3 off and on for 7 years.. the other day I was
having the usual difficulties booting the damn thing
 (locking the HD during boot, etc.) and then the video started messing up
 and reset wouldn't fix it, neither would power down.

 so i figured the thing finally died, and pulled the STILL IN THE BOX spare
from it's storage space..
 Here's where this story get's obscure..
  I wanted the new one to be 512k.. so I pulled the board out of the old
machine, and started looking for the.... ? that I clipped
 per the 512 instalation guide (that I did 10 years ago)
 but don't have now.

 now the questions..

 A) what IS involved with installing 512k on a coco3    and
 B) since the new machine and the old one did the SAME exact thing after
installing the board.. what is the problem with this situation?

 any observations would be appreciated :)

 Andy

-*-

92026 11-MAR 19:31 General Information
     RE: coco3 problems (Re: Msg 92003)
     From: NEALSTEWARD  To: THIB

I had the same thing happen to my system some time ago.  Mine would do
this intermittantly, so I could not figure out if it was the computer,
the MPI or one or more of the paks plugged into the MPI.  Does you
r problem occur without any thing plugged into the bus?  Mine didn't
at first, but then even all by itself it would.  I tried the usual
reseating the GIME, cleaning all the card edges and even swapping
out RAM chips in the 512k upgrade.  It baffled me so much I was about
to give up and buy a Mac.  Well, I ended up buying a new (used) coco3
and MPI from an ex member of our club, installed the 6309 and 512k,
and now the 2 meg upgrade, strapped the IRQ lines in the new MPI
and everything is fine.  I still don7t know what caused the problems.
Oh yeah, did I mention that I even bought a new GIME?
I'm not positive on this, so wait for someone to confirm, but I
THINK you have to clip out C64 and C65 from the coco motherboard
to upgrade to 512k.  I don't have my copy of "Tandy's Little
Wonder" handy, but those numbers stick in my mind as the ones.


-*-

92027 11-MAR 22:33 General Information
     RE: coco3 problems (Re: Msg 92026)
     From: CLTUCKER     To: NEALSTEWARD (NR)

C66 & C65. Remove IC16,IC17,IC18,IC19. Er, just looking at the mod. sheet.
cl

-*-

92028 11-MAR 23:37 General Information
     RE: coco3 problems (Re: Msg 92026)
     From: THIB         To: NEALSTEWARD (NR)

 well....
 A) this "new coco3" was right out of the box, I clipped the capacitors off,
installed the 512, then put it into my Multi pak, and powered up.. same picture
 B) second time the picture showed? up.. it was a lighter shade of black.. and
it stays that way now.. without MPI or any periferals plugged in.

 Andy

-*-

End of Thread.

-*-

92007 9-MAR 22:51  General Information
     RE: Another question about Delphi! (Re: Msg 91975)
     From: PAUL8        To: MITHELEN

On 6-MAR 01:55 MITHELEN said to PAUL8
   N I think the referance is to the ANSI escape sequences at the beginning
   N of the tag lines, that show up as "garbage" characters for those that
   N don't use terminals that recognize ANSI escape sequences (like the ADM-3
   N I am on right now.) These type of escape sequences can really reck
   Nhavoc on certain terminals that don't recognize them (There are one
   Nthat will lock up my adm3, and require me to power cycle it to get it
   Nto work again) --

Thanks for the reply. Unless people start complaining, I will leave things
as they are. I think that ANSI is ok.


`[1;33;41mPaul-Boston visit us we need your money I mean historic Bstn
`[1;33;44mHappy Sailing; Another Day Above Ground

An authority is anyone who guessed right more than once

`[1;35;44mRainbow V 1.12.6 for Delphi - Registered

-*-

92008 10-MAR 00:12 General Information
     SCSI Host Adapter
     From: KSCALES      To: DAVID106

Rick Ulland (RICKULAND) said:
 > Matt  Thompson released both a PD and commercial version  of
 > the  'scsisys'  hard  driver. Works with any disto, lr  tech,  or
 > Kenton.....  allows  specifing  512 or 256 byte  sectors,  has  a
 > cache, etc, etc (more etc in the commercial one, of course).
 > With   a  neat  menu  driven  descriptor  maker,  _and_  OS9
 > formatter  included, it's a very nice package. I believe Northern
 > Xposure carries it?

Yes.  Should support the Quantum 105LPS drive with either the Disto or
Kenton controllers, using 512-byte sectors.  Contact:
  cmckay@northx.isis.org  (IN%"cmckay@northx.isis.org" when using Delphi
                           Internet access)
 or:
  Northern Xposure
  7 Greenboro Crescent
  Ottawa, Ontario
  Canada
  K1T 1W6
  613-736-0329

Price for the registered version is $25.

Regards... / Ken
 --------------------------------------------------------------------------
 Ken Scales   Delphi:KSCALES   Internet:kscales@delphi.com   CIS:74646,2237

-*-

92011 10-MAR 00:51 Applications (6809)
     RE: cronhelp (Re: Msg 91995)
     From: WDTV5        To: RICKULAND

Yup, Murphy has a corrolarry about that no doubt. However, it will still
help here in that it would tripple the available speed thru a null modem
over to the Amiga. I currently make around 650-675 cps either way when
logged into the cable at 9600. I've shipped the latest version of 'pf'
over to the amiga and back about 15 times now in the process of getting
it to compile on both machines. Which I have, it now compiles with
SAS/C 6.51 on the Ami with only two lines in the header of two files
changed! Which I'm fairly proud of, not to mention the CoCo code was
cleaned up quite a bit by the error msgs from SAS/C! Of course its
bigger too. which can't be helped too much unless I wanted to redo
it in asm. Thats someplace less than a -1 priority tho.
Cheers Rick (oh did I miss the $ quote on this card or ??) Gene

-*-

92012 10-MAR 02:49 Telecom (6809)
     RE: infoexpress? (Re: Msg 91928)
     From: GREGL        To: DBREEDING

I guess what I really like most about CW is that it's so easy to copy,
even with horrendous conditions. For example, one night I was having a
CW conversation with a gentleman in Washington state on 10 meters (just
above the CB band). All of a sudden his signal darn near disappeared and,
to make matters worse, the noise level increased heavily. I never would have
been able to hear him voice but we were able to continue the conversation
with CW. Granted, it wasn't easy but we managed. I certainly learned real
quick that it's much easier to copy di dah dit dit in the mud than it is
to copy voice.

Morse code isn't really that hard to learn either. It does take dedication
and a positive attitude, though. The really rough part is trying to increase
speed. Given 30 minutes each day, you can go from 0 to 10 wpm in about two
months. If you're into "instant gratification," you'll never get to 13 wpm.
Honestly, you get stuck at 10 to 11 wpm and you think 13 is impossible no
matter how hard you try. I got stuck at 11 wpm for about a month and couldn't
copy 13 wpm no matter how hard I tried. What was really strange is that
one Sunday afternoon I was copying 11 but falling on my face at 13. The
next day I could copy 13 wpm like I'd been doing it all my life. There are
a few hurdles like that at various speeds. I found the first one at 13 wpm
and the second one at 15 wpm. I'll shatter it eventually and move on to the
next one, which I hear is 18 wpm.

        -- Greg

-*-

92022 11-MAR 01:59 Telecom (6809)
     RE: infoexpress? (Re: Msg 92012)
     From: DBREEDING    To: GREGL

 > I guess what I really like most about CW is that it's so easy to copy,
 > even with horrendous conditions.

Yes, I can see where it would be very useful.  I think it would really
be fun.  Someone said that some of his best times were while he was doing
CW.

 > Morse code isn't really that hard to learn either. It does take
 > dedication and a positive attitude, though. The really rough part is
 > trying to increase speed.

I have a morse thing for my coco.. I got to where I could do a _fair_ job
in copying, maybe 4-5 wpm, but let it slide.  I may try to get going again,
if for nothing else but get my friends to shut up <G>

I missed getting to say hi at Cave City.. I went with a friend, name of
Mike Brown.  He had met you before.. Actually, I thought he understood
I was hoping to meet you, but forgot to specifically tell him to be on
the lookout for you.. on the way back, I mentioned you, he said he thought
he saw you, but didn't think about it at the time.  He said something
about going to E-Town.. If you're there, maybe I can catch you there.


                         -- David Breeding --
       CompuServe : 72330,2051              Delphi :  DBREEDING
           ***  Sent via   InfoXpress/OSK - Vr. 1.02   ***

-*-

92030 12-MAR 00:55 Telecom (6809)
     RE: infoexpress? (Re: Msg 92022)
     From: GREGL        To: DBREEDING

Sorry we missed each other. I wasn't specifically planning to go given the
circumstances at the time. Fortunately I was able to hitch a ride with Greg,
KE4OTT. Mike Brown wouldn't happen to be KM4IY would it? I think we have met
before, but I can't remember where. Perhaps the Cave City hamfest last year?
I rummaged through the callbook (boy there's lots of Michael Browns in it)
and KM4IY sure sounds familiar.

        -- Greg

-*-

92033 12-MAR 01:52 Telecom (6809)
     RE: infoexpress? (Re: Msg 92030)
     From: DBREEDING    To: GREGL (NR)

 > Sorry we missed each other. I wasn't specifically planning to go given
 > the circumstances at the time. Fortunately I was able to hitch a ride with
 > Greg, KE4OTT. Mike Brown wouldn't happen to be KM4IY would it? I think we
 > have met before, but I can't remember where. Perhaps the Cave City hamfest
 > last year?

It seems it might have been a few years ago when you met.  I don't know his
call letters.. His mailing address is Liberty..  He is a close friend of
Rick Cooper, who publishes CoCo Friends Disk Magazine (CFDM here on Delphi).
BTW.. did you know Rick was planning to hold a mini-cocofest this spring?
(Sat, July 15th.).

Actually, if it hadn't been for Mike, we would have let it slip past had he
not called me.. The other friend had committed himself for the day and
couldn't make it.

 > I rummaged through the callbook (boy there's lots of Michael
 > Browns in it)

Yes, there's a lot of them <G>..
I'll try to get his call letters.. I think he has a repeater going, or is
in the process of setting one up.. I think he is pretty active on the
repeater in Somerset (Pulaski Co.).

                         -- David Breeding --
       CompuServe : 72330,2051              Delphi :  DBREEDING
           ***  Sent via   InfoXpress/OSK - Vr. 1.02   ***

-*-

End of Thread.

-*-

92013 10-MAR 03:05 General Information
     RE: Internet stuff (Re: Msg 91981)
     From: GREGL        To: JEVESTAL

Actually, I could use JNOS (which I use for Amateur packet radio) to
retrieve news/mail just as well as the other software. This would log in
with SLIP/PPP, retrieve mail and news using the POP3 and NNTP protocols, and
log off.

What you may be missing is that SLIP/PPP accounts are not a "part" of
Internet (at least not in a real sense of having a permanent connection)
but it feels like it. There's so much you can do with a SLIP/PPP account
that you can't do with a login account, many times it's easier than using
a login account, and FTP transfers are actually faster. Consider the case
of getting a file by FTP here. First you FTP to the site, browse the
directories, and transfer what you want to your workspace. Now you have to
remember what you got, go to workspace and download it. With FTP on a
SLIP/PPP account, I point/click to transfer files directly to my computer.
No middle man.

As far as software goes, you might check the version of NOS that was ported
to OS-9 to see if it supports SLIP. I know several people in the CoCo mailing
list use it.

        -- Greg

-*-

92014 10-MAR 20:51 Programmers Den
     Programming Question
     From: THETAURUS    To: ALL



         I have picked up Basic09 again and started resuming work on my
       Delete-like Protector utility I have been working on, and once
       again I'm back with more trouble. First off in this version I'm
       working on, I've changed it around a bit. The big change is that,
       in the original version I used the option switch '-s' after the
       command name to indicate that the filenames would be coming from
       Std-Input(keyboard), and the '-f' option to tell the program that
       the filenames to protect from being deleted were coming from a
       file(such as one created using a command like "ls!filelist" for
       instance). My original problem after that was that if input was
       being piped in, I needed to set up a syscall so that my program
       would know to expect it. To make things simpler, I acted on advice
       given to me back when I was getting help on this the last time,
       and got rid of the '-s' and '-f' options and kept just the '-
       ?'(for help screen) and '-v'(to make it verify before deleting).

         What I did was set up the program so that that it would run the
       syscall after starting and would determine what the std_input
       device was(RBF,SCF,Pipe) and then set it up to act accordingly for
       each, which does come across as much easier. Now I have one
       problem. Everytime I run it, I get an error 55 which is a
       'subscript out of range' error. I get it at the 'IF' statement
       that tries to determine if the std_input is from the
       keyboard(SCF). The statement is:

         'If Optbuffer(pd_dtp)=0 then'...

         I set the variable 'pd_dtp' at $00 which is where the call
       begins reading in the PD.Opt section, and am wondering if this is
       something real trivial. I can't seem to get it figured out :-(

         The (long) source listing is going to be in the next message if
       anyone wants to check it over and see what I missed.


         Thanks...
         >Chris<

-*-

92015 10-MAR 20:53 Programmers Den
     RE: Programming Question (Re: Msg 92014)
     From: THETAURUS    To: THETAURUS


?PROCEDURE begmain2
(* This is the Dimensioning section.
DIM count,count1,count2:INTEGER
DIM path,diskpath:BYTE
DIM length:BYTE
DIM strpos:INTEGER
DIM temp:STRING[29]
DIM entry(32):BYTE
DIM i:INTEGER \(* new variable *)
DIM match:BOOLEAN \(* new variable *)
DIM verify:BOOLEAN
(* DIM opt:STRING[2]
(* DIM vopt:STRING[1]
TYPE registers=cc,a,b,dp:BYTE; x,y,u:INTEGER
DIM regs:registers
DIM optbuffer(32):BYTE
PARAM option1:STRING[3]
PARAM option2:STRING[29]
DIM name,newname(100):STRING[29]
DIM yesno:STRING[1]
DIM errnum:INTEGER
DIM pd_dtp:BYTE
DIM filename:STRING

(* --------------------------------------
ON ERROR GOTO 500
(* --------------------------------------
count:=0 \count1:=0 \count2:=0
length:=29
name:=""
regs.a:=0
regs.b:=$00
regs.x:=ADDR(optbuffer)
regs.y=1
pd_dtp:=$00
FOR count:=1 TO 100
newname(count)=""
NEXT count
(* opt=LEFT$(option1,2)
(* vopt=RIGHT$(option1,1)
IF option1="-V" OR option1="-v" THEN
verify=TRUE
ELSE
verify=FALSE
ENDIF
PRINT CHR$(12)
BASE 1

(* --------------------------------------
(* This is where we read the parameters
(* options

IF option1="-?" THEN
RUN intro
END
ENDIF
(* --------------------------------------

RUN syscall($8D,regs)

IF option1="" THEN
IF optbuffer(pd_dtp)=0 THEN
FOR count=1 TO 100
INPUT "Filename>",name
EXITIF name="" THEN
GOSUB 20
ENDEXIT
GOSUB 30
newname(count)=temp
NEXT count
ENDIF
ENDIF

IF optbuffer(pd_dtp)=1 THEN
OPEN #diskpath,option2:READ
WHILE EOF(#diskpath)=FALSE DO
FOR count=1 TO 100
READ #diskpath,name
EXITIF EOF(#diskpath)=TRUE THEN
GOSUB 30
newname(count):=temp
CLOSE #diskpath
GOSUB 20
ENDEXIT
GOSUB 30
newname(count):=temp
NEXT count
ENDWHILE
CLOSE #diskpath
ENDIF

IF optbuffer(pd_dtp)=2 THEN
FOR count=1 TO 100
READ #0,name
EXITIF name="" OR EOF(#0)=TRUE THEN
GOSUB 20
ENDEXIT
GOSUB 30
newname(count)=temp
NEXT count
ENDIF

20 (* The Main  delete and Protect procedure
PRINT CHR$(12)
PRINT "Preparing to del all files in directory except:"
FOR count1:=1 TO count
PRINT newname(count1)
NEXT count1
OPEN #path,".":UPDATE+DIR
SEEK #path,64
PRINT "=========================================================================

======="
WHILE NOT(EOF(#path)) DO
25 count1=count1+1

GET #path,entry
IF entry(1)>0 THEN
name:=""

FOR count2:=1 TO 29
EXITIF entry(count2)>127 THEN
REM last character in filename
name:=name+CHR$(entry(count2)-128)
ENDEXIT
name:=name+CHR$(entry(count2))
NEXT count2

(* Convert files to capitals
GOSUB 30
name:=temp

match:=FALSE
FOR i:=1 TO count
match:=match OR name=newname(i)
EXITIF match THEN
REM found match
ENDEXIT
NEXT i
PRINT
IF match THEN
PRINT name; " is protected."
ELSE
IF verify=TRUE THEN
PRINT "Deleting: "; name
INPUT "Are You Sure? ",yesno
IF yesno="Y" OR yesno="y" THEN
(* DELETE name
PRINT name; "  deleted"
ENDIF
ENDIF
EXITIF verify THEN
ENDEXIT
(* DELETE name
PRINT name; " deleted"
ENDIF
ENDIF
ENDWHILE
CLOSE #path
PRINT "=========================================================================

======="
END

30 (* To uppercase routine
temp:=""
strpos:=1

REPEAT
IF ASC(MID$(name,strpos,1))>96 AND ASC(MID$(name,strpos,1))<123 THEN

temp=temp+CHR$(ASC(MID$(name,strpos,1))-32)
ELSE
temp=temp+MID$(name,strpos,1)
ENDIF
strpos=strpos+1
UNTIL strpos>LEN(name)
RETURN
(* --------------------------------------
500 (* Error Trapping Routine
errnum:=ERR
IF errnum=214 THEN
PRINT "No Permission.."; name; " bypassed."
GOSUB 25
ENDIF

IF errnum=211 THEN
PRINT "End of file..."
GOSUB 25
ENDIF

PRINT "Error Number: "; errnum
END

-*-

92016 10-MAR 21:45 Programmers Den
     RE: Programming Question (Re: Msg 92015)
     From: RANDYKWILSON To: THETAURUS

Chris,

 The offsets into data structures given in the OS9 manuals are just that;
offsets.
They are not the element number. The difference is a bit subtle. It's much
like the difference between the Basic BASE 0 and BASE 1 structures.  BASE 1
means the first element is #1. BASE 0 means the first element is #0, or more
correctly, an offset of 0 from the start.

 And this is exactly what is tripping you up. You explicitely set BASE 1,
then use an offset of 0 (pd_dtp) when accessing the options array. The correct
answer is to use BASE 0, but this may cause hassles elsewhere in the code
(haven't looked close yet). The EASY answer is to set pd_dtp to 1.


   Randy

-*-

End of Thread.

-*-

92018 10-MAR 23:58 General Information
     IDE HDs
     From: CHARLESAM    To: ALL

Can anyone tell me if there is a driver for Coco OS-9 to enable use of an
IDE HD? They sell for approx $259 for a half of gigabyte drive. Of course
I need an interface too. Can it be done?       ... Charlie

-*-

92019 11-MAR 00:47 General Information
     RE: IDE HDs (Re: Msg 92018)
     From: RANDYKWILSON To: CHARLESAM (NR)

Charlie,

 I would think, based on the B&B, that an IDE interface and drive can be done.
But I would also guess that the few people capable of the feat will not be
interested. There just is not enough market left.

 On the other side of the coin, SCSI drivers and interfaces are available,
and SCSI drives aren't that much more than IDE. I just picked up a 730megger
for $300.

  Randy

-*-

92025 11-MAR 15:18 General Information
     RE: IDE HDs (Re: Msg 92019)
     From: ISC          To: RANDYKWILSON

> Charlie,
>
>  I would think, based on the B&B, that an IDE interface and drive can be done.

> But I would also guess that the few people capable of the feat will not be
> interested. There just is not enough market left.
>
>  On the other side of the coin, SCSI drivers and interfaces are available,
> and SCSI drives aren't that much more than IDE. I just picked up a 730megger
> for $300.
>
>   Randy
>
Randy,

I want to add my 2 cents to your post and say that, due to its flexibility,
SCSI will soon be the standard interface in the computer world.

Bill

-*-

End of Thread.

-*-

92020 11-MAR 01:16 OSK Applications
     RE: BStart.a (Re: Msg 91983)
     From: DBREEDING    To: VAXELF

John,

Here's something you might try.. What you would probably want to do would
be to make a "bstart.a", much similar in approach to "cstart.a".  Here's
a thing I came up with.  I don't know if it's accurate or not.  If you want,
and are really interested, you might play around with it and see if you
can get anything going.  I'm not sure if this approach will work or not,
but I feel something like this is what you would need to do.. This might
need to be corrected some, I just did it quickly, and not having Basic,
can't test it.  See what you can do with it.  As I said, it's something
I threw together in a hurry.

---------------------- cut here -------------------

 use /dd/defs/oskdefs.d

Edit equ 1
Stk equ 0

 psect bstart_a,(Sbrtn<<8)!Objct,(ReEnt<<8)!1,Edit,Stk,_cstart

* If you use the standard library modules, you will have to fake the
* "data area" and fake some of the global variables, "errno" for one, and
* maybe some more.. if you compile and get unresolved refs for any of the
* variables defined in cstart.a you'll have to define them.. Ummmm, just
* thought of something, if you allow stackchecking, you'll have to do
* something about the stack checking stuff.. define these variables, also,
* and maybe a fake stackcheck routine..  Might be easier to always compile
* without stackchecking..

* You might want to define your "a6" offsets here.
* NOTE: Since these are defined outside a "vsect", they are not data

 org 0

 ds.l Your "link a6,#0" position

* Heres's a trick to do if you want to use the standard LIB's

errno: ds.l 1 Fake errno (or you might be able to use this for error checking)

* Might need to define other standard global variables, too


_cstart:
* Make space for fake "errno"  You might need some other globals
* here, also.
 subq.l #4,sp

 link a6,#0 Need to point "a6" to fake "data" area

* Now call your "main". You don't have to call it main, I'd
* call it bmain (as below).  Note, argc and argv don't apply
 bsr bmain

 unlk a6 Restore a6 & sp
 addq.l #4,sp Restore stack to original
 rts

 endsect

--------------------- cut here ----------------------

Now, all your variables will be passed as parameters.

You may need to check how Basic passes parameters.  In 6809 Basic,
you have starting at the bottom of the stack,  PCount, addr(p1), len(p1),
addr(p2),len(p2), etc.   If this is true, then you will have

 bmain( pcount, p1addr, /* anything that was passed in a register and
                            not stacked. */

    a6link, bstartreturn,
     p1len, p2addr, p2len, p3addr, p3len... etc)

Otherwise, you need to omit the p?len, I'd guess

the len's, if applicable, would be int's, the addr's would be char *
or int *, depending on your app.

-*-

92023 11-MAR 11:29 General Information
     Space Shuttle
     From: VILLARREAL   To: ALL

If you want to find out what's happening with the Space Shuttle Endeavour's
journey, check out Astro-2 on the world-wide web.

http://astro-2.msfc.nasa.gov



-*-

92031 12-MAR 00:58 General Information
     RE: Space Shuttle (Re: Msg 92023)
     From: GREGL        To: VILLARREAL (NR)

If you have a scanner or 2 meter amateur radio, listen to 144.910, 144.930,
144.950, 144.970 and 144.990 for voice communications from the space shuttle.
NASA has planned a lot of voice contacts with schools around the country
(along with several overseas) this time around.

        -- Greg

-*-

End of Thread.

-*-

92024 11-MAR 12:00 General Information
     RE: Going to the FEST! (Re: Msg 91964)
     From: DISTO        To: MODEL299 (NR)

I have one with your name on it! -Tony.

-*-

92029 12-MAR 00:02 General Information
     RE: SCSI Host Adapter (Re: Msg 91970)
     From: VE3DAC       To: DAVID106 (NR)

DAVID106> Do you happen to know their address and/or phone number?
DAVID106> I'm surprised anyone still markets anything for the CoCo's,
DAVID106> really.

Hi Dave,
   Are you sure that this should have come my way?  I don't have the greatest
memory at times <G>.  Anyway I see a few answers about Disto so that you
should get you off and running.  I don't have any SCSI stuff but it seems to
me there is a SCSI driver around that copes with the 256 to 512 conversion
for new Hard drives.
Luck


Merv Curley
Deposited with Delphi  03/08/95 at 9:39pm

* ODN Ver 1.30 Beta - Delphi Navigator for OS/2 *

-*-

92032 12-MAR 01:41 OSK Applications
     RE: Get/Put (Re: Msg 91954)
     From: LARRYOLSON   To: JOELHEGBERG


   Joel,

 > I'm sort of working on a game right now (not Pacman <grin>)
 > and I've been using my Mac to make/edit sound effects.

   Great, I can't wait to see what your working on. I also hate to say it
   but I will probably be going over to use my brother's ms-dos machine to
   come up with the sounds. He owes me anyway, I just got done writing a
   super-duper golf tournament scheduleing program for him. I had written
   one for him a few years ago, but it was hardcoded for 16 players and
   4 rounds. This year he says he needs one for 20 players 5 rounds, so
   this time I wrote the program to be flexible as far as players and rounds,
   so I won't have to do it again.

 > Definitely keyboard!  (I've never had any luck with my joystick port on
 > the MM/1.)  Keyboard would be ideal, since the newest Windio (the one
 > Boisy uploaded recently to the database here) supports a _gs_keysns()
 > call to detect if the arrow keys are pressed.  I think the information
 > on the call may be in the docs included with the update.  If not, let me
 > know and I'll locate them for you.

   Ok, I'll plan on the keyboard being an option, now I need some pointers
   on how to do it. When any key is pressed on the keyboard, is an event
   generated ? Would I use _ev_signal(), or just check _gs_rdy(), or set
   up an intercept() ? The new _gs_keysns(), does it support all the keys
   or just the number pad keys ?
       Lots of questions....

   Larry



-*-

92035 12-MAR 09:47 General Information
     Pentium SNAFU
     From: TEDJAEGER    To: ALL


Hi All.
        My home includes an IBM clone along with my MM1. Thought I'd
share the fact that the clone had the bugged Pentium so I called to
get a replacement. The new chip came about a week ago and after installing
it, I find that my PC won't even pass its boot up self test. Switched
old and new chips four times. Consistent results--either I live with
the FPU error or its nobody is home when the power switch is flipped.
I have both my MM1 and clone play a WAV file at bootup which is my son
telling the "You know why Intel didnt call the Pentium the 586...." joke.
Of course, I had to phone Intel to report the problem with the new chip,
and, of course, the Intel guy wanted some info on my system which required
me to boot up..... He didn't laugh.

Bests
---TedJaeger

-*-


FORUM>Reply, Add, Read, "?" or Exit> 