Hex String to Integer - GameCreators Forum

Author

Message

Raven

19

Years of Service

User Offline

Joined: 23rd Mar 2005

Location: Hertfordshire, England

Posted: 18th Jun 2005 00:22

Link

+ Code Snippet

Color As Integer
Color = HexToRGB("0x3cf2b9")

For X = 0 To 100
  For Y = 0 To 100
    Dot X, Y, Color
  Next Y
Next X

Wait Key

Function HexToRGB( Value As String )
  Local SizeOf, Color, Index, Buffer As Integer

  SizeOf = Len(Value)

  Bit = SizeOf - 2
  For Index = 2 To SizeOf
    Buffer = Asc(Mid$(Upper$(Value), Index))
    If Buffer >= 48 And Buffer <= 57
      Offset = 38
    Else
      Offset = 55
      If Buffer - Offset > 26 Then Offset = 0 ` this should never be an issue, but you never know what idiot will try 0xf?4jf!
    EndIf

    Color = Color || ((Buffer - Offset) << (Bit * 4))

    Dec Bit
  Next
EndFunction Color

This will allow you to create 32-bit Integers from Hex Strings, perfect for storing Colours or such in Data Statements

Back to top

Profile PM Email Website

Baggers

20

Years of Service

User Offline

Joined: 31st May 2004

Location: Yonder over dem dere hills

Posted: 18th Jun 2005 05:41

Link

Hey, groovy idea there man...now i need to go learn hex!

Back to top

Profile PM Email

Raven

19

Years of Service

User Offline

Joined: 23rd Mar 2005

Location: Hertfordshire, England

Posted: 18th Jun 2005 07:01

Link

I made it simply because I didn't feel like finding out the numbers to colours.

0xFFFFFF = 0xRRGGBB

10 20 30 40 50 60 70 80
16 32 48 64 80 96 112 128

you can pretty much guess how to calc most of the colours with that small chart

Back to top

Profile PM Email Website

Three Score

20

Years of Service

User Offline

Joined: 18th Jun 2004

Location: behind you

Posted: 18th Jun 2005 07:08

Link

i got a dll with that dec2hex and hex2dec

http://free-space.myftp.org/thread1.html

Back to top

Profile PM Email Website

Sorry your browser is not supported!

Code Snippets / Hex String to Integer