kruchess 1.9 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970
  1. # kruchess
  2. $metka = ''
  3. $loc = 'kruchess'
  4. frost = 0
  5. gs'stat'
  6. FColor = RGB(0,0,0)
  7. BColor = RGB(255,255,255)
  8. LColor = RGB(106,90,205)
  9. '<center><b><font color = maroon>Chess Club</font></b></center>'
  10. '<center><img src="images/lur/kru/kruchess.jpg"></center>'
  11. if hour > 20:
  12. 'Chess club is closed. The coach and some players are tidying away the boards and pieces.'
  13. act 'Leave':gt'gdkkru'
  14. else
  15. if week ! 6:
  16. 'The kids are sitting around playing practise games and watched over and helped by coach Genrikh G.'
  17. act 'Spend an hour practising with assistance from the coach':
  18. chess += rand(intel/20,intel/10)
  19. intel += 1
  20. minut += 60
  21. end
  22. else
  23. 'On Saturdays, after a week''s training, club members spend the whole day playing against each other.'
  24. if chess_win<5:
  25. 'You are paired against Vitalik, the youngest boy in the club. Despite his age he has already achieved rank 4, the lowest official chess rank corresponding to an ELO rating of 1000+.'
  26. act'Play':
  27. cls
  28. $chess_name='Vitalik'
  29. chessV=40
  30. gt'chessplay'
  31. end
  32. end
  33. if chess_win>=5 and chess_win<10:
  34. 'You get to play against Kostya, who recently advanced to rank 3 after passing 1400 ELO points.'
  35. act'Play':
  36. cls
  37. $chess_name='Kostya'
  38. chessV=100
  39. gt'chessplay'
  40. end
  41. end
  42. if chess_win>=10 and chess_win<15:
  43. 'You sit down to play Sergei. You recall that he is a rank 2 player with an ELO rating of more than 1600.'
  44. act'Play':
  45. cls
  46. $chess_name='Sergei'
  47. chessV=300
  48. gt'chessplay'
  49. end
  50. end
  51. if chess_win>=15:
  52. 'You are facing the chess coach. At his peak he achieved an ELO ranking of over 2000, and despite his skills declining with age he still plays at the level of a rank 1 player.'
  53. act'Play':
  54. cls
  55. $chess_name='Coach Genrikh G.'
  56. chessV=800
  57. gt'chessplay'
  58. end
  59. end
  60. end
  61. act 'Leave':gt'gdkkru'
  62. end
  63. --- kruchess ---------------------------------