glife/locations/test

# test
set rost = 170
set fat = 110
!!stats
set rikudo = 9000
set stren = 100
set speed = 100
set react = 100
set agil = 100
set vital = 100
set intel = 100
set will = 100
set boxing = 100
set magik = 10
set health = vital * 10 + stren * 5
set willpower = intel * 5 + will * 5
set manna = intel * magik + magik * 100 + vital * 10 + rikudo
!!!!!!!!!!!!!!!!!!!!!!
set vmeat = (stren + vital) / 8
!!!set vmeat = vmeat / 8
set vfat = fat / 10
set Kves = vmeat + vfat
set krost = rost - 130
set ves = Kves + krost - agil / 10
set talia = ves - agil / 10
set grudi = talia + 10 + vfat + silicone
set bedra = talia + 15 + vmeat / 2 + vfat
set titK = grudi - talia
if titK <= 10:set tits = 0
if titK > 10 and titK <= 15:set tits = 1
if titK > 15 and titK <= 20:set tits = 2
if titK > 20 and titK <= 25:set tits = 3
if titK > 25 and titK <= 30:set tits = 4
if titK > 30 and titK <= 35:set tits = 5
if titK > 35 and titK <= 40:set tits = 6
if titK > 40 and titK <= 45:set tits = 7
if titK > 45 and titK <= 50:set tits = 8
if titK > 50 and titK <= 55:set tits = 9
if titK > 55:set tits = 10
!!!!!!!!!!!!!!!!!!!!!!!!!!!!
set spelltuman = 1
set spellklon = 1
set spellstun = 1
set spellweap = 1
set spellwind = 1
set spellklon2 = 1
set spellenergo = 1
set spellinit = 1
set spellhel = 1
set spellreset = 1
set spellavtoklon = 1
set spellhand = 1
set spellfire1 = 1
set spellfire2 = 1
set spellfire3 = 1
set spellfire4 = 1
set spellfire5 = 1
set spellele1 = 1
set spellele2 = 1
set spellele3 = 1
set spellele4 = 1
set spellele5 = 1
set spellert1 = 1
set spellert2 = 1
set spellert3 = 1
set spellert4 = 1
set spellert5 = 1
set spellwind1 = 1
set spellwind2 = 1
set spellwind3 = 1
set spellwind4 = 1
set spellwind5 = 1
set spellwater1 = 1
set spellwater2 = 1
set spellwater3 = 1
set spellwater4 = 1
set spellwater5 = 1
set spellunmat = 1
set spellbefshild = 1
'<<rost>>cm <<ves>>kg <<grudi>>-<<talia>>-<<bedra>> the size of the breast <<tits>>'
'All articles on the 100, all spells, magical about the 10 forces Rikudo 9000'
'Do you have any second shadow sedtse that may once to die for you.'
set heart = 1
set mannaReset = 10000
act '(Toby mag12)':
	cla
	set $nameV = 'Toby'
	!!stats
	set strenV = 300
	set speedV = 100
	set agilV = 100
	set reactV = 100
	set vitalV = 100
	set intelV = 100
	set willV = 200
	!!skills
	set magikV = 12
	set boxingV = 100
	set shootV = 100
	!!parameters
	set healthV = vitalV * 10 + strenV * 5
	set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	set willpowerV = willV * 10
	set BonusAtakV = 0
	set BonusDefV = 0
	!!Programme of Action
	set program = 6
	!!!!!!!!!!!!!!!!!!!!
	set test = 1
	set tobiPic = 1
	!!!!!!!!!!!!!!!!!!!!
	set unmaterialV = 40
	set izanagiOnce = 0
	set tobizanagi = 0
	set izanagiV = 1
	set GedoMazo = 0
	set TobiStena = 0

	if spellavtoklon = 1:set klon = 3
	if spellbefshild = 1:set defence = 500

	gt 'fight', 'start'
end

act '(Kisame mag10)':
	cla
	set horny += 10
	set $nameV = 'Kisame'
	!!stats
	set strenV = 300
	set speedV = 100
	set agilV = 100
	set reactV = 100
	set vitalV = 200
	set intelV = 100
	set willV = 50
	!!skills
	set magikV = 10
	set boxingV = 100
	set shootV = 100
	!!parameters
	set healthV = vitalV * 10 + strenV * 5
	set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	set willpowerV = willV * 10
	set BonusAtakV = 0
	set BonusDefV = 0
	!!Programme of Action
	set program = 5
	!!!!!!!!!!!!!!!!!!!!
	set test = 1
	set kisamePic = 1
	!!!!!!!!!!!!!!!!!!!!
	set KisaFight = 1
	set klonV = 5
	!!set defenceV = 10000

	if spellavtoklon = 1:set klon = 3
	if spellbefshild = 1:set defence = 500

	gt 'fight', 'start'
