ÌÌÌÌÜÝÝíÜÝÝíÜÝÝíÜÝÝíÜÝÝíÜÝÝíìîîîÌÌÌÌÜÝÒíÜ-ÒíÜ"ÒíÜÝßíÜÝßíÜÿÿïìîîîÌÌÌÌÜÝßíÜýßíüÿÿíÜÿÿïÜýßíÜýÝíìîîîÌÌÌÌüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïìîîîÌÌÌÌÜÝÙíÜÙíÜÙÙíÜÝÙíÜÝÙíÜ™™éìîîîÌÌÌÌÜ-"íÜÒÝâÜÝÝâÜÝ"íÜ-ÝíÜ""âìîîîÌÌÌÌÜ]UíÜÕÝåÜÝ]íÜÝÝåÜÕÝåÜ]UíìîîîÌÌÌÌÜÝèÜÝèÜˆèÜÝÝèÜÝÝèÜÝÝèìîîîÌÌÌÌÜ33ãÜÓÝíÜ=3íÜÝÝãÜÝÝãÜ33íìîîîÌÌÌÌÜmfæÜÖÝíÜffíÜÖÝæÜÖÝæÜmfíìîîîÌÌÌÌÜDDäÜÝMíÜÝÔíÜÝÔíÜMÝíÜMÝíìîîîÌÌÌÌÜíÜÑÝáÜíÜÑÝáÜÑÝáÜíìîîîÌÌÌÌÜýÿíÜßÝïÜßÝïÜýÿïÜÝÝïÜýÿíìîîî 3 3pppp000ðÀ°° ° °° ° ° kÐÐÐÐà `P`P`P@p@P`p`P\È;ÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÜÝÝíÜÝÝíÜÝÙíüÿÿïüÿÿïÜ-"íÜÝÒíÜ-"íüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïÜÝÝíÜÝÝíÜÙíüÿÿïüÿÿïÜÒÝâÜ-ÒíÜÒÝâüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïÜÝÝíÜÝÝíÜÙÙíüÿÿïüÿÿïÜÝÝâÜ"ÒíÜÝÝâüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïÜÝÝíÜÝÝíÜÝÙíüÿÿïüÿÿïÜÝ"íÜÝßíÜÝ"íüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïÜÝÝíÜÝÝíÜÝÙíüÿÿïüÿÿïÜ-ÝíÜÝßíÜ-ÝíüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïÜÝÝíÜÝÝíÜ™™éüÿÿïüÿÿïÜ""âÜÿÿïÜ""âüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïüÿÿïìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÜÝÝíÜ]UíÜÝÙíüÿÿïüÿÿïÜ-"íÜÝÒíÜ]UíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÝíÜÕÝåÜÙíüÿÿïüÿÿïÜÒÝâÜ-ÒíÜÕÝåÜÙíÜÙíÜÙíÜÙíÜÙíÜÙíÜÙíÜÝÝíÜÝ]íÜÙÙíüÿÿïüÿÿïÜÝÝâÜ"ÒíÜÝ]íÜÙÙíÜÙÙíÜÙÙíÜÙÙíÜÙÙíÜÙÙíÜÙÙíÜÝÝíÜÝÝåÜÝÙíüÿÿïüÿÿïÜÝ"íÜÝßíÜÝÝåÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÿÿÿÿðÿÜÝÝíÜÕÝåÜÝÙíüÿÿïüÿÿïÜ-ÝíÜÝßíÜÕÝåÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíððÿðÜÝÝíÜ]UíÜ™™éüÿÿïüÿÿïÜ""âÜÿÿïÜ]UíÜ™™éÜ™™éÜ™™éÜ™™éÜ™™éÜ™™éÜ™™éðÿÿÿìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÿðÿÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÿÿðÿðÿÜÝÝíÜ-"íüÿÿïÜÝÙíÜÝÙíÜ]UíÜ-"íÜ]UíÜÝÒíÜÝÙíÜÝÙíÜÝÒíÜÝÙíÜÝÙíÜÝÒíÜÝÝíÜÒÝâüÿÿïÜÙíÜÙíÜÕÝåÜÒÝâÜÕÝåÜ-ÒíÜÙíÜÙíÜ-ÒíÜÙíÜÙíÜ-ÒíÜÝÝíÜÝÝâüÿÿïÜÙÙíÜÙÙíÜÝ]íÜÝÝâÜÝ]íÜ"ÒíÜÙÙíÜÙÙíÜ"ÒíÜÙÙíÜÙÙíÜ"ÒíÜÝÝíÜÝ"íüÿÿïÜÝÙíÜÝÙíÜÝÝåÜÝ"íÜÝÝåÜÝßíÜÝÙíÜÝÙíÜÝßíÜÝÙíÜÝÙíÜÝßíÜÝÝíÜ-ÝíüÿÿïÜÝÙíÜÝÙíÜÕÝåÜ-ÝíÜÕÝåÜÝßíÜÝÙíÜÝÙíÜÝßíÜÝÙíÜÝÙíÜÝßíÜÝÝíÜ""âüÿÿïÜ™™éÜ™™éÜ]UíÜ""âÜ]UíÜÿÿïÜ™™éÜ™™éÜÿÿïÜ™™éÜ™™éÜÿÿïìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÜÝÝíÜ-"íÜÝÙíÜ-"íÜÝÒíÜ-"íÜÝÒíÜ-"íÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜ-"íÜ-"íÜÝÝíÜÒÝâÜÙíÜÒÝâÜ-ÒíÜÒÝâÜ-ÒíÜÒÝâÜÙíÜÙíÜÙíÜÙíÜÙíÜÒÝâÜÒÝâÜÝÝíÜÝÝâÜÙÙíÜÝÝâÜ"ÒíÜÝÝâÜ"ÒíÜÝÝâÜÙÙíÜÙÙíÜÙÙíÜÙÙíÜÙÙíÜÝÝâÜÝÝâÜÝÝíÜÝ"íÜÝÙíÜÝ"íÜÝßíÜÝ"íÜÝßíÜÝ"íÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝ"íÜÝ"íÜÝÝíÜ-ÝíÜÝÙíÜ-ÝíÜÝßíÜ-ÝíÜÝßíÜ-ÝíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜ-ÝíÜ-ÝíÜÝÝíÜ""âÜ™™éÜ""âÜÿÿïÜ""âÜÿÿïÜ""âÜ™™éÜ™™éÜ™™éÜ™™éÜ™™éÜ""âÜ""âìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÜÝÙíÜÝÙíÜÝÙíÜÝÒíÜ-"íÜ-"íÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíüÿÿïüÿÿïÜÝÙíÜÝÒíÜÙíÜÙíÜÙíÜ-ÒíÜÒÝâÜÒÝâÜÙíÜÙíÜÙíÜÙíÜÙíüÿÿïüÿÿïÜÙíÜ-ÒíÜÙÙíÜÙÙíÜÙÙíÜ"ÒíÜÝÝâÜÝÝâÜÙÙíÜÙÙíÜÙÙíÜÙÙíÜÙÙíüÿÿïüÿÿïÜÙÙíÜ"ÒíÜÝÙíÜÝÙíÜÝÙíÜÝßíÜÝ"íÜÝ"íÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíüÿÿïüÿÿïÜÝÙíÜÝßíÜÝÙíÜÝÙíÜÝÙíÜÝßíÜ-ÝíÜ-ÝíÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÙíüÿÿïüÿÿïÜÝÙíÜÝßíÜ™™éÜ™™éÜ™™éÜÿÿïÜ""âÜ""âÜ™™éÜ™™éÜ™™éÜ™™éÜ™™éüÿÿïüÿÿïÜ™™éÜÿÿïìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌüÿÿïüÿÿïÜ-"íÜ-"íÜ]UíÜ-"íÜ-"íÜÝÙíÜÝÙíÜÝÒíÜÝÙíüÿÿïüÿÿïÜÝÙíÜÝÙíüÿÿïüÿÿïÜÒÝâÜÒÝâÜÕÝåÜÒÝâÜÒÝâÜÙíÜÙíÜ-ÒíÜÙíüÿÿïüÿÿïÜÙíÜÙíüÿÿïüÿÿïÜÝÝâÜÝÝâÜÝ]íÜÝÝâÜÝÝâÜÙÙíÜÙÙíÜ"ÒíÜÙÙíüÿÿïüÿÿïÜÙÙíÜÙÙíüÿÿïüÿÿïÜÝ"íÜÝ"íÜÝÝåÜÝ"íÜÝ"íÜÝÙíÜÝÙíÜÝßíÜÝÙíüÿÿïüÿÿïÜÝÙíÜÝÙíüÿÿïüÿÿïÜ-ÝíÜ-ÝíÜÕÝåÜ-ÝíÜ-ÝíÜÝÙíÜÝÙíÜÝßíÜÝÙíüÿÿïüÿÿïÜÝÙíÜÝÙíüÿÿïüÿÿïÜ""âÜ""âÜ]UíÜ""âÜ""âÜ™™éÜ™™éÜÿÿïÜ™™éüÿÿïüÿÿïÜ™™éÜ™™éìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌüÿÿïÜÝÙíÜ-"íÜÝÒíÜ]UíÜÝÒíÜÝÒíÜ]UíÜ]UíÜ]UíÜÝèÜ]UíÜ]UíÜ-"íÜÝÙíüÿÿïÜÙíÜÒÝâÜ-ÒíÜÕÝåÜ-ÒíÜ-ÒíÜÕÝåÜÕÝåÜÕÝåÜÝèÜÕÝåÜÕÝåÜÒÝâÜÙíüÿÿïÜÙÙíÜÝÝâÜ"ÒíÜÝ]íÜ"ÒíÜ"ÒíÜÝ]íÜÝ]íÜÝ]íÜˆèÜÝ]íÜÝ]íÜÝÝâÜÙÙíüÿÿïÜÝÙíÜÝ"íÜÝßíÜÝÝåÜÝßíÜÝßíÜÝÝåÜÝÝåÜÝÝåÜÝÝèÜÝÝåÜÝÝåÜÝ"íÜÝÙíüÿÿïÜÝÙíÜ-ÝíÜÝßíÜÕÝåÜÝßíÜÝßíÜÕÝåÜÕÝåÜÕÝåÜÝÝèÜÕÝåÜÕÝåÜ-ÝíÜÝÙíüÿÿïÜ™™éÜ""âÜÿÿïÜ]UíÜÿÿïÜÿÿïÜ]UíÜ]UíÜ]UíÜÝÝèÜ]UíÜ]UíÜ""âÜ™™éìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌüÿÿïÜÝÙíÜÝÒíÜ]UíÜÝÒíÜ33ãÜÝÒíÜÝÒíÜ-"íÜÝÒíÜÝÒíÜÝÒíÜÝÒíÜÝÒíÜÝÙíüÿÿïÜÙíÜ-ÒíÜÕÝåÜ-ÒíÜÓÝíÜ-ÒíÜ-ÒíÜÒÝâÜ-ÒíÜ-ÒíÜ-ÒíÜ-ÒíÜ-ÒíÜÙíüÿÿïÜÙÙíÜ"ÒíÜÝ]íÜ"ÒíÜ=3íÜ"ÒíÜ"ÒíÜÝÝâÜ"ÒíÜ"ÒíÜ"ÒíÜ"ÒíÜ"ÒíÜÙÙíüÿÿïÜÝÙíÜÝßíÜÝÝåÜÝßíÜÝÝãÜÝßíÜÝßíÜÝ"íÜÝßíÜÝßíÜÝßíÜÝßíÜÝßíÜÝÙíüÿÿïÜÝÙíÜÝßíÜÕÝåÜÝßíÜÝÝãÜÝßíÜÝßíÜ-ÝíÜÝßíÜÝßíÜÝßíÜÝßíÜÝßíÜÝÙíüÿÿïÜ™™éÜÿÿïÜ]UíÜÿÿïÜ33íÜÿÿïÜÿÿïÜ""âÜÿÿïÜÿÿïÜÿÿïÜÿÿïÜÿÿïÜ™™éìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌüÿÿïÜÝÙíÜÝÙíÜ-"íÜÝÙíÜ]UíÜÝÒíÜ]UíÜ-"íÜ]UíÜÝÒíÜ33ãÜÝÝíÜ]UíÜÝÙíüÿÿïÜÙíÜÙíÜÒÝâÜÙíÜÕÝåÜ-ÒíÜÕÝåÜÒÝâÜÕÝåÜ-ÒíÜÓÝíÜÝÝíÜÕÝåÜÙíüÿÿïÜÙÙíÜÙÙíÜÝÝâÜÙÙíÜÝ]íÜ"ÒíÜÝ]íÜÝÝâÜÝ]íÜ"ÒíÜ=3íÜÝÝíÜÝ]íÜÙÙíüÿÿïÜÝÙíÜÝÙíÜÝ"íÜÝÙíÜÝÝåÜÝßíÜÝÝåÜÝ"íÜÝÝåÜÝßíÜÝÝãÜÝÝíÜÝÝåÜÝÙíüÿÿïÜÝÙíÜÝÙíÜ-ÝíÜÝÙíÜÕÝåÜÝßíÜÕÝåÜ-ÝíÜÕÝåÜÝßíÜÝÝãÜÝÝíÜÕÝåÜÝÙíüÿÿïÜ™™éÜ™™éÜ""âÜ™™éÜ]UíÜÿÿïÜ]UíÜ""âÜ]UíÜÿÿïÜ33íÜÝÝíÜ]UíÜ™™éìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÜÝÙíÜÝÙíüÿÿïÜÝÙíÜÝÙíÜ-"íÜÝÙíÜÝÙíüÿÿïÜÝÙíÜÝÙíÜ-"íÜÝÝíÜÝÙíüÿÿïÜÙíÜÙíüÿÿïÜÙíÜÙíÜÒÝâÜÙíÜÙíüÿÿïÜÙíÜÙíÜÒÝâÜÝÝíÜÙíüÿÿïÜÙÙíÜÙÙíüÿÿïÜÙÙíÜÙÙíÜÝÝâÜÙÙíÜÙÙíüÿÿïÜÙÙíÜÙÙíÜÝÝâÜÝÝíÜÙÙíüÿÿïÜÝÙíÜÝÙíüÿÿïÜÝÙíÜÝÙíÜÝ"íÜÝÙíÜÝÙíüÿÿïÜÝÙíÜÝÙíÜÝ"íÜÝÝíÜÝÙíüÿÿïÜÝÙíÜÝÙíüÿÿïÜÝÙíÜÝÙíÜ-ÝíÜÝÙíÜÝÙíüÿÿïÜÝÙíÜÝÙíÜ-ÝíÜÝÝíÜÝÙíüÿÿïÜ™™éÜ™™éüÿÿïÜ™™éÜ™™éÜ""âÜ™™éÜ™™éüÿÿïÜ™™éÜ™™éÜ""âÜÝÝíÜ™™éüÿÿïìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÜÝÒíÜÝÙíüÿÿïÜÝÙíÜÝÒíÜÝÙíüÿÿïüÿÿïüÿÿïüÿÿïÜÝÙíÜ-"íÜ-"íÜÝÙíüÿÿïÜ-ÒíÜÙíüÿÿïÜÙíÜ-ÒíÜÙíüÿÿïüÿÿïüÿÿïüÿÿïÜÙíÜÒÝâÜÒÝâÜÙíüÿÿïÜ"ÒíÜÙÙíüÿÿïÜÙÙíÜ"ÒíÜÙÙíüÿÿïüÿÿïüÿÿïüÿÿïÜÙÙíÜÝÝâÜÝÝâÜÙÙíüÿÿïÜÝßíÜÝÙíüÿÿïÜÝÙíÜÝßíÜÝÙíüÿÿïüÿÿïüÿÿïüÿÿïÜÝÙíÜÝ"íÜÝ"íÜÝÙíüÿÿïÜÝßíÜÝÙíüÿÿïÜÝÙíÜÝßíÜÝÙíüÿÿïüÿÿïüÿÿïüÿÿïÜÝÙíÜ-ÝíÜ-ÝíÜÝÙíüÿÿïÜÿÿïÜ™™éüÿÿïÜ™™éÜÿÿïÜ™™éüÿÿïüÿÿïüÿÿïüÿÿïÜ™™éÜ""âÜ""âÜ™™éüÿÿïìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÜÝÙíÜÝÙíüÿÿïÜÝÙíÜÝÙíÜÝÙíüÿÿïüÿÿïüÿÿïüÿÿïÜÝÙíÜÝÒíÜÝÝíÜÝÙíüÿÿïÜÙíÜÙíüÿÿïÜÙíÜÙíÜÙíüÿÿïüÿÿïüÿÿïüÿÿïÜÙíÜ-ÒíÜÝÝíÜÙíüÿÿïÜÙÙíÜÙÙíüÿÿïÜÙÙíÜÙÙíÜÙÙíüÿÿïüÿÿïüÿÿïüÿÿïÜÙÙíÜ"ÒíÜÝÝíÜÙÙíüÿÿïÜÝÙíÜÝÙíüÿÿïÜÝÙíÜÝÙíÜÝÙíüÿÿïüÿÿïüÿÿïüÿÿïÜÝÙíÜÝßíÜÝÝíÜÝÙíüÿÿïÜÝÙíÜÝÙíüÿÿïÜÝÙíÜÝÙíÜÝÙíüÿÿïüÿÿïüÿÿïüÿÿïÜÝÙíÜÝßíÜÝÝíÜÝÙíüÿÿïÜ™™éÜ™™éüÿÿïÜ™™éÜ™™éÜ™™éüÿÿïüÿÿïüÿÿïüÿÿïÜ™™éÜÿÿïÜÝÝíÜ™™éüÿÿïìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÜÝÙíÜÝÙíÜÝÙíüÿÿïüÿÿïüÿÿïÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜ]UíÜÝèÜÝÝíÜÝÙíüÿÿïÜÙíÜÙíÜÙíüÿÿïüÿÿïüÿÿïÜÙíÜÙíÜÙíÜÙíÜÕÝåÜÝèÜÝÝíÜÙíüÿÿïÜÙÙíÜÙÙíÜÙÙíüÿÿïüÿÿïüÿÿïÜÙÙíÜÙÙíÜÙÙíÜÙÙíÜÝ]íÜˆèÜÝÝíÜÙÙíüÿÿïÜÝÙíÜÝÙíÜÝÙíüÿÿïüÿÿïüÿÿïÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÝÝåÜÝÝèÜÝÝíÜÝÙíüÿÿïÜÝÙíÜÝÙíÜÝÙíüÿÿïüÿÿïüÿÿïÜÝÙíÜÝÙíÜÝÙíÜÝÙíÜÕÝåÜÝÝèÜÝÝíÜÝÙíüÿÿïÜ™™éÜ™™éÜ™™éüÿÿïüÿÿïüÿÿïÜ™™éÜ™™éÜ™™éÜ™™éÜ]UíÜÝÝèÜÝÝíÜ™™éüÿÿïìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÜÝÙíÜÝÒíÜÝÙíüÿÿïüÿÿïüÿÿïÜÝÙíÜÝÒíÜ-"íÜ]UíÜÝÒíÜÝÒíÜÝÝíÜÝÙíÜÝÙíÜÙíÜ-ÒíÜÙíüÿÿïüÿÿïüÿÿïÜÙíÜ-ÒíÜÒÝâÜÕÝåÜ-ÒíÜ-ÒíÜÝÝíÜÙíÜÙíÜÙÙíÜ"ÒíÜÙÙíüÿÿïüÿÿïüÿÿïÜÙÙíÜ"ÒíÜÝÝâÜÝ]íÜ"ÒíÜ"ÒíÜÝÝíÜÙÙíÜÙÙíÜÝÙíÜÝßíÜÝÙíüÿÿïüÿÿïüÿÿïÜÝÙíÜÝßíÜÝ"íÜÝÝåÜÝßíÜÝßíÜÝÝíÜÝÙíÜÝÙíÜÝÙíÜÝßíÜÝÙíüÿÿïüÿÿïüÿÿïÜÝÙíÜÝßíÜ-ÝíÜÕÝåÜÝßíÜÝßíÜÝÝíÜÝÙíÜÝÙíÜ™™éÜÿÿïÜ™™éüÿÿïüÿÿïüÿÿïÜ™™éÜÿÿïÜ""âÜ]UíÜÿÿïÜÿÿïÜÝÝíÜ™™éÜ™™éìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÌÜÝÙíÜÝÙíÜÝÙíüÿÿïüÿÿïüÿÿïÜÝÙíÜÝÙíÜ-"íÜÝÒíÜÝÒíÜÝÝíÜÝÝíÜÝÝíÜÝÝíÜÙíÜÙíÜÙíüÿÿïüÿÿïüÿÿïÜÙíÜÙíÜÒÝâÜ-ÒíÜ-ÒíÜÝÝíÜÝÝíÜÝÝíÜÝÝíÜÙÙíÜÙÙíÜÙÙíüÿÿïüÿÿïüÿÿïÜÙÙíÜÙÙíÜÝÝâÜ"ÒíÜ"ÒíÜÝÝíÜÝÝíÜÝÝíÜÝÝíÜÝÙíÜÝÙíÜÝÙíüÿÿïüÿÿïüÿÿïÜÝÙíÜÝÙíÜÝ"íÜÝßíÜÝßíÜÝÝíÜÝÝíÜÝÝíÜÝÝíÜÝÙíÜÝÙíÜÝÙíüÿÿïüÿÿïüÿÿïÜÝÙíÜÝÙíÜ-ÝíÜÝßíÜÝßíÜÝÝíÜÝÝíÜÝÝíÜÝÝíÜ™™éÜ™™éÜ™™éüÿÿïüÿÿïüÿÿïÜ™™éÜ™™éÜ""âÜÿÿïÜÿÿïÜÝÝíÜÝÝíÜÝÝíÜÝÝíìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîìîîîç-- title: minesweeper -- author: Sava -- desc: Simple minesweeper demake -- version: 0.1 -- script: lua sizeX=15 sizeY=15 mineCount=40 t=0 marked={} opened={} tiles={} leftC=false rightC=false lost=false won=false function BOOT() --trace("start") start() end function TIC() mx, my, left, middle, right = mouse() if (left and not leftC) then openTile(math.floor(mx/8), math.floor(my/8)) if (lost and mx > 150 and mx < 207 and my > 50 and my < 60) then start() lost=false t=0 end leftC=true end if (not left and leftC) then leftC=false end if (right and not rightC) then mark(math.floor(mx/8), math.floor(my/8)) rightC=true end if (not right and rightC) then rightC=false end draw() print(math.floor(t/60), 150, 20) if (not lost) then t=t+1 end end function start() for i=1, sizeX do tiles[i]={} opened[i]={} marked[i]={} for j=1, sizeY do tiles[i][j]=0 opened[i][j]=false marked[i][j]=false end end for i=1, mineCount do local i1, j1 = math.random(1, sizeX), math.random(1, sizeY) --trace("generating mine "..i..", position: "..i1..", "..j1) while (tiles[i1][j1] == -1) do i1, j1 = math.random(1, sizeX), math.random(1, sizeY) --trace("invalid position, new position: "..i1..", "..j1) end tiles[i1][j1]=-1 end for i=1, sizeX do for j=1, sizeY do if (tiles[i][j] ~= -1) then tiles[i][j]=getNeighMines(i, j) end end end end function getNeighMines(pi, pj) mines=0 for i=-1, 1 do for j=-1, 1 do if (i+pi > 0 and i+pi <= sizeX and j+pj > 0 and j+pj <= sizeY) then if (tiles[i+pi][j+pj] == -1) then mines=mines+1 end end end end return mines end function draw() cls(0) for i=1, sizeX do for j=1, sizeY do if (opened[i][j]) then if (tiles[i][j] == -1) then spr(2, i*8, j*8) else spr(3+tiles[i][j], i*8, j*8) end else if (marked[i][j]) then spr(1, i*8, j*8) else spr(0, i*8, j*8) end end end end if (lost) then rect(150, 50, 57, 10, 5) rectb(150, 50, 57, 10, 6) print("try again?", 152, 52) end if (lost and mx > 150 and mx < 207 and my > 50 and my < 60) then rectb(150, 50, 57, 10, 4) end if (won) then print("you won!", 152, 32) end end function openTile(i, j) if (i > 0 and i <= sizeX and j > 0 and j <= sizeY and opened[i][j] == false and marked[i][j] == false) then opened[i][j]=true if (tiles[i][j] == -1) then lose() elseif (tiles[i][j] == 0) then openTile(i-1, j) openTile(i+1, j) openTile(i, j-1) openTile(i, j+1) openTile(i-1, j-1) openTile(i+1, j+1) openTile(i+1, j-1) openTile(i-1, j+1) end sfx(0) if (winCheck()) then win() end end end function mark(i, j) if (i > 0 and i <= sizeX and j > 0 and j <= sizeY) then marked[i][j] = not marked[i][j] sfx(1) end end function lose() lost=true for i=1, sizeX do for j=1, sizeY do opened[i][j]=true end end sfx(2, 36, -1, 1) end function winCheck() if (lost) then return false end for i=1, sizeX do for j=1, sizeY do if (not (opened[i][j] or tiles[i][j] == -1)) then return false end end end return true end function win() lost=true won=true for i=1, sizeX do for j=1, sizeY do if (tiles[i][j] == -1) then marked[i][j]=true end end end sfx(3, 36, 160, 1) end