210 'Graphics/Buttons' // ptButton |
210 'Graphics/Buttons' // ptButton |
211 ); |
211 ); |
212 |
212 |
213 cTagsMasks : array[0..15] of byte = (7, 0, 0, 0, 15, 6, 4, 5, 0, 0, 0, 0, 0, 14, 12, 13); |
213 cTagsMasks : array[0..15] of byte = (7, 0, 0, 0, 15, 6, 4, 5, 0, 0, 0, 0, 0, 14, 12, 13); |
214 cTagsMasksNoHealth: array[0..15] of byte = (3, 2, 11, 1, 0, 0, 0, 0, 0, 10, 0, 9, 0, 0, 0, 0); |
214 cTagsMasksNoHealth: array[0..15] of byte = (3, 2, 11, 1, 0, 0, 0, 0, 0, 10, 0, 9, 0, 0, 0, 0); |
|
215 |
|
216 VoiceList : array[0..7] of TVoice = ( |
|
217 ( snd: sndNone; voicepack: nil), |
|
218 ( snd: sndNone; voicepack: nil), |
|
219 ( snd: sndNone; voicepack: nil), |
|
220 ( snd: sndNone; voicepack: nil), |
|
221 ( snd: sndNone; voicepack: nil), |
|
222 ( snd: sndNone; voicepack: nil), |
|
223 ( snd: sndNone; voicepack: nil), |
|
224 ( snd: sndNone; voicepack: nil)); |
|
225 LastVoice : TVoice = ( snd: sndNone; voicepack: nil ); |
215 |
226 |
216 Fontz: array[THWFont] of THHFont = ( |
227 Fontz: array[THWFont] of THHFont = ( |
217 (Handle: nil; |
228 (Handle: nil; |
218 Height: 12; |
229 Height: 12; |
219 style: TTF_STYLE_NORMAL; |
230 style: TTF_STYLE_NORMAL; |