~m15o/15f

8bd4cce8f12e54f406183479f7157172d31e40d3 — m15o 10 months ago 406db77
restore
2 files changed, 20 insertions(+), 20 deletions(-)

M hello-world.15f
M src/main.c
M hello-world.15f => hello-world.15f +10 -10
@@ 1,17 1,12 @@
: h 104 ; : e 101 ; : l	108 ; : o 111 ;
: w 119 ; : r 114 ; : d 100 ; : _  32 ;

var pos_x 20 pos_x !
var pos_y 10 pos_y !

: POS_X		( -- pos_x )
	pos_x @ ;
: POS_Y		( -- pos_y )
	pos_y @ ;
var pos_x
var pos_y

: TYP		( c -- )
	POS_X POS_Y emit
	POS_X 1 + pos_x ! ;
	pos_x @ pos_y @ emit
	1 pos_x +! ;

: nTYP		( n -- )
	0 do TYP loop ;


@@ 24,4 19,9 @@ var pos_y 10 pos_y !
	d l r o w
	5 nTYP ;

"hello" _ TYP "world"

: on_frame
	( clr screen )
	200 0 0 clr
	"hello" _ TYP "world" ;


M src/main.c => src/main.c +10 -10
@@ 65,12 65,12 @@ int init_sdl() {
  return 1;
}

static void redraw() {
  SDL_UpdateTexture(gTexture, NULL, pixels, SCREEN_WIDTH * sizeof(unsigned int));
  SDL_RenderClear(gRenderer);
  SDL_RenderCopy(gRenderer, gTexture, NULL, &DestR);
  SDL_RenderPresent(gRenderer);
}
/* static void redraw() { */
/*   SDL_UpdateTexture(gTexture, NULL, pixels, SCREEN_WIDTH * sizeof(unsigned int)); */
/*   SDL_RenderClear(gRenderer); */
/*   SDL_RenderCopy(gRenderer, gTexture, NULL, &DestR); */
/*   SDL_RenderPresent(gRenderer); */
/* } */

void printmem() {
  int i;


@@ 82,10 82,10 @@ void printmem() {
}

int main(void) {
	const int fps = 1;
	const int frameDelay = 1000 / fps;
	unsigned long frameStart;
	int frameTime;
	/* const int fps = 1; */
	/* const int frameDelay = 1000 / fps; */
	/* unsigned long frameStart; */
	/* int frameTime; */
	
  errc e;