maltesystem-tc/REPEAT.C at main · gladir/maltesystem-tc · 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
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
/****************************************************************/
/*                                                              */
/*                Malte System/Video Repeat Header              */
/*                          1992/07/18                          */
/*                                                              */
/*          Copyright (C) par les Chevaliers de Malte           */
/*                                                              */
/****************************************************************/

#ifndef __Malte_Video_Repeat__
 #define __Malte_Video_Repeat__

 #include <MEM.H>
 #include <VIDEO\TEXT_MEM.H>
 #include <VIDEO\BIOS_TXT.H>
 #include <VIDEO\TEXT.H>
 #include <VIDEO\REPEAT.H>

  // Type //

 #ifndef __Malte_Var_Pascal__
  #define __Malte_Var_Pascal__
  typedef unsigned char Byte;
  typedef unsigned int  Word;
 #endif

 extern Byte VID;

 void _BiCubeH(Byte Y, Byte X1, Byte X2, Byte Char)
 {
  if(VID == 0)
  {
   MEM__SetCube(X1,Y,Char);
   MEM__SetCube(X2,Y,Char);
  }
   else
  {
   BIOS_SetCube_(X1,Y,Char);
   BIOS_SetCube_(X2,Y,Char);
  }
 }

 void _BiSpaceH(Byte Y, Byte X1, Byte X2)
 {
  if(VID == 0)
  {
   MEM__SetCube(X1,Y,' ');
   MEM__SetCube(X2,Y,' ');
  }
   else
  {
   BIOS_SetCube_(X1,Y,' ');
   BIOS_SetCube_(X2,Y,' ');
  }
 }

 void _TriBarSpaceHori(Byte Y, Byte XA1, Byte XA2, Byte XB1, Byte XB2, Byte XC1, Byte XC2)
 {
  if(VID == 0)
  {
   MEM__BarSpaceHori(XA1,Y,XA2);
   MEM__BarSpaceHori(XB1,Y,XB2);
   MEM__BarSpaceHori(XC1,Y,XC2);
  }
   else
  {
   BIOS_BarSpaceHori_(XA1,Y,XA2);
   BIOS_BarSpaceHori_(XB1,Y,XB2);
   BIOS_BarSpaceHori_(XC1,Y,XC2);
  }
 }

 void _TriBarTextHori(Byte Y, Byte XA1, Byte XA2, Byte XB1, Byte XB2, Byte XC1, Byte XC2, Byte Char)
 {
  if(VID == 0)
  {
   MEM__BarTextHori(XA1,Y,XA2,Char);
   MEM__BarTextHori(XB1,Y,XB2,Char);
   MEM__BarTextHori(XC1,Y,XC2,Char);
  }
   else
  {
   BIOS_BarTextHori_(XA1,Y,XA2,Char);
   BIOS_BarTextHori_(XB1,Y,XB2,Char);
   BIOS_BarTextHori_(XC1,Y,XC2,Char);
  }
 }

 void BiBarSpaceHori(Byte Y, Byte XA1, Byte XA2, Byte XB1, Byte XB2, Byte Color)
 {
  if(VID == 0)
  {
   MEM_BarSpaceHori(XA1,Y,XA2,Color);
   MEM_BarSpaceHori(XB1,Y,XB2,Color);
  }
   else
  {
   BIOS_BarSpaceHori(XA1,Y,XA2,Color);
   BIOS_BarSpaceHori(XB1,Y,XB2,Color);
  }
 }

 void BiBarTextHori(Byte Y, Byte XA1, Byte XA2, Byte XB1, Byte XB2, Byte Char, Byte Color)
 {
  BarTextHori(XA1,Y,XA2,Char,Color);
  BarTextHori(XB1,Y,XB2,Char,Color);
 }

 void BiCubeH(Byte Y, Byte X1, Byte X2, Byte Char, Byte Color)
 {
  SetCube(X1,Y,Char,Color);
  SetCube(X2,Y,Char,Color);
 }

 void BiSpaceH(Byte Y, Byte X1, Byte X2, Byte Color)
 {
  SetCube(X1,Y,' ',Color);
  SetCube(X2,Y,' ',Color);
 }

 void TriBarSpaceHori(Byte Y, Byte XA1, Byte XA2, Byte XB1, Byte XB2, Byte XC1, Byte XC2, Byte Color)
 {
  BarSpaceHori(XA1,Y,XA2,Color);
  BarSpaceHori(XB1,Y,XB2,Color);
  BarSpaceHori(XC1,Y,XC2,Color);
 }

 void TriBarTextHori(Byte Y, Byte XA1, Byte XA2, Byte XB1, Byte XB2, Byte XC1, Byte XC2, Byte Char, Byte Color)
 {
  BarTextHori(XA1,Y,XA2,Char,Color);
  BarTextHori(XB1,Y,XB2,Char,Color);
  BarTextHori(XC1,Y,XC2,Char,Color);
 }

 void WriteRepeatTypingXY(Byte X, Byte Y, Byte *Buffer[])
 {
  Word I;
  for(I = 0;Buffer[I] != NULL;I++)
  {
   WriteTypingXY(X,Y+I,Buffer[I]);
  }
 }

 void WriteRepeatTypingXYBicolor(Byte X, Byte Y, Byte *Buffer[], Byte AC, Byte NC)
 {
  Word I;
  for(I = 0;Buffer[I] != NULL;I++)
  {
   WriteTypingXYBicolor(X,Y+I,Buffer[I],AC,NC);
  }
 }

#endif