New BLIde Plus update with getters and setters!

Type MyClass
   Field X:Int = 0
End Type

Type MyClass
   Field _X:int
   Method Set_X(Value:int)
      'VALIDATE CODE
      _X = Vale
      'ADDITIONAL CODE
   End Method
   Method Get_X:int()
      'VALIDATE CODE
      Return _X
   End Method
End Type

Type TMyType
	Field m_name:String
	
	Method SetName(value:String)
		m_name = name
	End Method
	
	Method GetName:String()
		Return m_name
	End Method
	
End Type

Rem
    bbdoc: 
    about:
end rem

Type TMyClass
	Field _Position:TDrawingPoint
End Type

Type TMyClass
	Field _Position:TDrawingPoint
	Rem
		bbdoc: Get the Position value in this TMyClass object.
	End Rem
	Method Get_Position:TDrawingPoint()
		Return _Position
	End Method
	Rem
		bbdoc: Set the Position value for this TMyClass object.
	End Rem
	Method Set_Position(Value:TDrawingPoint)
		_Position = Value
	End Method
End Type

Global a:Int, b:Int, c:Int, d:Int, e:Int, f:Int, g:Int
Global a2:Int, b2:Int, c2:Int, d2:Int, e2:Int, f2:Int, g2:Int
Global a3:Int, b3:Int, c3:Int, d3:Int, e3:Int, f3:Int, g3:Int
Global a4:Int, b4:Int, c4:Int, d4:Int, e4:Int, f4:Int, g4:Int
 
DebugStop

Imports BLIde.SDK
Module PlugIn	
	Sub Main()
		AddHandler Events.BLIdeEvents.CallMaxCompiler ,AddressOf PreCompiler
	End Sub
	
	Sub PreCompiler(e As BLIde.SDK.Events.CallMaxCompilerEvent)
		IO.Write("Compiler called.", IO.eConsoleOutput.CompilerConsole)
		IO.Write("File to compile: " & e.CodeForm.filename, IO.eConsoleOutput.CompilerConsole)
		IO.Write("Compiler assembly: " & e.CompilerAssembly, IO.eConsoleOutput.CompilerConsole)
		IO.Write("Build only: " & e.NotRun, IO.eConsoleOutput.CompilerConsole)
		IO.Write("Compiler parameters: " & e.Parameters, IO.eConsoleOutput.CompilerConsole)
	End Sub
	
End Module