[A83] Re: Text problem
[Prev][Next][Index][Thread]
[A83] Re: Text problem
#DEFINE Text(xx,yy,zzzz) ld hl, (yy*256)+xx) \ ld (pencol),hl \ ld hl,zzzz
\ bcall(_vputs)
then just use Text(4,7,String1)
Haven't tested it out though...
>From: "Stephen Watson" <fif_freak00@hotmail.com>
>Reply-To: assembly-83@lists.ticalc.org
>To: assembly-83@lists.ticalc.org
>Subject: [A83] Text problem
>Date: Wed, 12 Sep 2001 17:44:43 -0700
>MIME-Version: 1.0
>X-Originating-IP: [24.177.209.153]
>Received: from [195.67.128.9] by hotmail.com (3.2) with ESMTP id
>MHotMailBD694C83007C4004374FC343800908380; Wed, 12 Sep 2001 17:45:00 -0700
>Received: from towerguard. (mx-1.sollentuna.net [195.67.128.9])by
>mx-1.sollentuna.net (Postfix) with ESMTPid 7AE751802F; Thu, 13 Sep 2001
>02:44:47 +0200 (CEST)
>Received: with LISTAR (v1.0.0; list assembly-83); Thu, 13 Sep 2001 02:44:47
>+0200 (CEST)
>Received: from hotmail.com (f265.law10.hotmail.com [64.4.14.140])by
>mx-1.sollentuna.net (Postfix) with ESMTP id E748818029for
><assembly-83@lists.ticalc.org>; Thu, 13 Sep 2001 02:44:45 +0200 (CEST)
>Received: from mail pickup service by hotmail.com with Microsoft SMTPSVC;
>Wed, 12 Sep 2001 17:44:44 -0700
>Received: from 24.177.209.153 by lw10fd.law10.hotmail.msn.com with
>HTTP;Thu, 13 Sep 2001 00:44:43 GMT
>From assembly-83-bounce@lists.ticalc.org Wed, 12 Sep 2001 17:46:45 -0700
>Delivered-To: lists.ticalc-assembly-83@mx-1.sollentuna.net
>Message-ID: <F265bwZR9HVpx5bCTnY0000d61b@hotmail.com>
>X-OriginalArrivalTime: 13 Sep 2001 00:44:44.0099 (UTC)
>FILETIME=[47CD0130:01C13BED]
>X-listar-version: Listar v1.0.0
>Sender: assembly-83-bounce@lists.ticalc.org
>Errors-To: assembly-83-bounce@lists.ticalc.org
>X-original-sender: fif_freak00@hotmail.com
>Precedence: bulk
>X-list: assembly-83
>
>
>My current project (Pixel 2.0) is off to an OK start. But, when making the
>title screen, not all the text shows up. Please help me out. I have
>provided the code:
>
>mainmenu:
> bcall(_grbufclr) ; Clear the buffer
> bcall(_clrscrf) ; Clear the display
> ld bc, 0*256+56 ; Load bc with the first coords for a line
> ld de, 95*256+56 ; Load de with the second coords
> ld hl, 1 ; Make sure the ROM call turns pixels ON
> bcall(_darkline) ; Draw the line
> ld hl, 0018 ; Make coords for text
> ld (pencol), hl ; Load the coords to pencol/penrow
> ld hl, menutext ; Load the text
> bcall(_vputs) ; Put the text on the screen
> ld hl, 2028 ; Put on the menu choices
> ld (pencol), hl
> ld hl, mainchoice1
> bcall(_vputs)
> ld hl, 2728
> ld (pencol), hl
> ld hl, mainchoice2
> bcall(_vputs)
> ld hl, 3428
> ld (pencol), hl
> ld hl, mainchoice3
> bcall(_vputs)
> ld hl, 4128
> ld (pencol), hl
> ld hl, mainchoice4
> bcall(_vputs)
> ld hl, 4828
> ld (pencol), hl
> ld hl, mainchoice5
> bcall(_vputs)
> bcall(_getkey)
> ret
>menutext:
> .db "Pixel 2.0 Main Menu",0
>mainchoice1:
> .db "New Pic",0
>mainchoice2:
> .db "Load a Pic",0
>mainchoice3:
> .db "Swap Pics",0
>mainchoice4:
> .db "Help",0
>mainchoice5:
> .db "Quit",0
>.end
>end
>
>_________________________________________________________________
>Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp
>
>
>
_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp