add hinting for user side compiler
This commit is contained in:
parent
4c604c8a47
commit
ddd2057ff4
3 changed files with 4 additions and 4 deletions
|
@ -2,7 +2,7 @@
|
|||
|
||||
;;Screen print. Draws a pixel at a specified position.
|
||||
;; Destroys A X Y
|
||||
.proc pixel_draw; Draws a pixel at [Y = FB , X = FC, FD]. Y = 0 - 320, X= 0 - 200
|
||||
.proc pixel_draw;; Draws a pixel at [Y = FB , X = FC, FD]. Y = 0 - 320, X= 0 - 200
|
||||
.include "mem.inc"
|
||||
Bitmap = $4000
|
||||
Bitmap_end = $5F3F
|
||||
|
|
|
@ -4,7 +4,7 @@
|
|||
;; Takes in a PETSKI-code in CODE
|
||||
;; And prints it ON X_pos, Y_pos
|
||||
;; Note that this is the real positions divided by 8
|
||||
.proc char_draw
|
||||
.proc char_draw; user-procedure :clobbers (A Y) :clobbers-arguments (0 3)
|
||||
Character_generator_ROM = $D000
|
||||
Y_pos_offset = $F9 ; 16-bit value (uses F8), reuses from Y_pos
|
||||
X_pos_offset = $FA ; 16-bit value (uses F7)
|
||||
|
@ -24,7 +24,7 @@
|
|||
STA Y_pos
|
||||
|
||||
;;Do arithimatic to know where to read and write bytes.
|
||||
initial:
|
||||
initial:
|
||||
;We first need to clear some memory
|
||||
LDA #$00
|
||||
STA petski_position + 1
|
||||
|
|
|
@ -1,7 +1,7 @@
|
|||
;;; -*- Mode: asm; indent-tabs-mode: t; tab-width: 8 -*-
|
||||
|
||||
;; Subroutine for drawing a filld triangle.
|
||||
.proc triangle
|
||||
.proc triangle; user-procedure :clobbers (A X Y) :clobbers-arguments 6
|
||||
;; It takes in values from A_X, A_Y, B_X, B_Y C_X, C_Y, see triangle.inc
|
||||
.include "triangle.inc"
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue