Heres what I do:
Types are in the form TThing such as TAlien or TColorRequester where the first letter of each 'word' within the name is capitalized.
Functions and Methods are in the form Update or GetPosition the same as Types without the preceding T.
Variables are in the form aliens or current_file where every letter is lowercase and 'words' are delimited by underscores.
Constants are the same as variables except letters are uppercase such as MODE_CLIENT or SHIP_MAX_SPEED.
Example:
Types are in the form TThing such as TAlien or TColorRequester where the first letter of each 'word' within the name is capitalized.
Functions and Methods are in the form Update or GetPosition the same as Types without the preceding T.
Variables are in the form aliens or current_file where every letter is lowercase and 'words' are delimited by underscores.
Constants are the same as variables except letters are uppercase such as MODE_CLIENT or SHIP_MAX_SPEED.
Example:
Superstrict Type TAlien Const SPEED:Int = 6 Const HEALTH:Int = 10 Global aliens:TList = CreateList() Field x:Int Field y:Int Field direction:Int Field velocity_x:Int = 0.0 Field velocity_y:Int = 0.0 Function Create:TAlien(x:Int, y:Int, direction:Int) Local alien:TAlien = new TAlien alien.x = x alien.y = y alien.direction = direction ListAddLast(aliens, alien) Return alien EndFunction Method Update() x :+ velocity_x y :+ velocity_y EndMethod Method GetSpeed:Int() Return Sqr(velocity_x * velocity_x + velocity_y * velocity_y) EndMethod EndType