It means he put me in the user group "Lobsters"...

Or more specifically, trying to change a string while compiling to an application...

first, I notice "{P-7-X+1}->{Str9+X}" should be "{P-7-X}->{Str9+X}" since P-7 is the first entry, not P-6, which is what yyou got by adding 1 back at the end... I'll go over it more later when I have time to see what els...

I mean, I got that it copied it to the string, but... Wouldn't you already have the name of a program if to find its location?

I'd like to apologize, that post sounded kind of elitist now that I reread it.  So I'll try to explain everything now.  With like, explanations.
Ok, so to start, you have the VAT(variable allocation table) right?  It starts for programs and appvars at the memory location 0x9830, $9830, 9830h, or E9830 depending on what language you need to reference it in.  Since you are using axe though, i will stick with the E9830.  So the vat contains lots of entries, one for each program/appvar, each one containing this info for each program: The name, a pointer to where the actual program data is, the variable type, whether its archived (and what page its on if it is), and the version, and the length of the name.  It might be useful at this point to mention that he VAT is written backwards.  So, to unlock/lock progams, there's only three relevant pieces of information.  1. The program name 2. The name length 3. The type, since A. We need to know whether its an appvar or program, then to lock/unlock it, we only need to change the type.  First, lets define what these values can be.  The name length is an number between 1 and 8.  For the type, we only need the bottom 4 bits, because those are the ones that actually define the type.  So we'll want to AND it with E001F, then the two values we care about are 5, for program, and 6, for locked program.  The name should simply be whatever you named your program. =P  So, we'll say you wanted to be able to use the GetCalc(Str1) for your program, thogh, since we have to find it in the vat anyways to change the type, we could just grab it from there.  Actually, this will be easier for m example, lets just do this.  Your string will then look like this for program LEVELNOM "MONLEVEL"->Str1 (Which is why I decided not to use it with GetCalc, otherwise it would look like "prgmLEVELNOM"->Str1 instead, which is harder to compare when you're being lazy like me)  We will now proceed to search the vat for your program.
"MONLEVEL"→Str1  // The name of our program, in reverse order (Remember? The vat is backwards.)
{E9830}r→θ  // The location where the vat starts stored as a variable for easy manipulation. (This is actually the end, but remember?...)
{E982E}r→Z  // The end of the vat. (This is actually... Meh, you get the point :P)
0→C  // C Will be our condition of whether or not the program was found
Repeat θ≤Z+C  // Loops until the end of the vat is found or your program is found.
If getKey(15):Return:End  // Umm, if I screwed up or something... Normally I include this in loops like this so I can just quit by pressing Enter if something happens.
{θ}∙E001F→A  // Puts the value of the lower 4 bits of the object type into A for testing.
If A=5+(A=6)  //If its a locked or unlocked program... Yay! See if it's the one we want!
θ→T  // Temporary storage FTW!
{T-6}→U  // Go to where the name length is (6 bytes back from the type, where T currently is) and store the value there to U
While U>0 // Check each byte of the name
{Str1-U}={T-U-6}+C→C  //If byte X of the name is equal to byte X of the vat entry...
U-1→U  //Go to the next character!
End
C=U→C  // If every character matched, then good! C now reflects that a program was found!
End
θ-6→θ  // Go to where the name length is (6 bytes back from the type, where θ currently is)
θ-{θ}-1→θ  // Skip past the name now that we know the length, and one additional byte to start the next entry.
End
(I'm just assuming your program was found, not that the end of the vat was reached.  You can add more code to check for that if y{T}-5
{T}-5=0+5→{T}  // Umm... Inverts the lock/unlockness of your program?
6→{T}  // Or youc ocould just lock it, if no toggling is neccessary ;P
That should be it I think... Let me know if you run into any difficulties with that code or need more help!

Hey, out of curiosity, what's the point of drawing the lines first if you're just going to hav to redraw most of them after you add the text?

Yay, birthdayness! Cooliojazz cackles at the army... 

O, *Phew* that makes me feel a bit better, cause that was really strange... Hmm, that is a good idea for a future addition tho... O_o