Метки
Автор: cba0740 - Ответы: 4 - Просмотры: 1669
Albedo, new code and bug fix, based on vaka 0.1.0A
Albedo, new code and bug fix, based on vaka 0.1.0A

(Moved from Albedo vaka post, https://albedo.pw/thread-1371.html)

Hello, I am translate system interface into Chinese

based from the (machine translated) English version of Albedo mod 1.7 / Vaka 0.1.0A

posted here:
(1) TFgames (English)
Vaka 0.1.0A http://tfgamessite.com/phpbb3/viewtopic.php?f=15&t=7320&start=1990#p305584

http://tfgamessite.com/phpbb3/viewtopic.php?f=15&t=7320
B. Finished/Not In Development Anymore (unless a mod comes Along)
2. Albedo

(2) SSTM (Chinese)
My interface Chinese translation https://sstmlt.net/thread-154521-1-1.html


=============================
Some question:

1. Authors?  I will add them to thread:

Version 0.8 (DeGross)
Version 0.82 (prince)
mod 1.7 (???)
mod Vaka 010a (Vaka)

2. Contents: Vaka 010a > mod 1.7 > 0.82?

3. Is there a Version history?
I already got Vaka010a list on forex21's post https://albedo.pw/thread-1371.html
And up to 0.82 here: https://albedo.pw/forum-73.html

But what about mod 1.7?

=============================
New code, and bug fix, based on vaka 0.1.0A, during my play & translation:

Свёрнутый текст:

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&gt '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