I figured that I would start a topic like this here. These are links to a bunch of routines that I find useful and I think other will find useful
ChkFindVar is like ChkFindSym for Program, Protected Program, Appvar, Temporary Program, Group.
SearchVarBC is a routine (with several others included) for searching for the other program types.
A_Times_DE This is a non-standard routine that is 25 bytes and faster than DE_Times_A.
DE_Times_A This is a fast, straightfoward, standard DE_Times_A
C_Div_D
C_Times_D
DE_Times_BC
DEHL_Div_C
DEHL_Mul_32Stack (no SMC) this is for Apps. This multiplies DEHL by the last two entries on the stack and returns the 64-bit result.
DEHL_Mul_32Stack (SMC) this gets a decent speed boost by using SMC. It does the same thing.
DEHL_Mul_A this uses shadow registers HLDE. I need to rewrite this
GCDHL_BC computes the Greatest Common Divisor
HL_Div_BC this can probably be optimised
HL_Div_C
HLDE_Div_C
ncrHL_DE this computes "n choose r" and it uses shadow registers
RoundHL_Div_C returns the rounded value of HL/C
RoundSqrtE returns the rounded square root of E
SqrtE
SqrtHL
PixelPlot (1) is a fast pixel plotting code that uses SMC and will draw to arbitrary buffers. I usually use a different version of this.
LineSearch will search a var for a line and return the location and size. This will not search beyond the given limit.
ConvRStr will convert a string of numbers to a 16-bit value
Is_2_Byte checks if A is the start byte of a 2-byte token
TokensToASCII converts a token string to ASCII
IncHLMem1 This is an optmised routine to increment HL and port 6 as necessary
TileMap1 This draws a tilemap. Uses DrawSpriteXxY.
DrawSpriteXxY This draws a tile

Pastebin won't let me paste anymore for a while, but I have a bunch more waiting in reserve

EDIT: As a note, these are all codes I wrote

So for the past few days I have been making comments about a "variable size font editor for Grammer." So now it is time to explain and release
Pretty much, I added a variable size font to Grammer and that made me add a command to swap between the fixed font and variable size font. So while I was at it, I finally included the ability to use your own custom fonts as well! But making a font is time consuming and tedious at best and typing in all the hex could get migraine inducing. So I made a font editor

