day = "Monday"
meal = "dinner"
food = ""
_If day=="Monday" _Then
_Select meal
_Case "breakfast"
food = "Cereal"
_Case "lunch"
food = "Sandwich"
_Case "dinner"
food = "Pasta"
_Case_Else
food = "No meal specified"
_End_Select
_End_If
_Print_Console("On " .. day .. " for " .. meal .. ", you should have " .. food .. ".")
day = "Tuesday"
meal = "lunch"
food = ""
_If day=="Tuesday" _Then
_Select meal
_Case "breakfast"
food = "Toast"
_Case "lunch"
food = "Salad"
_Case "dinner"
food = "Chicken"
_Case_Else
food = "No meal specified"
_End_Select
_End_If
_Print_Console("On " .. day .. " for " .. meal .. ", you should have " .. food .. ".")
day = "Wednesday"
meal = "breakfast"
food = ""
_If day=="Wednesday" _Then
_Select meal
_Case "breakfast"
food = "Eggs"
_Case "lunch"
food = "Soup"
_Case "dinner"
food = "Steak"
_Case_Else
food = "No meal specified"
_End_Select
_End_If
_Print_Console("On " .. day .. " for " .. meal .. ", you should have " .. food .. ".")
day = "Thursday"
meal = "dinner"
food = ""
_If day=="Thursday" _Then
_Select meal
_Case "breakfast"
food = "Pancakes"
_Case "lunch"
food = "Sandwich"
_Case "dinner"
food = "Pizza"
_Case_Else
food = "No meal specified"
_End_Select
_End_If
_Print_Console("On " .. day .. " for " .. meal .. ", you should have " .. food .. ".")
day = "Friday"
meal = "lunch"
food = ""
_If day=="Friday" _Then
_Select meal
_Case "breakfast"
food = "Cereal"
_Case "lunch"
food = "Burger"
_Case "dinner"
food = "Fish"
_Case_Else
food = "No meal specified"
_End_Select
_End_If
_Print_Console("On " .. day .. " for " .. meal .. ", you should have " .. food .. ".")
day = "Saturday"
meal = "dinner"
food = ""
_If day=="Saturday" _Then
_Select meal
_Case "breakfast"
food = "Toast"
_Case "lunch"
food = "Soup"
_Case "dinner"
food = "Steak"
_Case_Else
food = "No meal specified"
_End_Select
_End_If
_Print_Console("On " .. day .. " for " .. meal .. ", you should have " .. food .. ".")
day = "Sunday"
meal = "lunch"
food = ""
_If day=="Sunday" _Then
_Select meal
_Case "breakfast"
food = "Pancakes"
_Case "lunch"
food = "Roast"
_Case "dinner"
food = "Soup"
_Case_Else
food = "No meal specified"
_End_Select
_End_If
_Print_Console("On " .. day .. " for " .. meal .. ", you should have " .. food .. ".")