Sorry your browser is not supported!

// Project: EditBox 
// Created: 2020-08-27

// show all errors
SetErrorMode(2)

// set window properties
SetWindowTitle( "EditBox" )
SetWindowSize( 1024, 768, 0 )
SetWindowAllowResize( 1 ) // allow the user to resize the window

// set display properties
SetVirtualResolution( 1024, 768 ) // doesn't have to match the window
SetOrientationAllowed( 1, 1, 1, 1 ) // allow both portrait and landscape on mobile devices
SetSyncRate( 30, 0 ) // 30fps instead of 60 to save battery
SetScissor( 0,0,0,0 ) // use the maximum available screen space, no black borders
UseNewDefaultFonts( 1 ) // since version 2.0.22 we can use nicer default fonts

CreateEditBox(1)
SetEditBoxSize(1, 400, 40)
SetEditBoxTextSize(1,40)
SetEditBoxPosition(1,GetVirtualWidth()/2,GetVirtualHeight()/2)

startcheck = 0

SetEditBoxFocus(1,1)

// Stat of Main Loop
do
    
	If startcheck = 0
		
		Print("PLEASE INPUT ROCK, PAPER OR SCISSORS")
		
	endif

	if GetEditBoxChanged(1)
		
		Computer = random(0,2)

		// This is a rem statement that will not be read by the compiler. The Computer integer variable (whole number variable) receives a generated random number between 0 and 2, so 0, 1 or 2.
		// Let's assume 0 is ROCK, 1 is PAPER, 2 is SCISSORS. This can be converted to a string variable with if statements.

		if Computer = 0
			
			  Computer$ = "ROCK"
			  
		elseif Computer = 1
			
			  Computer$ = "PAPER"
			  
		elseif Computer = 2
			
			  Computer$ = "SCISSORS"
			  
		endif

	PlayerInput$ = GetEditBoxText(1)

	// Converts the input string from whatever case to upper case only, so if you input "rock" or "rOcK" it will convert each version to "ROCK"
	Player$ = upper(PlayerInput$)

	startcheck = 1

	// Sets the edit box cursor active again, so one can input again without having to click on the box to make the cursor go into focus.
	SetEditBoxFocus(1,1)

	endif

	// The Player$ variable is a string variable that stores text, this variable will store the data input from the editbox that you can input. Let's say you input "ROCK".

	// The next lines will process the player input and compare it with computer generated input

	if startcheck = 1
		if Player$ = Computer$
			
			print("Computer chose "+Computer$)
			Print("")
			print("Player chose "+Player$)
			Print("")
			Print("THE GAME IS A DRAW")
			
		elseif Player$ = "ROCK" AND Computer$ = "PAPER" OR Player$ = "PAPER" AND Computer$ = "SCISSORS" OR Player$ = "SCISSORS" AND Computer$ = "ROCK"
			
			print("Computer chose "+Computer$)
			Print("")
			print("Player chose "+Player$)
			Print("")
			Print("YOU LOSE!")
			Print("")
			Print("COMPUTER WINS!")
			
		elseif Player$ = "PAPER" AND Computer$ = "ROCK" OR Player$ = "SCISSORS" AND Computer$ = "PAPER" OR Player$ = "ROCK" AND Computer$ = "SCISSORS"
			
			print("Computer chose "+Computer$)
			Print("")
			print("Player chose "+Player$)
			Print("")
			Print("YOU WIN!")
			Print("")
			Print("COMPUTER LOSES!")
			
		endif
	endif
	
	If startcheck = 1
		Print("")
		Print("PLEASE INPUT NEXT CHOICE TO PLAY AGAIN")
		
    endif
    Sync()
loop

Print("Hello World")
Do
Loop