Re: A83: Could somebody _please_ check this code soon?
[Prev][Next][Index][Thread]
Re: A83: Could somebody _please_ check this code soon?
Well could SOMEBODY check *my* code?
On Thu, 08 Oct 1998 21:35:50 EDT "Phelan Wolf" <phelanwolf@hotmail.com>
writes:
>
>whoops, wrong code, someone sent sent something with 3 HALTs in it.
>
>-Sorry: Phelan 'Amen' Wolf
>+-------------------------------+
>|"He might not be the brightest |
>|crayon in the box, but we love |
>|him all the same." |
>+-------------------------------+
>
>>What are you talking about? There are no halts here.
>>
>>On Wed, 07 Oct 1998 16:40:13 EDT "Phelan Wolf"
><phelanwolf@hotmail.com>
>>writes:
>>>
>>>i believe it is the HALTs, I think you need to di, or something (not
>
>>>sure, only thing i didn't know, the rest looked fine).
>>>
>>>-Phelan 'Amen' Wolf
>>>
>>>>I would like to know why this code freezes my calc. It is designed
>
>>>to
>>>>return the legnth of a stirng into MaxXCoord. This should be a
>>>baically
>>>>1-size-fits-all routine, but it doesn't work for me. Just so your
>
>>>sure,
>>>>this has no TASM errors as it is.
>>>>
>>>> Thanks,
>>>> Alan
>>>>
>>>><<<<<<<<<Code Start>>>>>>>>>
>>>>
>>>> ld de,Message
>>>> ld a,0
>>>>GetLenLoop:
>>>> push af
>>>> ld a,(de)
>>>> cp 0
>>>> jr z,ContInit
>>>> ld l,a
>>>> ld h,0
>>>> add hl,hl
>>>> add hl,hl
>>>> add hl,hl
>>>> push de
>>>> call _sfont_len
>>>> pop de
>>>> pop af
>>>> add a,b
>>>> inc de
>>>> jr GetLenLoop
>>>>
>>>>ContInit:
>>>> pop af
>>>> ld b,a
>>>> ld a,95
>>>> sub b
>>>> ld (MaxXCoord),a
>>>>___________________________________________________________________
>>>>You don't need to buy Internet access to use free Internet e-mail.
>>>>Get completely free e-mail from Juno at http://www.juno.com
>>>>or call Juno at (800) 654-JUNO [654-5866]
>>>>
>>>
>>>
>>>______________________________________________________
>>>Get Your Private, Free Email at http://www.hotmail.com
>>>
>>
>>___________________________________________________________________
>>You don't need to buy Internet access to use free Internet e-mail.
>>Get completely free e-mail from Juno at http://www.juno.com
>>or call Juno at (800) 654-JUNO [654-5866]
>>
>
>
>______________________________________________________
>Get Your Private, Free Email at http://www.hotmail.com
>
___________________________________________________________________
You don't need to buy Internet access to use free Internet e-mail.
Get completely free e-mail from Juno at http://www.juno.com
or call Juno at (800) 654-JUNO [654-5866]