Actually I think this would be the conditional statement that you would want:
IF PEEK(A)=195 AND PEEK(A+5)=46 THEN AP=1 ELSE AP=0 That actually would identify if AP is in memory, with the JMP instruction at the start and the '.' at the +5 offset right in the middle of the version string. On Wed, Feb 15, 2023 at 2:48 PM gary <[email protected]> wrote: > I'm having trouble with understanding how the conditional in this > statement would ever evaluate to true: > > IF PEEK(A)=195 AND PEEK(A)=46 THEN AP=1 ELSE AP=0 > > Did you mean PEEK(A+1)=46 ? > > Gary Weber > www.web8201.com > > > > -------- Original message -------- > From: B 9 <[email protected]> > Date: 2/13/23 11:51 PM (GMT-07:00) > To: [email protected] > Subject: Re: [M100] Need a beta tester > > I am working on updating the ap_doc.do file with AsciiPixel image >> encoding documentation, but it is a bit involved and is taking some time to >> update. >> > > Hey Ken, I know you're in the middle of updating the documentation, but I > figured I might as well share the minor changes I made to ap_doc.do. Mainly > I corrected the instructions for the Tandy 200, but I also fixed the mouse > cursor ascii art, and added a section on how to detect if AsciiPixels is > available. > > Here's the patch: > > --- ap_doc.txt~ 2023-02-13 21:14:40.395371132 -0800+++ ap_doc.txt > 2023-02-13 22:22:58.771620379 -0800@@ -5,8 +5,8 @@ > /_/ \_\___/\___|_|_||_| |_/_/\_\___|_|___/ > > - Version 1.0- Copyright 2015, Ken Pettit+ Version > 1.0.1+ Copyright 2023, Ken Pettit > All rights reserved. > > @@ -19,7 +19,7 @@ > The library is distributed as a standard .CO file that can be loaded > to the portable and installed using the LOADM BASIC instruction. Once > installed, the library is accessed by making CALL instructions to the-base > entry address (value depends on M100/T102 vs T200), passing in +base entry > address (value is the same on M100/T102 and T200), passing in > arguments in the A and HL registers to indicate the desired action. > > Services currently provided by AP include:@@ -44,12 +44,21 @@ > 2. Enter basic and execute the "CLEAR" command to move HIMEM so > there is room to load ASCPIX: > - - Model 100/102: clear 256,58000- - Model 200: > clear 256,58000+ clear 256,58000 > > 3. Still from BASIC, load the CO: > - loadm "ASCPIX"+ - Model 100/102: loadm "ASCPIX"+ > - Model 200: loadm "ASCPX2"++++DETECTING+=========+ To detect > if ASCPIX has been loaded, use this code:++ A=58000+ IF > PEEK(A)=195 AND PEEK(A)=46 THEN AP=1 ELSE AP=0 > > > CALLING@@ -106,8 +115,8 @@ > > |\ |\ |\ > | \ | \ | \- | \ |. \ > |_.'- |__/ \\ \\+ |/^` |_.' > | \+ \\ \\ |__/ > > Cursor 0 Cursor 1 Cursor 2 > > Or, see the attached file. > > —b9 > >
