MMOrpg Creation Engine

I wrote it, so I can assure you that it is very organised and well commented. Here's a brief example:

; Gives magic damage to a given enemy
Function MagicDamageEnemy(N.Enemy, D, DType)
  If N\Dead = False
    ; Message to local player
    If SquelchMode = False AddMessage "  -- " + D + " " + DamageName$(DType)  + " damage to " + N\E\Name$, F_Magenta
    ; 200% damage if using enemy weakness damage type
    If N\E\Weakness = DType Then D = D * 2
    ; Send message to server
    Pa$ = BP_IntToStr$(N\ID, 2) + BP_IntToStr$(D, 2) + BP_IntToStr$(99, 1)
    BP_UDPMessage(1, P_EnemyDamaged, Pa$)
    Pa$ = "E" + BP_IntToStr$(N\ID, 2) + BP_IntToStr$(DType, 1)
    BP_UDPMessage(1, P_DamageParticles, Pa$)
    ; Particle effects
    MagicParticles(N\EN, DType)
  EndIf
End Function