Programming C, C++, Java, PHP, Ruby, Turing, VB
Computer Science Canada 
Programming C, C++, Java, PHP, Ruby, Turing, VB  

Username:   Password: 
 RegisterRegister   
 GUI Interface
Index -> Programming, Turing -> Turing Help
View previous topic Printable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic
Author Message
kohul555




PostPosted: Wed May 09, 2018 7:02 pm   Post subject: GUI Interface

So I have this assignment where I need to present a compsci-related career using a GUI interface. I am trying to get the words Game Designer to appear once the program is run. Then, there should be 4 buttons that say Salary, Duties, Education, Employer Type. When each button is clicked, it shud go to a page where I have my research on each topic. There shud be a back button on each page also. I will put my code so far under. I know I'm missing a lot of stuff. This is due in a week, so any helpful advice/ideas will be appreciated!

P.S. I am a Turing newbie, so please bear with me.

CODE:

import GUI

forward proc introscreen()
forward proc Education()
forward proc Duties()
forward proc Salary()
forward proc Employer_Type()







body procedure introscreen
var start_button : int
var duties_button : int
var money_button : int
var job_button : int

GUI.SetBackgroundColor(93)

var picID : int
var font1 : int

font1 := Font.New ("impact:80")
assert font1 > 0
Font.Draw ("G", 100, 500, font1, 56)
delay (100)
Font.Draw ("A", 200, 500, font1, 55)
delay (100)
Font.Draw ("M", 275, 500, font1, 54)
delay (100)
Font.Draw ("E", 350, 500, font1, 53)
delay (100)
Font.Draw (" ", 425, 500, font1, 52)
delay (100)
Font.Draw ("D", 500, 500, font1, 51)
delay (100)
Font.Draw ("E", 575, 500, font1, 50)
delay (100)
Font.Draw ("V", 650, 500, font1, 49)
delay (100)
Font.Draw ("E", 750, 500, font1, 1)
delay (100)
Font.Draw ("L", 850, 500, font1, 1)
delay (100)
Font.Draw ("0", 125, 300, font1, 56)
delay (100)
Font.Draw ("P", 200, 300, font1, 55)
delay (100)
Font.Draw ("E", 275, 300, font1, 54)
delay (100)
Font.Draw ("R", 350, 300, font1, 53)
delay (100)

GUI.Refresh ()
start_button := GUI.CreateButton (475, 200, 0, "Education", Education)
duties_button := GUI.CreateButton (475, 150, 0, "Duties", Duties)
money_button := GUI.CreateButton (475, 100, 0, "Salary", Salary)
job_button := GUI.CreateButton (475, 50, 0, "Employer Type", Employer_Type)

loop
exit when GUI.ProcessEvent
end loop

body proc Education
put "Atleast a bachelor's degree in computer software programming is required."
end Education

body proc Duties
put "Game developers program the games, make note of progress, design storylines, and characters."
end Duties

body proc Salary
put "Game developers earn between $50,000 to $102,000 annually. Of course, this depends on the success of the game and if the employee is senior or junior."
end Salary

body proc Employer_Type
put "Game designers have all kinds of employers."
end Employer_Type

Thanks
Sponsor
Sponsor
Sponsor
sponsor
Srlancelot39




PostPosted: Thu May 10, 2018 10:51 am   Post subject: RE:GUI Interface

I don't have any experience with built-in GUI, but as far as the program architecture goes, I would run each page as its own function and give each page function a condition statement that checks to see if a Back button is being pressed. If it is, it should exit the function and return to your main program (main page).

Where you have
code:
loop
exit when GUI.ProcessEvent
end loop

you could change the exit to a function call instead. The function to be called would depend on what button was pressed, of course.
Display posts from previous:   
   Index -> Programming, Turing -> Turing Help
View previous topic Tell A FriendPrintable versionDownload TopicSubscribe to this topicPrivate MessagesRefresh page View next topic

Page 1 of 1  [ 2 Posts ]
Jump to:   


Style:  
Search: