**TI92P*main  €êXÏ<ÂÞá&?Iº7=·FÚÞ^'?IêXRbeta012s4¥ZÚ() Prgm ClrIO Local x,y,z,t Dialog Title "Carls gissnings spel" DropDown "Nivå", {"1","2"}, t EndDlog If t=1 Then rand(10)x Else rand(100)x EndIf If t=1 Then "Mellan 1-10"y Else "Mellan 1-100"y EndIf ClrHome Dialog Title "Carls gissnings spel" Request "Din gissning",y EndDlog 0z Lbl a 1+zz expr(y)y If y=x Then Dialog Title "Bra gjort, du klarade det!" Text "Du gissade det rätta nummret!" Text "Du behövde "&string(z)&" försök." EndDlog Stop EndIf If y