Rev 291 | Details | Compare with Previous | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 380 | ddp | 1 | .EQU TVID_TST_CNT =0 |
| 261 | ddp | 2 | ; |
| 3 | ;-------------------------------------- |
||
| 4 | ; |
||
| 5 | TESTVIDEO: |
||
| 380 | ddp | 6 | GETMEM 1 |
| 7 | |||
| 8 | LDI XL,0 |
||
| 9 | LDI XH,0 |
||
| 10 | CALL SCR_SET_CURSOR |
||
| 11 | LDI DATA,$00 |
||
| 12 | LDI TEMP,$00 |
||
| 13 | LDIW 53*25 |
||
| 14 | CALL SCR_FILLLONG_CHAR_ATTR |
||
| 15 | LDI XL,15 |
||
| 16 | LDI XH,4 |
||
| 17 | CALL SCR_SET_CURSOR |
||
| 18 | LDIZ (MSG_TITLE2*2)+3 |
||
| 19 | CALL SCR_PRINTSTRZ |
||
| 20 | |||
| 21 | T_VID22:MOV DATA,MODE1 |
||
| 22 | ANDI DATA,0B10000000 |
||
| 23 | T_VID21:INC DATA |
||
| 24 | STH TVID_TST_CNT,DATA |
||
| 25 | LDI TEMP,SCR_MODE |
||
| 26 | CALL FPGA_REG |
||
| 261 | ddp | 27 | CALL WAITKEY |
| 28 | CPI DATA,KEY_ESC |
||
| 29 | BREQ T_VID99 |
||
| 380 | ddp | 30 | LDH DATA,TVID_TST_CNT |
| 31 | MOV TEMP,DATA |
||
| 32 | ANDI TEMP,$0F |
||
| 33 | CPI TEMP,6 |
||
| 34 | BRCS T_VID21 |
||
| 35 | RJMP T_VID22 |
||
| 36 | |||
| 37 | T_VID99:MOV DATA,MODE1 |
||
| 38 | ANDI DATA,0B10000000 |
||
| 261 | ddp | 39 | LDI TEMP,SCR_MODE |
| 40 | CALL FPGA_REG |
||
| 380 | ddp | 41 | |
| 42 | FREEMEM 1 |
||
| 261 | ddp | 43 | RET |
| 44 | ; |
||
| 45 | ;-------------------------------------- |
||
| 46 | ; |