A83: Date: Fri, 9 Jun 2000 18:33:31 +0200

[Prev][Next][Index][Thread]

A83: Date: Fri, 9 Jun 2000 18:33:31 +0200

Does someone know a better solution to make the screen black ? I've seen the game Penguins. At the beginning, the screen blinks. It could be interessant for my program. How does it work ?
 
My solution to make the screen black :
 
.NOLIST
#define end .end
#define END .end
#define equ .equ
#define EQU .equ
#include "ti83asm.inc"
#include "tokens.inc"
.LIST
.org 9327h
 
         call _clrLCDfull
         ld bc,0
         ld de,95*256
         ld h,1 
 
line:
         call _iline
         inc c
         inc e
         ld a,e
         cp 63
         jp nz,line
         set textinverse,(iy+textflags)
         ld hl,10
         ld (pencol),hl
         ld (penrow),hl
         ld hl,text
         call _vputs
         ret
 
text:
         .db "Hello !!",0
 
.end
END
 
 
Thanks
 
Ti-83
 
Le monde de la TI-83
http://www.ifrance.com/ti-83
ti-83@libertysurf.fr
Follow-Ups: