I'm talking BASIC, obviously. I know nothing of C++.
------------------------------------------------------------------
Anyways, I have been programming here and there. I have a calculator and a conversation; I will put pictures of them up soon, along with the code to go with them.
So what should I make? Not too hard, but not too easy.
Thanks!
Print "Please input your first number."
num1 = Input$("")
Print "Please input your second number."
num2 = Input$("")
Print "Please input your operation type.
Print "1 = *, 2 = -, 3 = +, 4 = /"
oper = Input$("")
Select oper
Case 1
answer = num1 * num2
Goto answer1
Case 2
answer = num1 - num2
Goto answer2
Case 3
answer = num1 + num2
Goto answer3
Case 4
answer= num1 / num2
Goto answer4
End Select
.answer1
Print answer
WaitKey
End
.answer2
Print answer
WaitKey
End
.answer3
Print answer
WaitKey
End
.answer4
Print answer
WaitKey
End
AppTitle "Power of the Internet" ;creates the title of the app
Print "What is you're name?" ;asks for name
name$ = Input$() ;input, for client
Print "Hi " + name$ + "." ;prints hello, and adds given name
Delay(1250) ;delays for 1.25 seconds
Input$("So, " + name$ + ", what's up? ") ;asks what's up
Print "I see." ;yes you do
Delay(1500) ;delays for one and a half seconds
age = Input$("Say, how old are you? ") ;asks for age
Print age - 1 + ", huh. That's a CRAZY age." ;subtracts one from age, silly internets
Delay(1250) ;see above like commands
Print "Oh, " + age + ", I'm sorry. Sometimes I get confused." ;yes you do, silly internets
Delay(1800) ;see above like commands
Print "Yeah, " + age + " is pretty crazy." ;it sure is, internets
Delay(2000) ;see above--you knowwhat, screw it. you should already be familiar with delays by now
If age > 25 Then ;work or school? figures out by age
workplace$ = Input$("So, where do you work? ") ;workplace question
Goto label1 ;goes to the first label
Else If age < 25 Then ;see above like command
schoolplace$ = Input$("So, where do you go to school? ") ;see question in parentheses
Goto label2 ;see above like command
EndIf ;ends the 'if' variable majigger
.label1 ;sets label one for the above goto
Print "You know, I used To work there." ;internets are being friendly!
Print "That's pretty coincidental, I worked there too!" ;orly internets?
Goto continconvo ;goes to label, you should have this figured out by now
.label2 ;any wild guesses? hint, see my statement on .label 1
Print "Oh, cool." ;you bet your bippy, internets
favsub$ = Input$("So, what's you're favorite subject? ") ;mines german. yours?
Print "Really? That's my favorite too!" ;NO IT ISNT INTERNETS! gosh.
Input$("So what have you learned so far? ") ;not much really... am i supposed to have?
Print "Interesting..." ;NO IT ISNT INTERNETS! gosh.
Goto continconvo ;I wonder...
.continconvo ;sets up label for the similar goto commands
Delay(2500) ;you should know this.
ques = Input$("Wanna know what I know? ") ;yush
Print "Whatever." ;Way to be nice.
If age < 25 Then ;figure it out using the above similar terms and commands, from here on out. cha cha!
Print "You are an " + age + " year old person named " + name$ + "."
Delay (2250)
Print "You go to " + schoolplace$ + " and your favorite"
Print "subject is " + favsub$ + "."
Goto label22
Else If age > 25 Then
Print "You are an " + age + " year old person named " + name$ + "."
Delay (2250)
Print "And you work at " + workplace$ + "."
Goto label22
EndIf
.label22
Delay(1000)
Print "Well, I gotta go. Bye " + name$ + "."
Input$()
End
