Effectus 0.5 : PROC TEST=*(BYTE CURSOR,BACK,BORDER,X,Y,UPDOWN)

[funkheld]

Hi good afternoon.

what do the last 3 lines in ASM source mean?

thank you.
greeting

 

 $A5 $A5 $8D 755  ; CHARACTERS UPSIDE DOWN?    >>??????
 $A5 $A3 $8D 85 0  ; COLUMN FOR TEXT >>????
 $A5 $A4 $8D 84 0  ; ROW FOR TEXT >>???

 

PROC TEST=*(BYTE CURSOR,BACK,BORDER,X,Y,UPDOWN)
[
 $8E 710  ; BACKGROUND COLOR  >> STX
 $8C 712  ; BORDER COLOR >> STY
 $8D 752  ; CURSOR VISIBILITY  >> STA
 $A5 $A5 $8D 755  ; CHARACTERS UPSIDE DOWN?    >>??????
 $A5 $A3 $8D 85 0  ; COLUMN FOR TEXT >>????
 $A5 $A4 $8D 84 0  ; ROW FOR TEXT >>???
 $60]  >> RTS

 

[zbyti]

1. thank you for stopped asking that kind of questions in Effectus bug/suggestion thread.
2. this is barely (ST-AXY, $Ax) related question to the Effectus it's rather ML question
3. read the comments in this code :]

 

for example: 

$A5 $A5 $8D 755 --> Poke(755,Peek($A5))

Edited July 5, 2020 by zbyti
typo

[funkheld]

PROC TEST=*(BYTE CURSOR,BACK,BORDER,X,Y,UPDOWN)

and this:

$A5 $A3 $8D 85 0  ; COLUMN FOR TEXT >>????
$A5 $A4 $8D 84 0  ; ROW FOR TEXT >>???

 

thanks

 

[zbyti]

1 hour ago, funkheld said:

PROC TEST=*(BYTE CURSOR,BACK,BORDER,X,Y,UPDOWN)

and this:

$A5 $A3 $8D 85 0  ; COLUMN FOR TEXT >>????
$A5 $A4 $8D 84 0  ; ROW FOR TEXT >>???

 

thanks

 

analogously :]

[funkheld]

poke(85,peek($A3))

poke(84,peek($A4))

 

why is the "0" ?

 

greeting

[StickJock]

Opcode $8D is an absolute mode STA, so it takes a 2-byte operand. In this case, the 0 is the high byte of the destination address. This could be optimized to detect an address of <256 and use a zero page write (opcode $85).

 

[funkheld]

hello thanks for the info.

 

greeting