123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869 |
- # popu
- if $ARGS[0] = 'start':
- cla
- *clr
- clr
- minut += 5
- gs 'stat'
- if night_mode = 1:
- fcolor = rgb(255, 255, 255)
- bcolor = rgb(0, 0, 0)
- lcolor = rgb(106, 90, 205)
- elseif night_mode = 2:
- fcolor = rgb(255, 255, 255)
- bcolor = rgb(20, 20, 20)
- lcolor = rgb(106, 90, 205)
- else
- fcolor = rgb(0, 0, 0)
- bcolor = rgb(255, 255, 255)
- lcolor = rgb(106, 90, 205)
- end
- '<center><img <<$set_imgh>> src="images/beast/zoo/parrot2.jpg"></center>'
- '<center><<$namepopu>> sitting in his cell.</center>'
- act 'Leave':dynamic $brodila
- act 'Release window':
- popugai = 0
- minut += 10
- dynamic $brodila
- end
- end
- if $ARGS[0] = 'start2':
- cla
- *clr
- clr
- minut += 5
- gs 'stat'
- if night_mode = 1:
- fcolor = rgb(255, 255, 255)
- bcolor = rgb(0, 0, 0)
- lcolor = rgb(106, 90, 205)
- elseif night_mode = 2:
- fcolor = rgb(255, 255, 255)
- bcolor = rgb(20, 20, 20)
- lcolor = rgb(106, 90, 205)
- else
- fcolor = rgb(0, 0, 0)
- bcolor = rgb(255, 255, 255)
- lcolor = rgb(106, 90, 205)
- end
- '<center><img <<$set_imgh>> src="images/beast/zoo/parrot2.jpg"></center>'
- '<center><<$namepopu2>> sitting in his cell.</center>'
- act 'Leave':gt $loc, $metka
- act 'Release window':
- if daystart - parbuydate > 30:
- 'You have become too attached to <<$namepopu2>>. You can''t bring yourself to release him'
- else
- 'You say goodbye to <<$namepopu2>> and release him'
- popugai2 = 0
- minut += 10
- end
- end
- end
- --- popu ---------------------------------
|