Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-06-20 17:29:28 +00:00
Code Issues Projects Releases Wiki Activity

tfv: start converting text generation

Browse Source
This commit is contained in:
Vince Weaver 2017-09-19 00:26:38 -04:00
parent 9941ebcae8
commit df7b4fb5d7
4 changed files with 69 additions and 53 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

82
gr-sim/tfv_battle.c
View File

@ -61,50 +61,64 @@ int do_battle(void) {
int tfv_x=34; int tfv_x=34;
home(); // home();
gr(); // gr();
basic_htab(1);
basic_vtab(22);
basic_normal();
basic_print("KILLER CRAB");
basic_htab(27); vtab(22);
basic_vtab(21); htab(1);
basic_print("HP"); move_cursor();
print("KILLER CRAB");
basic_htab(34); vtab(21);
basic_vtab(21); htab(27);
basic_print("LIMIT"); move_cursor();
print("HP");
basic_htab(15); vtab(21);
basic_vtab(22); htab(34);
basic_print("DEATER"); move_cursor();
print("LIMIT");
basic_htab(24); vtab(22);
basic_vtab(22); htab(15);
move_cursor();
print("DEATER");
vtab(22);
htab(24);
move_cursor();
print_byte(hp); print_byte(hp);
basic_print("/"); print("/");
print_byte(max_hp); print_byte(max_hp);
basic_htab(34); ram[COLOR]=0x20;
basic_vtab(22); hlin_double(ram[DRAW_PAGE],33,33+limit,42);
basic_inverse();
for(i=0;i<limit;i++) {
basic_print(" ");
}
basic_normal();
for(i=limit;i<5;i++) {
basic_print(" ");
}
basic_inverse(); // basic_htab(34);
for(i=21;i<25;i++) { // basic_vtab(22);
basic_vtab(i); // basic_inverse();
basic_htab(13); // for(i=0;i<limit;i++) {
basic_print(" "); // basic_print(" ");
// }
// basic_normal();
// for(i=limit;i<5;i++) {
// basic_print(" ");
// }
ram[COLOR]=0xa0;
hlin_double_continue(5-limit);
ram[COLOR]=0x20;
// basic_inverse();
for(i=40;i<50;i+=2) {
hlin_double(ram[DRAW_PAGE],12,12,i);
// basic_vtab(i);
// basic_htab(13);
// basic_print(" ");
} }
basic_normal(); //basic_normal();
while(1) { while(1) {

35
gr-sim/tfv_info.c
View File

@ -16,13 +16,14 @@ void game_over(void) {
/* Make a box around it? */ /* Make a box around it? */
basic_htab(15); vtab(12);
basic_vtab(12); htab(15);
basic_print("GAME OVER"); move_cursor();
print("GAME OVER");
/* play the GROAN sound? */ /* play the GROAN sound? */
grsim_update(); page_flip();
repeat_until_keypressed(); repeat_until_keypressed();
} }
@ -31,15 +32,17 @@ void print_help(void) {
text(); text();
home(); home();
basic_htab(1); htab(1);
basic_vtab(1); vtab(1);
move_cursor();
basic_print("ARROW KEYS AND WASD MOVE\n"); print("ARROW KEYS AND WASD MOVE\n");
basic_print("SPACE BAR ACTION\n"); print("SPACE BAR ACTION\n");
basic_print("I INVENTORY\n"); print("I INVENTORY\n");
basic_print("M MAP\n"); print("M MAP\n");
basic_print("Q QUITS\n"); print("Q QUITS\n");
grsim_update();
page_flip();
repeat_until_keypressed(); repeat_until_keypressed();
@ -49,15 +52,15 @@ void print_help(void) {
void show_map(void) { void show_map(void) {
gr(); gr();
home();
grsim_unrle(map_rle,0x800); grsim_unrle(map_rle,((int)ram[DRAW_PAGE]+0x4)<<8);
gr_copy(0x800,0x400); //gr_copy(0x800,0x400);
color_equals(COLOR_RED); color_equals(COLOR_RED);
basic_plot(8+((map_x&0x3)*6)+(tfv_x/6),8+(((map_x&0xc)>>2)*6)+(tfv_y/6)); basic_plot(8+((map_x&0x3)*6)+(tfv_x/6),8+(((map_x&0xc)>>2)*6)+(tfv_y/6));
grsim_update(); page_flip();
repeat_until_keypressed(); repeat_until_keypressed();
} }

1
gr-sim/tfv_opener.c
View File

@ -68,4 +68,3 @@ int opening(void) {
return 0; return 0;
} }

4
gr-sim/tfv_utils.c
View File

@ -76,7 +76,7 @@ void print_u8(unsigned char value) {
sprintf(temp,"%d",value); sprintf(temp,"%d",value);
basic_print(temp); print(temp);
} }
@ -84,7 +84,7 @@ void print_byte(unsigned char value) {
char temp[4]; char temp[4];
sprintf(temp,"%3d",value); sprintf(temp,"%3d",value);
temp[3]=0; temp[3]=0;
basic_print(temp); print(temp);
} }
void page_flip(void) { void page_flip(void) {