-
Notifications
You must be signed in to change notification settings - Fork 0
/
HelpForm.dfm
413 lines (378 loc) · 13.7 KB
/
HelpForm.dfm
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
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
object HelpF: THelpF
Left = 226
Top = 107
AutoSize = True
BorderStyle = bsSingle
Caption = 'LBA Font Editor help'
ClientHeight = 441
ClientWidth = 529
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {
0000010001002020100000000000E80200001600000028000000200000004000
0000010004000000000080020000000000000000000000000000000000000000
0000000080000080000000808000800000008000800080800000C0C0C0008080
80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000008880000000000000000000000000000FBBB8000000000000000000
000000000FBBB8000000000000000000000000000FBBB8000000000000000000
0000000000FFF000000000000000000000000000008880000000000000000000
000000000FBBB8000000000000000000000000000FBBB8000000000000000000
000000000FBBB80000000000000000000000000000FBBB800000000000000000
0000000000FBBB80000000000000000000000000000FBBB80000000000000000
000000000000FBBB80000000000000000000000000000FBBB800000000000000
0000088800000FBBB8000000000000000000FBBB800000FBBB80000000000000
0000FBBB800000FBBB800000000000000000FBBB800000FBBB80000000000000
00000FBBB80008BBBB8000000000000000000FBBBB888BBBB800000000000000
000000FBBBBBBBBB80000000000000000000000FFBBBBB800000000000000000
000000000FFFFF00000000000000000000000000000000000000000000000000
000000000000000000000000000000000000000000000000000000000000FFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC7FFFFFF83FFFFFF8
3FFFFFF83FFFFFFC7FFFFFFC7FFFFFF83FFFFFF83FFFFFF83FFFFFFC1FFFFFFC
1FFFFFFE0FFFFFFF07FFFFFF83FFFF8F83FFFF07C1FFFF07C1FFFF07C1FFFF83
81FFFF8003FFFFC007FFFFE01FFFFFF83FFFFFFFFFFFFFFFFFFFFFFFFFFF}
OldCreateOrder = False
Position = poOwnerFormCenter
Scaled = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 16
object TabbedNotebook1: TTabbedNotebook
Left = 0
Top = 0
Width = 529
Height = 441
TabFont.Charset = DEFAULT_CHARSET
TabFont.Color = clBtnText
TabFont.Height = -13
TabFont.Name = 'MS Sans Serif'
TabFont.Style = []
TabOrder = 0
object TTabPage
Left = 4
Top = 27
Caption = 'About'
object Panel1: TPanel
Left = 8
Top = 8
Width = 505
Height = 393
BevelInner = bvLowered
TabOrder = 0
object Panel2: TPanel
Left = 8
Top = 8
Width = 489
Height = 377
BevelOuter = bvLowered
TabOrder = 0
object Label1: TLabel
Left = 120
Top = 44
Width = 249
Height = 20
Alignment = taCenter
AutoSize = False
Caption = 'LBA Font Editor'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -17
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 125
Top = 76
Width = 238
Height = 16
Caption = 'Font editor for Little Big Adventure series'
end
object Label3: TLabel
Left = 120
Top = 100
Width = 249
Height = 16
Alignment = taCenter
AutoSize = False
Caption = 'Version: XXX'
end
object Label5: TLabel
Left = 194
Top = 124
Width = 100
Height = 16
Caption = 'Copyright '#169' Zink.'
WordWrap = True
end
object Label6: TLabel
Left = 163
Top = 148
Width = 163
Height = 16
Caption = 'e-mail: zink@poczta.onet.pl'
end
object Label7: TLabel
Left = 208
Top = 248
Width = 72
Height = 16
Caption = 'Homepage:'
end
object Label8: TLabel
Left = 72
Top = 300
Width = 344
Height = 32
Alignment = taCenter
Caption =
'If you find any bugs or have suggestion about this program'#13'(or a' +
'bout anything ;)), please e-mail me at:'
end
object AdresLabel: TLabel
Left = 182
Top = 332
Width = 126
Height = 16
Cursor = crHandPoint
Caption = ' zink@poczta.onet.pl '
Color = clSilver
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
OnMouseDown = AdresLabelMouseDown
OnMouseUp = AdresLabelMouseUp
end
object HpLabel: TLabel
Left = 167
Top = 264
Width = 156
Height = 16
Cursor = crHandPoint
Caption = ' www.emeraldmoon.prv.pl '
Color = clSilver
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
OnMouseDown = HpLabelMouseDown
OnMouseUp = HpLabelMouseUp
end
object Label4: TLabel
Left = 40
Top = 184
Width = 409
Height = 49
Alignment = taCenter
AutoSize = False
Caption =
'LBA Font Editor comes with ABSOLUTELY NO WARRANTY; for details s' +
'ee License.txt. This is free software, and you are welcome to re' +
'distribute it under certain conditions; see License.txt for deta' +
'ils.'
WordWrap = True
end
end
end
end
object TTabPage
Left = 4
Top = 27
Caption = 'What is this ?'
object Panel3: TPanel
Left = 8
Top = 8
Width = 505
Height = 393
BevelInner = bvLowered
TabOrder = 0
object Memo1: TMemo
Left = 8
Top = 8
Width = 489
Height = 377
Color = clBtnHighlight
Lines.Strings = (
' Did you ever think the font in LBA to be somewhat... ugly? OK..' +
'. not ugly... but not '
'beautiful also. Did you ever wish to change it? Now you can...'
''
' With this program you can edit the font file that is used in Li' +
'ttle Big Adventure 1 '
'& 2 games.'
' To make the program usable, you must first get LBA Package Edit' +
'or from '
'http://www.emeraldmoon.prv.pl or any other hqr decompression pro' +
'gram, which '
'is necessary to extract the file which contains the font.'
' ')
ReadOnly = True
TabOrder = 0
end
end
end
object TTabPage
Left = 4
Top = 27
Caption = 'File information'
object Panel4: TPanel
Left = 8
Top = 8
Width = 505
Height = 393
BevelInner = bvLowered
TabOrder = 0
object Memo2: TMemo
Left = 8
Top = 8
Width = 489
Height = 377
Color = clBtnHighlight
Lines.Strings = (
'The first 1024 bytes are offsets of 256 characters (4 bytes per ' +
'char). '
' The offset #256 is the length of entire file. '
''
' The next data contains character maps. '
' First 4 bytes of each one are in turn: '
' - char width'
' - char height'
' - on-screen offset X'
' - on-screen offset Y.'
' The next one byte says how many sub-lines contains one line of' +
' the image.'
' The next two bytes describes the lengths of these sub-lines. T' +
'hey starts from '
'non-visible one. Sum of their lengths must equal the character w' +
'idth.'
' Example: line of image (= - transparent, X - non-transparent)' +
': '
'XXX==XXXXXXX=XXX. '
' The line contains 6 sub-lines (first is zero length). '
' Bytes of this line should be (from fifth one):'
' #06 - the line has 6 sub-lines'
' #00 - first sub-line is 0 length because each line must beg' +
'in from transparent '
'one,'
' #03 - second sub-line is 3 lenght'
' #02 - ...and so on...'
' #07'
' #01'
' #03 '
' The next byte describes the length of the next line. Amount of' +
' char lines must fit '
'the char height.'
' After last line the next char map begins (width, height, etc.)' +
'. And so on to the '
'map of the last character.')
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
end
end
object TTabPage
Left = 4
Top = 27
Caption = 'Editing font file'
object Panel5: TPanel
Left = 8
Top = 8
Width = 505
Height = 393
BevelInner = bvLowered
TabOrder = 0
object Memo3: TMemo
Left = 8
Top = 8
Width = 489
Height = 377
Color = clBtnHighlight
Lines.Strings = (
' First of all: you must have the original font file from LBA. Yo' +
'u can unpack it (with '
'Package Editor or any other hqr decompression program) from file' +
' named '
'"ress.hqr" (in your LBA directory). In this file there are some ' +
'files (pallettes, '
'images, etc.), font file is the second one. You must unpack the ' +
'second file to any '
'directory you wish.'
''
' Next:'
''
'1. Open extracted file - click the button with folder picture on' +
' it, or drag your '
'extracted file into program'#39's window, or drag your file onto pro' +
'gram'#39's icon.'
'2. Select character you want ot edit. Double click on it or clic' +
'k the button with "A" '
'letter and an arrow.'
'3. You can set some properties of edited character like width, h' +
'eight and screen '
'offset. Screen offset says how many pixels the char is moved fro' +
'm its start point '
'(if the char has screen offset X = 2 and screen offset Y = 3, it' +
' will appear as if it '
'would have three blank lines above it and two blank lines before' +
' it. If you still '
'don'#39't understand how screen offset works, try to compare some ch' +
'aracters (for '
'example "A" and "a").'
'4. You can use drawing tools:'
' Pen - you can draw anything.'
' Selection - select a region of char image and move it to anot' +
'her place.'
' Copy - click this button to copy selected region of image to ' +
'Windows'#39' '
'clipboard.'
' Paste - paste a bitmap from clipboard. If bitmap in the clipb' +
'oard has more '
'colours than 2 it will be converted to black and white (without ' +
'dithering): white '
'pixels will remain white, other pixels will become black.'
' Clear - entire image becomes white.'
' Fill - entire image becomes black.'
'5. After editing click save - if you want to save your modificat' +
'ions to that '
'character, or cancel - returm to main program without saving. On' +
'ly '
'currently edited character is saved, opened file isn'#39't modified ' +
'until you save '
'entire file.'
'6. If you want to save charset to a font file click the button w' +
'ith diskette picture in '
'the main program window.'
''
' Next you have to repack file "ress.hqr" with changed font file ' +
'using LBA '
'Package Editor or any other hqr decompression program.'
''
' If you use LBA Package Editor:'
' You have to open the "ress.hqr" file from either LBA 1 or 2, r' +
'eplace the second '
'entry with your font file, and compile it into another "ress.hqr' +
'" file.')
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
end
end
end
end