That's what you are doing in Powder Game, right?

It's a very good way, but truly complicated to get there. Nice brain ya got

Yes, it's how I'm doing the menu in Powder. Thanks.

There's actually a slightly more efficient way of doing it. Let's say that you have a series of buttons arranged vertically, as is common in many GUIs. You could arrange the buttons with a simple algorithm like this:

Code: [Select]

:"WTRSNDMTLSPKOILFIRERS"→Str1
:For(A,0,6
:A*8+5→B
:Text(80,B,3*A+Str1)
:RectI(78,B-1,15,9
:RectI(79,B,13,7
:End

This will display three characters from the string for each button and draw a box around the text. When you go to click on a button, you just have to redo the algorithm with with the Y coordinate.

I love optimizing code.

:"WTRSNDMTLSPKOILFIRERS"→Str1
:8→A
:While A-1→A
:Text(*8-3→B*256+80)
:Text A*3-3+Str1
:RectI(78,B-1,15,9)
:RectI(79,B,13,7)
:End


Of course, I optimized it so you could use it! (And because I get random impulses to optimize stuff)

EDIT: By the way, I just noticed that -4-Str1 should be -3-Str1. Make sure you got the changed version.

EDIT 2: In actually testing the code, it doesn't work as it should have... let me look into this.

EDIT 3: Found the error and corrected it. I got my argument for the pen movement command backwards so it was trying to draw things at a Y-value of 80. Make sure you get the version that has the line Text(*8-3→B*256+80).

EDIT 4: (Wow this is a lot of edits!) I'm guessing your code does this too, but do you also get the lack of borders between the middle buttons? This would fix it:

:"WTRSNDMTLSPKOILFIRERS"→Str1
:8→A+1→C
:While A-1→A
:Text(*8-3→B*256+80)
:Text A*3-3+Str1
:RectI(78,B-1,15,C)
:RectI(79,B,13,8→C-1)
:End

EDIT 4: (Wow this is a lot of edits!) I'm guessing your code does this too, but do you also get the lack of borders between the middle buttons? This would fix it:
<snip>

I don't actually draw the borders in my code during loading. I added that part for Scout to use.