p16 is being worked on a bunch by me wwww [16_ca needs huge amounts of work and I...

[16.git] / src / lib / bakapee.c

diff --git a/src/lib/bakapee.c b/src/lib/bakapee.c
index 917784f52966765a4f82009aa78393f73a0568a2..389a815993bc5a3760d4b5fb50b56b5547130993 100755 (executable)
--- a/src/lib/bakapee.c
+++ b/src/lib/bakapee.c
@@ -280,8 +280,10 @@ void ding(page_t *page, bakapee_t *pee, word q)
                        colortest(page, pee);\r
                break;\r
                case 6:\r
-                       pee->coor = rand()%256;\r
-                       modexcls(page, pee->coor, VGA);\r
+//                     pee->coor = rand()%256;\r
+//                     modexcls(page, pee->coor, VGA);\r
+                       colorz(page, pee);\r
+                       modexprint(page, page->sw/2, page->sh/2, 1, 0, 47, 0, 1, "bakapi");\r
                break;\r
                case 7:\r
                        if(pee->coor <= pee->hgq)\r
@@ -292,7 +294,7 @@ void ding(page_t *page, bakapee_t *pee, word q)
                break;\r
                case 8:\r
                        colorz(page, pee);\r
-                       modexprint(page, page->sw/2, page->sh/2, 1, 47, 0, "bakapi");\r
+                       modexprint(page, page->sw/2, page->sh/2, 1, 0, 47, 0, 1, "bakapi");\r
                break;\r
                case 9:\r
                        if(pee->coor <= pee->hgq)\r
@@ -327,5 +329,6 @@ void ding(page_t *page, bakapee_t *pee, word q)
                default:\r
                break;\r
        }\r
+       //printf("      %dx%d   %dx%d\n", pee->xx, pee->yy, tx, ty);\r
        //pee->coor++;\r
 }\r