end

act '(Sasori mag10)':
	cla
	set $nameV = 'Sasori doll'
	!!stats
	set strenV = 100
	set speedV = 50
	set agilV = 50
	set reactV = 50
	set vitalV = 100
	set intelV = 100
	set willV = 100
	!!skills
	set magikV = 10
	set boxingV = 50
	set shootV = 100
	!!parameters
	set healthV = vitalV * 10 + strenV * 5
	set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	set willpowerV = willV * 10
	set BonusAtakV = 0
	set BonusDefV = 0
	!!Programme of Action
	set program = 9
	!!!!!!!!!!!!!!!!!!!!
	set test = 1
	set sasoriPic = 1
	!!!!!!!!!!!!!!!!!!!!
	set klonV = 3
	set SasoriBody = 6
	!!set defenceV = 10000

	if spellavtoklon = 1:set klon = 3
	if spellbefshild = 1:set defence = 500

	gt 'fight', 'start'
end

act '(Conan mag10)':
	cla
	set $nameV = 'Conan'
	!!stats
	set strenV = 60
	set speedV = 105
	set agilV = 100
	set reactV = 100
	set vitalV = 60
	set intelV = 100
	set willV = 100
	!!skills
	set magikV = 10
	set boxingV = 100
	set shootV = 100
	!!parameters
	set healthV = vitalV * 10 + strenV * 5
	set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	set willpowerV = willV * 10
	set BonusAtakV = 0
	set BonusDefV = 0
	!!Programme of Action
	set program = 10
	!!!!!!!!!!!!!!!!!!!!
	set test = 1
	set konanPic = 1
	!!!!!!!!!!!!!!!!!!!!
	!!set klonV = 3
	!!set defenceV = 10000
	set unmaterialV = 20

	if spellavtoklon = 1:set klon = 3
	if spellbefshild = 1:set defence = 500

	gt 'fight', 'start'
end

act '(Hidan mag9)':
	cla
	set $nameV = 'Hidan'
	!!stats
	set strenV = 500
	set speedV = 100
	set agilV = 80
	set reactV = 100
	set vitalV = 600
	set intelV = 100
	set willV = 100
	!!skills
	set magikV = 9
	set boxingV = 110
	set shootV = 100
	!!parameters
	set healthV = vitalV * 10 + strenV * 5
	set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	set willpowerV = willV * 10
	set BonusAtakV = 0
	set BonusDefV = 0
	!!Programme of Action
	set program = 11
	!!!!!!!!!!!!!!!!!!!!
	set test = 1
	set hidanPic = 1
	!!!!!!!!!!!!!!!!!!!!
	!!set klonV = 3
	!!set defenceV = 10000
	set barierV = 5500
	set hidanAtk = 1
	!!set unmaterialV = 20

	if spellavtoklon = 1:set klon = 3
	if spellbefshild = 1:set defence = 500

	gt 'fight', 'start'
end

act '(Juugo, mutant power 600)':
	cla
	!!set judosparday = day
	set $nameV = 'Juugo'
	!!stats
	set strenV = 600
	set speedV = 60
	set agilV = 60
	set reactV = 50
	set vitalV = 200
	set intelV = 50
	set willV = 50
	!!skills
	set magikV = 1
	set boxingV = 100
	set shootV = 100
	!!parameters
	set healthV = vitalV * 10 + strenV * 5
	set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	set willpowerV = willV * 10
	set BonusAtakV = 0
	set BonusDefV = 0
	!!Programme of Action
	set program = 0
	!!!!!!!!!!!!!!!!!!!!
	set test = 1
	!!!!!!!!!!!!!!!!!!!!
	set jugoFight = 2

	if spellavtoklon = 1:set klon = 3
	if spellbefshild = 1:set defence = 500

	gt 'fight', 'start'
end

act '(Karin mag6)':
	cla
	set $nameV = 'Karin'
	!!stats
	set strenV = 60
	set speedV = 90
	set agilV = 90
	set reactV = 60
	set vitalV = 100
	set intelV = 100
	set willV = 100
	!!skills
	set magikV = 6
	set boxingV = 100
	set shootV = 100
	!!parameters
	set healthV = vitalV * 10 + strenV * 5
	set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	set willpowerV = willV * 10
	set BonusAtakV = 0
	set BonusDefV = 0
	!!Programme of Action
	set program = 4
	!!!!!!!!!!!!!!!!!!!!
	set test = 1
	!!!!!!!!!!!!!!!!!!!!
	set karinFight = 1
	set klonV = 3
	set tumanV = 10

	if spellavtoklon = 1:set klon = 3
	if spellbefshild = 1:set defence = 500

	gt 'fight', 'start'