Pretty much, you can cycle forward through the characters, change their sizes, edit their appearance, et cetera. The characters can be 0 to 9 pixels wide and 1 to 16 pixels tall. The readme explains the controls and how to use your brand new font There is a sample fontset included that is currently used by Grammer (so it isn't too tedious). I should eventually add an option to create new fixed size fonts, but the current 4x6 font has a weird syntax as it is stored as nibbles for extra compression.

I was requested earlier to make a new example program and was then suggested to make a sprite editor. So here we are
*Indents are here solely for viewability

.0:Return                ;The header
"USprite→A               ;Stores the string location to A (used for optimisation since the string is used several times)
Get(A                    ;Gets the location of the appvar named Sprite
If =0                    ;Zero is returned if the var does not exist
Then
  ClrDraw                  ;Clears the draw buffer (graph screen) and resets text coordinates
  Text(º"How many sprites? ;º means draw to the last text coordintate
  DispGraph                ;Displays the draw buffer
  expr(Input →N            ;Allows the user to input a string and expr( turns it to a number
  Text(6,0,"Width?         ;
  DispGraph                ;
  expr(Input →W            ;
  Text(12,0,"Height?       ;
  DispGraph                ;
  expr(Input →H            ;
  Send(4+N*W*H,A→Z         ;Creates the appvar :)
  int(Z,W                  ;Stores the Width to the first byte of the var
  int(Z+1,H                ;Stores the Height to the second byte of the var
  iPart(Z+2,N              ;Stores the Number of sprites (stores it as a 2-byte word)
End
Unarchive A
Get(A→Z                  ;
IS>(Z→W                  ;reads the byte at Z, then increme,nts Z
IS>(Z→H
{Z→N
Z+2→Z
ClrDraw
0→X →Y →B                ;X will be X pixel Coord, Y=Ypixel coord, B=sprite number
π87EC→θ                  ;This is the location of the clipboard (256 bytes)
Line(0,0,1+H,1+W*8,3     ;Draws the boundaries for the sprite
Repeat A=55              ;55 is the [mode] key
Z+B*W*H→V                ;Used multiple times, so why not store it to a var?
Pt-On(0,V,0,0,W,H        ;Draws the sprite
Repeat A=55 +getKey(10 +getKey(11
  pxl-Test(Y,X→C
  9→D
    Repeat A
    D+1
    If >9                    ;Checks if the previous result is >9. This is the timer for blinking
    Pxl-Change(Y,X 0         ;Changes the pixel state at Y,X and then returns 0 in Ans
    →D
    getKey→A
    End
  Pxl-Off(Y,X
  C
  If getKey(56           ;56=Delete
  0
  If getKey(9            ;9=Enter
  1
  If getKey(54           ;54=2nd
  !C
  If Ans
  Pxl-On(Y,X
  If A=15
  Line(0,0,H,W*8,0       ;Draws a white rectangle to erase the sprite data
  Y+H+getKey(1
  -getKey(4
  /H θ'→Y                ;θ' is the remainder from the division. This lets the cursor loop :)
  X+getKey(3
  -getKey(2
  +W*8 /W*8 θ'→X
End
Pt-On(4,Z+B*W*H,0,0,W,H   ;Swaps the sprite data from on screen to the sprite set (saves the changes)
B+N+getKey(10
-getKey(11
/N θ'→B
End
Stop
That is working code (without the clipboard).

The program here allows you to create a sprite set if appvar Sprite does not exist, it prompts for the number of sprites to include as well as their size. There is clipboard functionality as well as a kind of "Undo" for mistakes. Have fun?

Oh, also, I was also told to make it work with the map editor, so that should happen soon But I have to go to work now...

Oh, and for those who plan to use the sprite sets, the offset into the appvar data is 4 to get to the sprite data (the first 4 bytes tell the number of sprites and size).

I figured a Questions and Answers topic for Grammer might be useful now that Grammer is picking up new programmers
So if anybody has questions, feel free to ask! I will try to be on often enough to answer questions with code or comments

First: The name is spelled this way because LIGHTSOUT is 9 chars and programs must be 8 chars
Second: This is a Grammer program

So pretty much, this is a spinoff of the classic Lights Out game. With this version, you select a location with the cursor and by pressing enter, you invert the location as well as those around it. The goal is to color the whole board black.

Things I can add:
Turning the board one color is a win (all black or all white)
Adding a score (The board is made in 17 steps, so this will grade based on best time)
Adding a highscore
Adding difficulties (larger playing board, for example, or a block that doesn't change)

So what do y'all think? I should also note that the program is currently 352 bytes

Controls:
Enter inverts surrounding blocks
Clear exits the program
Arrows move the cursor

So I was fooling around with Grammer when I made this little proggy

It is pretty much a little wormy that follows a set of rules. The head moves down if there is a way to move down. If there isn't, it then tries left and right (it selects the first direction to try, randomly). if that still doesn't work, it moves up.

And with that, you get a wormy!

I wonder if I can add this as a type of particle in Grammer...

Latest Major Release Grammer v2.24.02.12 This may not be up to date (24 February, 2012), but includes documentation.
Latest Minor Release In this case, same as the Latest Major Release. Normally does not include updated documentation

---

This is Grammer 2-- the App. When you first start it, there isn't much. The menu is by no means pretty and doesn't even give any useful hints for how to use it, but it does get the job done. The real beauty, however, comes in what it provides.

Grammer 2 provides a programming language much like others, but with key differences making it fairly unique. It is an interpreted language with tons of support for graphics and math that results in games and math programs alike. If you have questions, feel free to ask

Also, I made a new example for this release Enjoy!

(As a note, I haven't actually tested every single command to see if they survived the conversion from program to app, so please report bugs!)
EDIT: First bug found by Awalden: Bad signature. Something went awry with compiling, so the new update should work