Forum.iFiction.Ru

:: StoryTitle

Прилючения барда.

:: Смена погоды



:: Start

# переменные окружения

<<set $time = 12>>

<<set $плюсЧас = 0>>

<<set $day = 1>>

<<set $weather = 'чистое небо'>>

<<set $location = 'Таверна'>>

<<set $action= 0>>

<<set $streetTemp = -1>>

<<br>><<br>>

===[[Игра|Игра]]===

:: Таверна

Таверна была просторна и уютна.

За окном <<print $weather>>.

:: Действия

<<if $action eq 1>>

    <<set $плюсЧас = 1>>

    Прошёл один час.

<<elseif $action eq 2>>

    <<set $плюсЧас = 0>>

    Вы ничего не нашли.

<<elseif $action eq 3>>

    <<set $плюсЧас = 1>>

    Игра на лютне удалась.

<<endif>>

<<if $action neq 0>>

<<display 'Смена времени'>>

----

<<set $action = 0>>

<<endif>>

:: Смена времени

<<loop $плюсЧас>>

    <<set $time++>>

    <<if $time >= 23>>

        <<set $time = 0>>

        <<set $day++>>

        <<display 'Смена погоды'>>

    <<endif>>

<<endloop>>

<<set $плюсЧас = 0>>

:: Игра

<<clrscr>>

<<display 'Герой'>>

<<display 'Действия'>>

<<display '$location'>>

:: Герой

===[[Ждать|Игра {$action = 1}]] | [[Искать|Игра {$action = 2}]] | [[Играть на лютне|Игра {$action = 3}]]===

===Время: <<print $time>> | День: <<print $day>>===

----