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=0Did you mean PEEK(A+1)=46 ?Gary Weberwww.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
