Path: news1.icaen!news.uiowa.edu!chi-news.cic.net!207.22.81.9!europa.clark.net!howland.erols.net!news.maxwell.syr.edu!news.emi.com!usenet
From: LOSETHECAPITALWORDSedhel@bigfoot.com (Edhel Iaur, Esq.)
Newsgroups: comp.sys.apple2.programmer
Subject: Re: Monitor commands from Assembler Programs?
Date: Mon, 16 Jun 1997 21:47:14 GMT
Organization: US-A2WUG
Lines: 35
Message-ID: <33a5b356.6877311@167.152.149.11>
References: <5o46eu$1avm@info4.rus.uni-stuttgart.de>
NNTP-Posting-Host: dialup1.relex.com
X-Newsreader: Forte Free Agent 1.1/32.230

On 16 Jun 1997 20:07:58 GMT, christoph@gym-schiff.lu.rp.schule.de
(Christoph Heidinger) wrote:

>Has anyone got a hint for me how I can execute the monitor command
>
>4000.6000w
>
>from another program? By the way, the m command would as well be interesting.

From my page
http://www.grin.net/~cturley/USA2WUG/FOUNDING.MEMBERS/HOME.PAGES/EDHEL/PPC.html



Move hi-res page 2 to 1:
     10 REM S.H. LAM TECHNIQUE
     20 C$="2000<4000.6000M":GOSUB 100:END
     100 C$=C$+" N D9C6G":REM SPACE BEFORE AND AFTER N
     110 FOR I=1 TO LEN(C$):POKE 511+I,ASC(MID$(C$,I,1))+128:NEXT
     120 POKE 72,0:CALL-144:RETURN



I remember how this works (amazing, huh?). This routine shoves the
command into the keyboard buffer, and smacks the Monitor so that it
will will scan it :)  The "N" is just the monitor command for
"normal", as in not flashing, and not inverse text.  It is only there
as a separator.
--
| /      /         />___________________       +==Apple // Forever==+
|___  _____  M#M#M#||___________________---__  +-37th Wisest Wizard-+
| \ \  /     #M#M#M||___________________---    +- Edhel Iaur, Esq. -+
| / /  \_/         \>
http://www.grin.net/~cturley/USA2WUG/FOUNDING.MEMBERS/HOME.PAGES/EDHEL
  ***For my correct email address, delete all the capital letters***