Jack OS for Sega Genesis

 psgVol 0, 15
 goto boot

boot:
	print "Enter a name that will be used if a name gets displayed."
	input "NAME>> "; name$
	cls
	palette &h00EE, 0, 1
	print "Jack OS SLOW Sega Genesis Bootloader v0.0.4"
	print ""
	sleep 60
	cls
	print ""
	print ""
	sleep 60
	cls
	palette &h0EA2, 0, 1
	psg 0, 500
	sleep 10
	psg 0, -1
	print "Now loading Jack OS version 0.0.4!!!"
	sleep 120
	cls
	print "Booting colours!!!"
	sleep 499
	cls
	print "Finishing boot up!!!"
	sleep 679
	cls
	print "Finished!!! Have fun in Jack OS!!!"
	sleep 679
	print "Oh, wait, you need to put in a password, see you soon!!! (on Jack OS!!!)"
	sleep 398
	goto getPassword

getPassword:
	cls
	input "What is the password?"; pass$
	if pass$ = "JACK" then goto jackOS
	print "You did not enter the correct password. Please try again."
	sleep 20
	goto getPassword

jackOS:
	cls
	print "Thank you, Jack OS will now start."
	sleep 398
	cls
	print "Huh? It seems that the music is missing. Oh well."
	sleep 100
	cls
	palette &h0EEE, 0, 1
	locate 0, 1
	print "Jack OS"
	print "Hello, "; name$; "."
	print "Have fun in Jack OS!!!"
	sleep 398
	cls
	print "Hey guys, are you bored of Os'es that do nothing at all?"
	sleep 398
	cls
	print "Then Jack OS is for you!!!!"
	sleep 398
	cls
	print "Jack OS will have game and apps, such as questions master, village, and klondike!!!"
	sleep 398
	cls
	print "This OS is still in development, and will be released soon!!!!"
	sleep 398
	cls
	print "Thanks for previewing Jack OS!!!! See you soon!!!"
	sleep 398
	end