Imports System
Imports uCalcSoftware
Public Module Program
   Public Sub Main()
      Dim uc As New uCalc()
      Dim myVar = uc.DefineVariable("counter As Int8u = 255")
      Dim ptr = myVar.ValueAddr()
      
      '// Read natively as unsigned byte
      Console.WriteLine(uc.ValueAt(ptr, uc.DataTypeOf("Int8u")))
      
      '// Read the exact same memory address, but interpret as signed byte
      Console.WriteLine(uc.ValueAt(ptr, uc.DataTypeOf("Int8")))
   End Sub
End Module