CSBWin/VBL.cpp at master · BeipDev/CSBWin · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
#include "stdafx.h"

#include "UI.h"

#include <stdio.h>

// #include "Objects.h"
#include "Dispatch.h"
#include "CSB.h"
#include "Data.h"

// #ifdef _DEBUG

void traceFlash(const char * /*msg*/, i32 /*x*/, i32 /*y*/)
{
   /*
   if (x==-1)
   {
     if (TraceFileActive)
     {
       fprintf(TraceFile,"%08x %s\n",d.Time,msg);
}
     return;
}
   if (TraceFileActive)
   {
     char *name = "??????";
     fprintf(TraceFile,"%08x vblFlashButn x=%d,y=%d",d.Time, x,y);
     switch (x)
     {
     case 291:
       switch (y)
       {
       case 125: name = "Turn Right"; break;
       case 147: name = "Slide Right"; break;
}
       break;
     case 263:
       switch (y)
       {
       case 125: name = "Forward"; break;
       case 147: name = "Backward"; break;
}
       break;
     case 234:
       switch (y)
       {
       case 125: name = "Turn Left"; break;
       case 147: name = "Slide Left"; break;
}
       break;
}
     fprintf(TraceFile," %s\n",name);
}
   */
}

//  TAG00091c
void vblFlashButn(i16 x1, i16 x2, i16 y1, i16 y2) // called by VBL handler
{                                                 // x1, x2, y1, y2 come directly from d.MoveButn
                                                  //;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
   dReg D0, D1, D2, D3, D4, D5, D6, D7;
   aReg A0, A1;
   traceFlash("vblFlashButn", x1, y1);
   A0 = (aReg)d.LogicalScreenBase;
   D5W = y1;
   D0W = sw(y2 - y1); // line counter
   A0 += 160 * y1;
   D5W = x1;
   D6W = x1;
   D5W = (I16)((D5W >> 1) & 0x00f8);
   D7W = D5W;
   A0 += D5W + 4;
   D6W &= 15;
   D3L = D4L = 0xffff;
   D3H1 = 0;
   D3L >>= D6W;
   D5W = x2;
   D6W = (I16)((D5W >> 1) & 0x00f8);
   D5W &= 15;
   D5W = sw(15 - D5W);
   D4W <<= D5W;
   if(D7W != D6W)
   {
      D1W = (I16)((((D6W - D7W) - 8) >> 3) & 0x1fff);
   tag00097a:
      A1 = A0 + 160;
      D6W = LE16(wordGear(A0));
      D5W = (UI16)(D6W ^ 0xffff);
      D5W &= D3W;
      D7W = (UI16)(D3W ^ 0xffff);
      D6W = (UI16)((D6W & D7W) | D5W);
      wordGear(A0) = LE16(D6W);
      A0 += 8;
      D2W = D1W;
      goto tag0099a;
   tag000996:
      wordGear(A0) ^= 0xffff;
      A0 += 8;
   tag0099a:
      if(--D2W >= 0)
         goto tag000996;
      D5W = LE16(wordGear(A0));
      D6W = D5W;
      D5W ^= 0xffff;
      D5W &= D4W;
      D7W = (UI16)(D4W ^ 0xffff);
      D6W = (UI16)((D6W & D7W) | D5W);
      wordGear(A0) = LE16(D6W);
      A0 = A1;
      if(--D0W >= 0)
         goto tag00097a;
   }
   else
   {
      D3W &= D4W;
   tag0009ba:
      D5W = LE16(wordGear(A0));
      D6W = D5W;
      D5W ^= 0xffff;
      D5W &= D3W;
      D7W = (UI16)(D3W ^ 0xffff);
      D6W &= D7W;
      D6W |= D5W;
      wordGear(A0) = LE16(D6W);
      A0 += 160;
      if(--D0W >= 0)
         goto tag0009ba;
   }
}