mirror of
https://github.com/Ttanasart-pt/Pixel-Composer.git
synced 2024-12-26 06:56:45 +01:00
42 lines
No EOL
736 B
Text
42 lines
No EOL
736 B
Text
function string_hexadecimal(str){
|
|
static HEX = "0123456789abcdef";
|
|
|
|
var i = string_length(str);
|
|
var d = 1;
|
|
var v = 0;
|
|
|
|
while(i > 0) {
|
|
var ch = string_char_at(str, i);
|
|
var val = string_pos(ch, HEX) - 1;
|
|
v += val * d;
|
|
|
|
d *= 16;
|
|
i--;
|
|
}
|
|
|
|
return v;
|
|
}
|
|
|
|
function number_to_hex(val) {
|
|
static HEX = "0123456789abcdef";
|
|
var ss = "";
|
|
while(val > 0) {
|
|
var i = val % 16;
|
|
ss = string_char_at(HEX, i + 1) + ss;
|
|
val = floor(val / 16);
|
|
}
|
|
while(string_length(ss) < 2) {
|
|
ss = "0" + ss;
|
|
}
|
|
|
|
return ss;
|
|
}
|
|
|
|
function color_get_hex(color) {
|
|
var r = color_get_red(color);
|
|
var g = color_get_green(color);
|
|
var b = color_get_blue(color);
|
|
|
|
var hex = number_to_hex(r) + number_to_hex(g) + number_to_hex(b);
|
|
return hex;
|
|
} |