end

act '(Throwing knives mag1)':
	cla
	set $nameV = 'Knife thrower'
	!!stats
	set strenV = 40
	set speedV = 40
	set agilV = 40
	set reactV = 40
	set vitalV = 60
	set intelV = 60
	set willV = 60
	!!skills
	set magikV = 1
	set boxingV = 60
	set shootV = 60
	!!parameters
	set healthV = vitalV * 10 + strenV * 5
	set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	set willpowerV = willV * 10
	set BonusAtakV = 0
	set BonusDefV = 0
	!!Programme of Action
	set program = 1
	!!!!!!!!!!!!!!!!!!!!
	set test = 1

	!!!!!!!!!!!!!!!!!!!!
	if spellavtoklon = 1:set klon = 3
	if spellbefshild = 1:set defence = 500

	gt 'fight', 'start'
end

act '(Misty thrower, mag2)':
	cla
	set $nameV = 'Misty thrower'
	!!stats
	set strenV = 50
	set speedV = 50
	set agilV = 50
	set reactV = 50
	set vitalV = 60
	set intelV = 60
	set willV = 60
	!!skills
	set magikV = 2
	set boxingV = 60
	set shootV = 60
	!!parameters
	set healthV = vitalV * 10 + strenV * 5
	set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	set willpowerV = willV * 10
	set BonusAtakV = 0
	set BonusDefV = 0
	!!Programme of Action
	set program = 2
	!!!!!!!!!!!!!!!!!!!!
	set test = 1

	!!!!!!!!!!!!!!!!!!!!
	if spellavtoklon = 1:set klon = 3
	if spellbefshild = 1:set defence = 500

	gt 'fight', 'start'
end

act '(Misty lord clones mag3)':
	cla
	set $nameV = 'Misty lord clones'
	!!stats
	set strenV = 60
	set speedV = 60
	set agilV = 60
	set reactV = 60
	set vitalV = 70
	set intelV = 70
	set willV = 70
	!!skills
	set magikV = 3
	set boxingV = 70
	set shootV = 70
	!!parameters
	set healthV = vitalV * 10 + strenV * 5
	set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	set willpowerV = willV * 10
	set BonusAtakV = 0
	set BonusDefV = 0
	!!Programme of Action
	set program = 3
	!!!!!!!!!!!!!!!!!!!!
	set test = 1

	!!!!!!!!!!!!!!!!!!!!
	if spellavtoklon = 1:set klon = 3
	if spellbefshild = 1:set defence = 500

	gt 'fight', 'start'
end

act '(Gouge magician mag4)':
	cla
	set $nameV = 'Gouge magician'
	!!stats
	set strenV = 70
	set speedV = 70
	set agilV = 70
	set reactV = 70
	set vitalV = 80
	set intelV = 80
	set willV = 80
	!!skills
	set magikV = 4
	set boxingV = 80
	set shootV = 80
	!!parameters
	set healthV = vitalV * 10 + strenV * 5
	set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	set willpowerV = willV * 10
	set BonusAtakV = 0
	set BonusDefV = 0
	!!Programme of Action
	set program = 4
	!!!!!!!!!!!!!!!!!!!!
	set test = 1

	!!!!!!!!!!!!!!!!!!!!
	if spellavtoklon = 1:set klon = 3
	if spellbefshild = 1:set defence = 500

	gt 'fight', 'start'
end

act '(Commando)':
	cla
	set $nameV = 'Commando'
	!!stats
	set strenV = 200
	set speedV = 100
	set agilV = 100
	set reactV = 100
	set vitalV = 200
	set intelV = 10
	set willV = 10
	!!skills
	set magikV = 0
	set boxingV = 100
	set shootV = 80
	!!parameters
	set healthV = vitalV * 10 + strenV * 5
	set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
	set willpowerV = willV * 10
	set BonusAtakV = 0
	set BonusDefV = 0
	!!Programme of Action
	set program = 8
	set dospehV = 800
	set dospehEnV = 10
	!!!!!!!!!!!!!!!!!!!!
	set test = 1

	!!!!!!!!!!!!!!!!!!!!
	if spellavtoklon = 1:set klon = 3
	if spellbefshild = 1:set defence = 500

	gt 'fight', 'start'
end

--- test ---------------------------------