BASIC GUI.Button program

[Triple Five]

heres a basic GUI program that we did in our grade 10 compsci class

code:

% Creating Buttons in OOT import GUI in "%oot/lib/GUI" View.Set("graphics:500;300,nocursor,title:creating buttons") procedure right for i:0..100     drawfilloval(maxx div 2+i,maxy div 2,50,50,5)     delay(15)     drawfilloval(maxx div 2+i,maxy div 2,50,50,3)     end for     drawfilloval(maxx div 2 + 100, maxy div 2,50,50,5)     end right         procedure left     for decreasing i:100..0     drawfilloval(maxx div 2+i,maxy div 2,50,50,5)     delay(15)     drawfilloval(maxx div 2+i, maxy div 2,50,50,3)     end for     drawfilloval(maxx div 2,maxy div 2,50,50,5)     end left         GUI.SetBackgroundColor(3)     drawfilloval(maxx div 2,maxy div 2,50,50,5)         var button1:int:=GUI.CreateButton(50,150,0,"Move Left",left)     var button2:int:=GUI.CreateButton(50,200,0,"Move Right",right)         var quitButton:=GUI.CreateButton(400,10,0,"Quit",GUI.Quit)     loop     exit when GUI.ProcessEvent     end loop     put "Finished"

[Thuged_Out_G]

i had to teach myself everything about GUI...we havent learned shit barely in compsci lol

functions/procedures
put/get from a file
records
arrays/2D arrays
loops
and that is pretty much it, anything else i tought myself...and this is gr.11 compsci

[Maverick]

Wow we learned that in like mid Grade 10.

[Triple Five]

our teacher is preaty good with turing stuff! if we want to learn someing that not in the program he'll print off a sheet for us about the program and teach us the code and explain it to us!

[shorthair]

our teacher apparently made the payroll system for the big-B , it was a 180 program PROGRAM, hes a really good teacher , and we take part in all the contests and usually make it to toronto

[kalin]

thats a cool program. should make it so that you can shoot it or something...make a game out of it