**TI92P*main¿`­ÞÙ(ÇeêX¿`ÂÞá&§G¦§YÈÇ\ÈÚÞ^'§GêXRbeta014sä¥ZŠ() Prgm ClrIO Local x,y,z,t Dialog Title "Electronic Guessing Game av CDS" DropDown "Nivå", {"1","2"}, t EndDlog Lbl a 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 "Electronic Guessing Game" Request "Din gissning",y EndDlog 0z Lbl b 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 Dialog Title "Carpe Diem Software" Text "Besök http://surf.to/cds-calc" Text "för nya versioner av EGG" Text "och andra räknarprogram" EndDlog Goto a Stop EndIf If y