!Mike Marantis
!10/5/01
!Nick Yee sucks!!!!
!CPR1 
! Hot cold proggie
Do while q$<>"n"
CLEAR
RANDOMIZE
PRINT "              Welcome the the super duper advanced number generator/guessing"
PRINT "                           scientific program of science!"
PRINT ""
PRINT "I am the great swami of salami! I will pick a number from 1 to 100."
PRINT "If you are good enough you will be able to guess the number in 8 tries or less."
PRINT "I will tell you if you are hot, warm, cold."
PRINT "If you do good....you get a cookie!"
PAUSE 3
SET COLOR "Red"
PRINT "Ready?"
PAUSE 1
SET COLOR "Brown"
PRINT "Set?"
PAUSE 1
SET COLOR "Blue"
PRINT "Are you sure your ready?"
PAUSE 1
SET COLOR "Blue"
PRINT "I don't think your ready for Mellis' jelly!"
PAUSE .5
SET COLOR "Green"
PRINT "Go!"
LET answer=int((rnd*100)+1)
LET counter=1
SET COLOR "black"
PRINT answer
DO While counter<=8
set back "white"
set color "black"   
let num=0
	DO while num<=0 or num>101
      PRINT "What is your number for guess ", counter
      INPUT num
      LET num= int(num)
   LOOP
   LET counter=counter+1
   IF num=answer then
      PRINT" Congratulations young salami swami!"
      PRINT "You deserve a cookie!"
pause 2
open #1: screen 0,1,0,1
window #1
set window 0,319,0,199
set color 6
box circle 100,220,40,160
box circle 120,160,60,100

flood 210,100
set color "69"
flood 100,130







let counter=5000
   ELSE
      LET difference=abs(answer-num)
      IF difference<=3 then
         SET BACK 12
         SET COLOR 4
         PRINT "                               "
         PRINT " You are hotter than squirrel. "
         PRINT "                               "
      ELSE IF difference<=5 then
         SET BACK 13
         SET COLOR 11
         PRINT "                             "
         PRINT " You are a luke-warm monkey. "
         PRINT "                             "
      ELSE IF difference <=8 then
         SET BACK 9
         SET COLOR 11
         PRINT "                                                          "
         PRINT " You are cool, unlike Nick Yee and his pop tarts of doom. "
         PRINT "                                                          "
      ELSE
         SET BACK 1
         SET COLOR 11
         PRINT "                                                "
         PRINT " You are colder than a toad's butt in December! "
         PRINT "                                                "
      END IF
   END IF
LOOP
input prompt "Would you like to play again? (y or n)": q$
END

<!-- following code added by server. PLEASE REMOVE -->
<!-- preceding code added by server. PLEASE REMOVE -->