mirror of
https://github.com/danbulant/Cosmos
synced 2026-05-30 21:00:30 +00:00
21 lines
603 B
VB.net
21 lines
603 B
VB.net
Imports Cosmos.Debug
|
|
|
|
Public Class Kernel
|
|
|
|
Public Shared Sub Boot()
|
|
Dim xBoot = New Cosmos.Sys.Boot()
|
|
xBoot.Execute()
|
|
|
|
Console.WriteLine("Test")
|
|
Debugger.Send("Hello from Cosmos (VB)!")
|
|
Console.WriteLine("Cosmos booted successfully. Type a line of text to get it echoed back.")
|
|
Console.WriteLine("Test")
|
|
While True
|
|
Console.Write("Input: ")
|
|
Dim xResult = Console.ReadLine()
|
|
Console.Write("Text typed: ")
|
|
Console.WriteLine(xResult)
|
|
End While
|
|
End Sub
|
|
|
|
End Class
|