forked from amix/photoshop
-
Notifications
You must be signed in to change notification settings - Fork 0
/
UConvert.a.inc
95 lines (84 loc) · 2.3 KB
/
UConvert.a.inc
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
{Photoshop version 1.0.1, file: UConvert.a.inc
Computer History Museum, www.computerhistory.org
This material is (C)Copyright 1990 Adobe Systems Inc.
It may not be distributed to third parties.
It is licensed for non-commercial use according to
www.computerhistory.org/softwarelicense/photoshop/ }
PROCEDURE DeHalftoneRow (srcPtr: Ptr;
dstPtr: Ptr;
rowBytes: INTEGER;
cols: INTEGER;
scale: INTEGER;
thresTable: TThresTable); EXTERNAL;
FUNCTION DoCountColors (rDataPtr: Ptr;
gDataPtr: Ptr;
bDataPtr: Ptr;
size: INTEGER;
colorTable: Ptr): BOOLEAN; EXTERNAL;
PROCEDURE DoMapColors (rDataPtr: Ptr;
gDataPtr: Ptr;
bDataPtr: Ptr;
size: INTEGER;
colorTable: Ptr;
outDataPtr: Ptr); EXTERNAL;
PROCEDURE DoBuildInverse (table: Ptr;
buffer: Ptr;
step: INTEGER); EXTERNAL;
PROCEDURE NoDitherRow (rDataPtr: Ptr;
gDataPtr: Ptr;
bDataPtr: Ptr;
outDataPtr: Ptr;
table: Ptr;
count: INTEGER); EXTERNAL;
PROCEDURE DiffuseRGB (rDataPtr: Ptr;
gDataPtr: Ptr;
bDataPtr: Ptr;
outDataPtr: Ptr;
thisError: Ptr;
nextError: Ptr;
table: Ptr;
LUT: TRGBLookUpTable;
count: INTEGER); EXTERNAL;
PROCEDURE Do5BitHistogram (rDataPtr: Ptr;
gDataPtr: Ptr;
bDataPtr: Ptr;
hist: Ptr;
weight: INTEGER;
count: INTEGER); EXTERNAL;
PROCEDURE DoProjectHist (minR: INTEGER;
maxR: INTEGER;
minG: INTEGER;
maxG: INTEGER;
minB: INTEGER;
maxB: INTEGER;
projectR: Ptr;
projectG: Ptr;
projectB: Ptr;
hist: Ptr); EXTERNAL;
PROCEDURE DitherRGB (rDataPtr: Ptr;
gDataPtr: Ptr;
bDataPtr: Ptr;
row: INTEGER;
numCols: INTEGER;
outDataPtr: Ptr;
ditherSize: INTEGER;
noiseTable: TNoiseTable;
thresTable: TThresTable;
colorTable: Ptr;
VAR colors: INTEGER); EXTERNAL;
PROCEDURE DoRGB2HSLorB (rPtr: Ptr;
gPtr: Ptr;
bPtr: Ptr;
hPtr: Ptr;
sPtr: Ptr;
lPtr: Ptr;
count: INTEGER;
bright: BOOLEAN); EXTERNAL;
PROCEDURE DoHSLorB2RGB (hPtr: Ptr;
sPtr: Ptr;
lPtr: Ptr;
rPtr: Ptr;
gPtr: Ptr;
bPtr: Ptr;
count: LONGINT;
bright: BOOLEAN); EXTERNAL;