[Deleted]

[BarryG]

Don't worry about it.

[pjay]

This?

Code: Select all

Macro hexLit(hx) : Str(2000+Val(Hex(hx))) : EndMacro
  
Debug hexLit($0) ; Want "2000"
Debug hexLit($23) ; Want "2023"
Debug hexLit($99) ; Want "2099"

[BarryG]

Don't worry about it.

[blueb]

Does this help?

Code: Select all

Debug "20"+ LTrim("$23","$") ; Want "2023"

Edit... drat! to slow. haha

[BarryG]

Don't worry about it.

[mk-soft]

@BarryG

Do hey mean BCD (binary-coded decimal)
Then your for next loop ist wrong

[BarryG]

Don't worry about it.

[NicTheQuick]

If you want your for loop to show you the decimal numbers from 0 to 99, why do you iterate from 0 to 153?
Here's your solution:

Code: Select all

For h = 0 To 99
  Debug Str(h)
Next

[NicTheQuick]

And if you want it to show the hexa decimal numbers from $0 to $99, do it like this:

Code: Select all

For h = $0 To $99
  Debug Hex(h)
Next

[BarryG]

Don't worry about it.

[NicTheQuick]

A hex value and a base-16 number are the same thing.

Just use `Hex()` as I did in my second example:

Code: Select all

Debug Hex($23)

[NicTheQuick]

And if you want to convert it literally to a decimal number, do this:

Code: Select all

For h = $0 To $99
  Debug Val(Hex(h))
Next

But remember that there are hexadecimal values with letters in it. In this case it will fail of course.

[BarryG]

Don't worry about it.

[BarryG]

Don't worry about it.

[NicTheQuick]

That's what I just told you. What are you expecting?

Your request is very silly. What do you want to achieve here?

You can not literally convert the hexa-decimal number 1C to decimal. `Val()` will just convert it to 1.

If you iterate from $0 to $99, you basically iterate from 0 to 153. That means that there are 153-99=54 values that can not be converted to decimal. Just think about it. At this point I get the feeling you just wanna troll me.