On opencard
OMath Open without Menu     44 , 49 , 461, 341
OMath Menu Grid 32
OMath NoSave
 if game_on is not 1 then
  play bokuwo
   put 5 into ntx
   naratoranimex
else
  put 102 into presentcard

 end if

put 0 into init102

End Opencard

On move_object
OMath Menu Move
end move_object

On find_length
OMath Menu Length
End find_length

On find_angle
OMath Menu AngleSize
End find_angle

On Cancellation
OMath Menu Undo
End Cancellation





On GameStart

put random(10) into rdm


if rdm = 1 then
 QuizDlg2 "Cuntos vrtices ves?",1, 2, 3, 4, 3
end if

if rdm = 2 then
 QuizDlg2 "Cuntos lados hay?",1, 2, 3, 4, 3
end if

if rdm = 3 then
 QuizDlg2 "Este tringulo tiene tres lados de igual longitud.",SI, NO, , , 1
end if

if rdm = 4 then
 QuizDlg2 "Este tringulo tiene tres lados de diferente longitud .",SI, NO, , , 2
end if

if rdm = 5 then
 QuizDlg2 "Este tringulo tiene tres ngulos interiores de diferente tamao.",SI, NO, , , 2
end if

if rdm = 6 then
 QuizDlg2 "Cul tringulo tiene tres ngulos interiores de igual tamao?", " rectngulo", " issceles","equiltero","no tringulo", 3
end if

if rdm = 7 then
 QuizDlg2 "Cul tringulo tiene solo dos ngulos interiores iguales?"," rectngulo", " issceles","equiltero", "no tringulo", 2
end if

if rdm = 8 then
 QuizDlg2 "Este tringulo tiene todos los ngulos interiores iguales.",SI, NO, , , 2
end if

if rdm = 9 then
 QuizDlg2 "Un tringulo equiltero puede ser un tringulo rectngulo.",SI, NO, , , 2
end if

if rdm = 10 then
 QuizDlg2 "Un tringulo cuyos lados midan todos 3cm de largo es un tringulo equiltero.",SI, NO, , , 1
end if








      repeat while quiz_quit = 0
         wait 30 ticks
      end repeat
      put 0 into quiz_quit
  if math_answer is not 1 then
       if math_answer is  -1 then
          play  uhoh2


          exit GameStart
       else
              play jawharp
          showwitch_surprised
      end if

   else
           play good
           show_frog_good


 

  end if


End Gamestart



