Code: Select all
define m = Character("mc")
define b = Character("enemy")
screen stat_test:
frame:
xalign 0.01 yalign 0.05
xminimum 220 xmaximum 220
vbox:
text "main character" size 2 xalign 0.5
null height 5
hbox:
bar:
maximum 130
value mc_hp1
range mc_max_hp1
left_gutter 0
right_gutter 0
thumb None
thumb_shadow None
null width 5
text "[mc_hp1] / [mc_max_hp1]" size 16
frame:
xalign 0.99 yalign 0.05
xminimum 220 xmaximum 220
vbox:
text "enemy" size 2 xalign 0.5
null height 5
hbox:
bar:
maximum 130
value em_hp1
range en_max_hp1
left_gutter 0
right_gutter 0
thumb None
thumb_shadow None
null width 5
text "[em_hp1] / [en_max_hp1]" size 16
label start:
$ mc_hp1 = 100
$ mc_max_hp1 = 100
$ em_hp1 = 50
$ en_max_hp1 = 50
$ en_dpt1 = 10
$ mc_dpt1 = 8
$ mc_def1 = 2
$ defend1 = False
show screen stat_test
while (em_hp1 > 0) and (mc_hp1 > 0):
menu:
"Attack!":
m "i attack"
$ em_hp1 -= mc_dpt1
"defend":
m "i defend"
$ defend1 = True
b "i will slash your neck right off your body!"
if defend1 == True:
$ mc_hp1 -= en_dpt1 - mc_def1
else:
$ mc_hp1 -= en_dpt1
hide screen stat_test
if em_hp1 <= 0:
if mc_hp1 <= 0:
"Everybody loses!"
else:
m "I win!"
else:
b "youre too weak to beat me!"
return