New code:
1. Display available Combat magic school list on menu-magic
2. Android mode
3. vampire sunburn
I. New code:
1. Display combat magic in "magic"
file : [stat] location: [$menu_magik]
put in end , before unselect
Код:
pl''
pl'<center><B>бой</B></center>'
if nekrdag>=100:
pl 'ШКОЛА СМЕРТИ'
end
if spellSound>=100:
pl 'ШКОЛА ЗВУКА'
end
if spellElf>=100:
pl 'ШКОЛА ПРИРОДЫ'
end
if sboMagik=1:
pl 'ШКОЛА СОВМЕЩЕНИЯ СТИХИЙ)'
end
if spPsistrk>=100:
pl 'ШКОЛА РАЗУМА'
end
if GraveDog>=100:
pl 'ШКОЛА МОГИЛЬНОЙ СОБАКИ'
end
if vampireMorf>=1:
pl 'ВАМПИРСКИЕ СИЛЫ'
end
if DemonMorf>0:
pl 'ДЕМОНИЧЕСКИЕ СИЛЫ'
end
if spMarpeozaBuff>0 and vagina>0 and penis>0:
pl 'ВОЗЗВАТЬ К СИЛЕ МАРПЕОЗЫ'
end
if spReinkornMal>=100:
pl 'ШКОЛА МАЛЬГАНА'
end
if spShok>=100:
pl 'ШКОЛА ЭЛЕКТРИЧЕСТВА'
end
if spWaterStr>=100:
pl 'ШКОЛА ВОДЫ'
end
if spSStorm>=100:
pl 'ШКОЛА ЗЕМЛИ'
end
if spWindUd>=100:
pl 'ШКОЛА ВОЗДУХА'
end
if spZerkalo>=100:
pl 'БАЗОВАЯ ШКОЛА'
end
if tai>=100:
pl 'ШКОЛА МИМИКО'
end
if serafVoronPower>0:
pl 'Создать вороньего клона Сераф'
end
if vapulabain>0:
pl 'Огненный шестиконечный хлыст Вапулы'
end
if spTEHNO>0:
pl 'ТЕХНОЛОГИИ'
end
if spSwordDancer >= 100:
pl 'Танец мечей (50 воли)'
end
if cursed=1:
pl 'Печать Оротимару'
end
if JuravelStile>=100:
pl 'Применить стиль журавля (10 манны)'
end
if ironskinStile>=100:
pl 'Применить стиль железной рубашки (10 манны)'
end
if boxingStile >= 100:
pl 'Применить стиль бокса (10 воли)'
end
if tigerStile >= 100:
pl 'Применить стиль тигра'
end
if tigerClaw >= 100:
pl '- Атаковать приемом Коготь тигра парализующим противника'
end
if tigerFury:
pl '- Атаковать приемом Ярость тигра наносящим множественные удары'
end
if tigerWill >= 100:
pl '- Воля тигра регенирирует манну и здоровье(50 воли)'
end
2. Android mode
(1) Disable statusbar auto renew, prevent icon flashing
(2) short status bar in main screen
(0) optional, this will prevent status from cleaned
File: all
Код:
clr --> !clr
*!clr --> *clr
except: [stat][$menu_pa][$menu_pb][$menu_pc][$menu_magik]
File [stat]
(1) location [slotSistem], [stat]
Код:
!заменить
pl'
pl '
!replace with
$stat_msg +='<BR>
(2) [stat]
Код:
!Add in file head:
$stat_msg=''
!add at file end
if Enable_android=1: $stat_msg='Режим Android, <a href="exec:set Enable_android_refresh=1&gs''stat''">обновить</a><<$stat_msg>>'
if Enable_android!1 or Enable_android_refresh=1:
Enable_android_refresh=0
clr
pl '<<$stat_msg>>'
else
$stat_android = '<<hour>>:<<$nilmin>><<minut>> '
if world=0:$stat_android +='$ <<money>>'
if world=1 and SCslave=0:$stat_android +='$ <<gem>>'
$stat_android += ' Health <<$healthvis>>'
if DemonMorf>=1:$stat_android +=' скверны <<skverna>>'
$stat_android += ', <a href="exec:set Enable_android_refresh=1 & gs''stat''">статус</a>'
'<<$stat_android>>'
end
(3) Add to [$menu_cheat],[cheatrl],[cheatdm], or [stat] (replace pl as above)
Код:
if Enable_Android = 1:
pl'<a href="exec:Enable_Android = 0 & gs''$menu_cheat''">Режим Android: O</a>'
else
pl'<a href="exec:Enable_Android = 1 & gs''$menu_cheat''">Режим Android: X</a>'
end
(4) location [$menu_pe]
Код:
clr
gs'stat'
!replace with
!clr
Enable_android_refresh=1
gs'stat'
FILE [Albedo]
location [LOC], line 25~36, the len($a_dm1)=2 if
Код:
!for Android mode. Android player does not support \ , so need a rewrite by illume
if len($a_dm1)=2:
if $a_loc='':
$link='<a href="exec:showhead=0&dynamic {<<$a_exe>>} & gs '+"'<<$onnewloc>>'"+'"><<$a_dsc>></a>'
else
$link='<a href="exec:showhead=0&dynamic {<<$a_exe>>} & gs '+"'<<$a_loc>>' + gs '<<$onnewloc>>'"+'"><<$a_dsc>></a>'
end
else
$link='<a href="exec:showhead=1&dynamic {<<$a_exe>>} & gt '+"'<<$a_loc>>'"+'"><<$a_dsc>></a>'
end
3. new vampire status
Active: 18~6
Day: Sun burns: health - 60~120
Night: Fast recover health/manna/wipo
Код:
(1) File [stat] location [stat]
line 42~51
if vampireMorf>=1:
if GraveDog>0:GraveDog=0&GraveDogPowerM=0&GraveDogPower=0
if INFIGHT=0:health=vital*10&wipo=will*10&manna=intel*10+intel*magika
if vampireMorf<vampireStat:vampireStat+=1&stren+=10&speed+=10&vital+=10&agil+=10
horny=0
sweat=-5
golod=15
son=20
end
!replace with
!Vampire redone, by illume
if hour>6 and hour<18 and NowSleep=0:
!day
if vampirehurttime!hour*100+nilmin*10+minut and $loc ! 'vampGrave'and $loc ! 'bed2' and $loc ! 'bed' and $loc ! 'budilnik':
!except location [vampGrave], sleep: [bed],[bed2], alarmclock:[budilnik]
'<B><font color=red>КАКОЙ ЯРКИЙ СВЕТ!!!replace withы вспыхнули и начали гореть. Вскоре для вас было все кончено.</font></B>'
vampirehurttime=hour*100+nilmin*10+minut
!make sure sunburn triggered once per minute by illume
health -= rand(60,120)*vampireMorf
end
else
if INFIGHT=0:
if NowSleep=0:
if hour=6:
'<B><font color=red>РАССВЕТ НАДО ПРЯТАТЬСЯ!</font></B>'
elseif (hour>=18 or hour<=5) and vampiremsgday!day:
'<B><font color=purple>Ночь, время для прогулки.</font></B>'
vampiremsgday=day
!hint active time once a day by illume
end
end
health+=vampireMorf*vital
wipo+=vampireMorf*will
manna+=vampireMorf*(intel*10+intel*magika)/10
!fast recover in night, according to vampireMorf (max 1 in current game)
end
end
location [time]
! Already set in [stat], removed
! remove near location end.
if vampireMorf>=1:
if hour=6:
!рассвет
pl'<B><font color=red>РАССВЕТ НАДО ПРЯТАТЬСЯ!</font></B>'
elseif hour>6 and hour<21:
!день
cls
exit
else
!ночь
end
end
(2) File [world]
location [vampGrave]
if hour>=21 or hour <6:
if hour>=18 or hour <=6:
4. sleep without loop
!replace the whole location.
(1) pre-calculate sleep time, add it once
(2) lazy-on-bed til alarm time
(3) move events to head, prevent insleep=1 issue.
Код:
FILE[mebel]
loation [bed]
'Вы лежите на кровати. Будильник заведен на <<timer>> часов, <<timerM>> минут.'
if mop ! 0:'<B><font color=red>Вам нужно смыть косметику прежде чем лечь спать.</font></B>'
if son >= 10:
'Спать почему-то не хочется.'
'Вы лежите на кровати. Будильник заведен на <<timer>> часов, <<timerM>> минут.'
!link to switch between alarms
if budilnikOn = 1:
'Будильник <a href="exec:budilnikOn = 0 & gt''bed''">O</a>'
else
'Будильник <a href="exec:budilnikOn = 1 & gs''bed''">X</a>'
end
if mop ! 0:'<B><font color=red>Вам нужно смыть косметику прежде чем лечь спать.</font></B>'
if son >= 10:
'Спать почему-то не хочется.'
act 'старайтесь спать до будильника':
if disable_autosave = 0:SAVEGAME 'autosave.sav' & !add autosave by illume
alarm_dosip=1
gt'bed2'
end
location[bed2]:
replace all
Код:
!gs'clonil'
!gs'WeapNill'
!gs'ShildNill'
!gs'clostar'
vakalol=RAND(0,1)
vakalol=0
if vakalol=0 and vakalesorubka=1 and pol>0 and lesopwork>0: gt'vakas1' & !fix if, and events before NowSleep=1 by illume
if cursedExp>=100 and OrotimaruFinalOnce=0:gt'sonorotimaru' & !events before NowSleep=1 by illume
if Haritonovv=14:gt'sondm' & !events before NowSleep=1 by illume
NowSleep=1
if vampireMorf>=1:vampirePower=vampireMorf*10
if vapulabain=1:vapulabainpunch=0
if pol > 0 and world=0:'<center><img src="pic\pics\son.jpg" ></center>'
if analplugIN = 1:set analplugIN = 0&'Перед сном вы вынули анальную пробку.'
if mop!0:set mop = -1&'Косметика размазалась по лицу, вы подумали, что вредно для внешности спать с косметикой, кожа стареет быстрее от этого.'
set health = health + 5
manna=manna-5
set sweat=sweat+1
!set hapri = 0
set slep = RAND (0,1)
if slep = 0:set $slep = 'ничего не снится'
if slep = 1:set $slep = 'ничего не снится'
'Вы спите и вам <<$slep>>.'
!:loopson
!start non-loop sleep
alarm_now=0
if budilnikOn = 1 or alarm_dosip!0:
alarm_time=timer*60+timerM
alarm_now=hour*60+minut
if alarm_now>=alarm_time: alarm_time += 1440
alarm_now=alarm_time-alarm_now
end
alarm_sleep=(30-son)*20+rand(0,15)
!alarm_now=time before alarm ring, alarm_time =alarm set, alarm_sleep =time for son=30 by illume
clr
if alarm_dosip!0:
alarm_dosip=0
minut+=alarm_now
son+=alarm_time/20
set manna = manna + 10
farmstam+=stren/10
'Вы ленивы в постели до будильника'
elseif srok > 0 or scslave > 0 or (budilnikOn = 1 and alarm_sleep>alarm_now):
minut+=alarm_now
son+=alarm_now/20
if alarm_sleep>0:farmstam+=stren/10*alarm_now/alarm_sleep
set manna = manna - 10
if srok = 0:'Звенит будильник'
if srok > 0:'Звучит команда подъем'
else
minut+=alarm_sleep
son+=alarm_sleep/20
set manna = manna + 10
farmstam=stren/10
'Вы выспались'
end
if farmstam>stren/10:farmstam=stren/10
!for wakeup
gs'stat'
NowSleep=0
if son>30:son=30
gs'stat'
if sizo=0:
if hour<timer:
act 'Ленивый на кровати до будильника':
alarm_dosip=1
gt'bed2'
end
end
act 'Встать с кровати и привести себя в порядок 15мин':
minut=minut+15
GOTO $locBed, $metkaBed
end
end
act 'Встать с кровати':
NowSleep=0
gs'clonil'
gs'WeapNill'
gs'ShildNill'
gs'clostar'
set hapri = 0
if world=0 and sizo>0:GOTO $locBed, $metkaBed
if world=0 and sizo=0:gt'loker'
if world=1:gt'lokerW'
end
5. nekr
variable:nekrvobuch1, nekrvobuch duplicate?
file [world]
location [nekr2]
Код:
if nekrpiz=100 and golodduh<100:
act 'Изучать заклинание Голодный Дух':
cla
*clr
minut = minut + 60
golodduh=golodduh+RAND(10,25)
nekrvobuch=day
if golodduh>100:golodduh=100
'<center><img <<$Enable_imgheight>> src="pic/EvedonOd/robaf.jpg" ></center>'
!'Mimiko stood up and took you into one of the rooms, equipped with a gym.'
!'Mimiko showed you how to concentrate, what would successfully recover their vitality.'
'Вы изучили заклинание на <<nekrpiz>>%'
act 'Go':gt'nekr1'
end
end
if golodduh=100 and prizdrag<100:
act 'Изучать заклинание Призрачный Дракон':
cla
*clr
minut = minut + 60
prizdrag=prizdrag+RAND(10,25)
nekrvobuch=day
if prizdrag>100:prizdrag=100
'<center><img <<$Enable_imgheight>> src="pic/EvedonOd/robaf.jpg" ></center>'
!'Mimiko stood up and took you into one of the rooms, equipped with a gym.'
!'Mimiko showed you how to concentrate, what would successfully recover their vitality.'
'Вы изучили заклинание на <<nekrpiz>>%'
act 'Go':gt'nekr1'
end
end
II. pic name:
1.[onsenWork]
Код:
'<center><img src="pic/Evedon/onsenund.jpg"></center>'
!replace with
'<center><img src="pic/Evedon/onsenund.png"></center>'&!fix png by illume
jpg --> png
2. [SLAVECELL]
Код:
if SCrest=1:'<center><img src="pic/EvedonSC/aarst.jpg" ></center>'
!replace with
if SCrest=1:'<center><img src="pic/EvedonSC/aarst.jpeg" ></center>'
jpg --> jpeg
3. [lisetbla7]
Код:
'<center><img src="pic/vaka/futa5.jpg"></center>'
!replace with
'<center><img src="pic/vaka/futa5.gif"></center>'
jpg-->gif
4. [vakas1]
Код:
'<center><img <<$Enable_imgheight>> src="pic/vaka/rest1.jpg"></center>'
!replace with
'<center><img <<$Enable_imgheight>> src="pic/vaka/rest1.gif"></center>'
III. typo:
File [world]
1. [upravaW]
Код:
(1)
if hour>=6 and hour<=23:
*clr
!replace with
if hour>=6 and hour<=23:
!*clr
2. wrong wife face
[frendChome]
Код:
$faceM=$faceC
!replace with
$femfaceM=$faceC
3. [marryWorld]
Код:
'<<$frencloM>> <<$fempropM>> <<$faceM>>'
!replace with
'<<$frencloM>> <<$fempropM>> <<$femfaceM>>'&!variablename fix, faceM
4. [tasportW]
Код:
act 'Идти в душ вместе с Инури':gt'tashowerW'
!replace with
act 'Идти в душ вместе с Инури':gt'showerevent','inuri' & !fix by texts by illume
5. [SLAVECELL]
Код:
(1) clean after escape
gt 'desertW1'
!replace with
stepSlave=0&pobeg=0 & gt 'desertW1' & !clear slave progress after escape by illume
6. [slavestart]
Код:
!add
vapulaFight=0 & !fix slave+escape=win by illume
7. [farmSLave3], missing if check/act
Код:
(1) missing if edaw>0:
(2) sex action for pol=0
act 'Расспросить рабыню':gt'farmSLave4'
act 'Уйти':gt'farmW'
!replace with
act 'Расспросить рабыню':gt'farmSLave4'
act 'А отблагодарить?':gt'lisetbla1'
act 'Уйти':gt'farmW'
8. [nekr1], logic error
Код:
line 3
else
!replace with
!else
replace
vakanekrslavekill+=1
!replace with
!vakanekrslavekill+=1
or put it inside act
9. [sudw]
Код:
'Худой высокий мужчина с холодным взглядом сидит за столом и заполняет документы.'
*clr
'<center><img src="pic/EvedonNarod/msr.jpg"></center>'
!replace with
'<center><img src="pic/EvedonNarod/msr.jpg"></center>'
'Худой высокий мужчина с холодным взглядом сидит за столом и заполняет документы.'
!*clr
10. sawmill related
(1) смена пола повторно обращаться не будет срабатывать
location [lesopilka]
Код:
if lesopwork=1 and hour>7 and hour<20 and farmstam>0:
!replace with
if lesopwork>0 and pol>0 and lesopknowf=0:
!sex change event trigger by illume
'<font color=red>Блин, я женщина. надо сначала поговорить с боссом.</font>'
!'<font color=red>Damn, I become female now. I should talk to boss first.</font>'
lesopwork=0
end
if lesopwork=1 and hour>7 and hour<20 and farmstam>0:
(2) wrong value
location [lesopilkaboss]
Код:
if pol>0 and vak=2:
!replace with
if pol>0 and vak>0:
! vak max=1, after work 11 times
if pol>0 and vak=0:
!replace with
if pol>0 and vak=0:
lesopknowf=1 & !know female worker by illume
(3) There is arm wrestling in the real world
[armwrestling]
Would arm wrestling better than arena victories?
11.
location[gorodovoi]
Код:
if repVak=1 and pol>0 and farmland=1:
!replace with
if Vak>0 and pol>0 and farmland=1:
! Vak = 1 after 11 work in sawmill
12. [vakaedrin1]
Код:
duplicate act 'Уйти', and the first have no act to exit.
remove the first one.
act 'Подписать':
13. [GimNude]
missing end
IV. Bugs in storyline:
1. Main Story
Код:
(1) helqw=3
(missing if helqw=3:helqw=4)
if helqw=4 in [osobnakAltoW]
(2) missing variable: domhqw6
1 = знать последствия секса с Ишварой приносит= полностью исцелить
2. File [Albedo]
location [street]
Код:
(1)
!replace with
if brak > 2 or NoHaritonov>0:
if brak > 2:
!replace with
!return from another world
if brak > 2 or NoHaritonov>0 or HaritonovDMQW>0:
(2) the events of the Nymph to ignore HaritonovDMQW
location [wasteland]
Код:
DELOBJ 'Stone c strength of the forest nymphs'
Should move 1-line down, out of the if check.
(please search 【delobj '】, I didn't got the russian string)
3. File [itk]
location [lasaret]
Код:
act 'Go':gt 'down'
(please search 【gt 'down'】, I didn't got the russian string)
!replace with
act 'Exit TIC':ItkQW=1> 'NaSvobodu'
location [sud]
Код:
cleaned before use
(cock used on Inna show)
if otkat > 0 or advokat = 0:
if otkat > 0 or advokat = 0:
cock=0
hell=0
gonna_be=0
man=0