Home | Reviews | GUIpedia | Forum | Fun500
atrocity | DOS Doors Build 0008
Changelog:
More work on the compiler
ESC now does a kernelpanic instead of it's own seperate "quit" action
Added a GUI-wide variable for the number of TotalPrograms
Fixed CreateProgram to use TotalPrograms, not TotalVariables
Added function to convert UUID to ProgramID
Added a routine to read the headers from .DES files
Added AddJumpTable routine
Added GetJumpTable routine
Added ProgramLocation
Added a RunProgram routine
Implemented working (compilable) programs! (interpretted)
Allowed System.X variable to be assigned to local variables
The program "uptime" is now a true program and not built-in
The program "about" is now a true program and not built-in
Added the "call" command to scripting language for basic loop creation
Build 0009 will finish off the last "window" (statistics) and allow that to be it's own program. Afterward, I'm going to start working on the shell (not sure if I want to keep the taskbar/tray thing still) and maybe add a few apps to allow you to change settings. I need to add a lot more primitives to the scripting language first, though. | 2013-04-26 | 5:32 PM |
atrocity | Re: DOS Doors Build 0008Here's the "uptime" program before I compiled it down in case anybody wants to see how the language is:
' Shows the current uptime
Sub Main
Dim As Integer X
Dim As Integer Y
Dim As Integer Width
Dim As Integer Height
Dim As String Caption
Dim As String Name
Dim As Integer R
Dim As Integer G
Dim As Integer B
' Set a window up
Let X = 60
Let Y = 60
Let Width = 200
Let Height = 40
Let Caption = "Uptime"
Let Name = "uptime"
' Create the window
CreateWindow (X, Y, Width, Height, Caption, Name)
Let X = 1
Let Y = 1
Let Caption = "Uptime (in seconds):"
PrintString (X, Y, Caption, Name)
Let Y = 9
Let Caption = System.OS.Uptime
Call PrintUptime
End Sub
Sub PrintUptime
Let R = 198
Let G = 198
Let B = 198
PenColor (R, G, B)
PrintString (X, Y, Caption, Name)
Let R = 0
Let G = 0
Let B = 0
PenColor (R, G, B)
Let Caption = System.OS.Uptime
PrintString (X, Y, caption, Name)
DoEvents
Call PrintUptime
End Sub
Sub OnQuit
DestroyWindow (Name)
End Sub | 2013-04-26 | 5:42 PM |
Brandon | Re: DOS Doors Build 0008The language looks pretty easy to follow, which is a good sign. Looks like you're off to a good start. | 2013-04-26 | 7:29 PM |
atrocity | Re: DOS Doors Build 0008Yeah, the indentation didn't work or anything (I probably should've used a code block or something). But thanks! | 2013-04-26 | 8:31 PM |
Blog
2021 Brandon Cornell