Is there a mir2 scriter that wants to script for mir3?

Join Discord

Vagrant

Golden Oldie
Golden Oldie
Jul 13, 2004
2,309
65
155
Romania
Im looking for a scripter to try and do mir3 scripts. On mir3 no1 wants to do it...

this is my original thread on mir3 section.(HERE)

I can do the basics of the scripts as i am already doing the shops, but there are some parts that i dont understand tbh and takes me ages to figuer them out. If you would like to be a part of my team add me on msn ([email protected]).
I can give you more details there and what are my plans.
 

Praktica

Dedicated Member
Dedicated Member
Jun 16, 2009
240
1
45
England
Aren't the mir3 scripts completely different from mir2 with a whole range of new commands?
 

IceMan

Hero's Act Mir 2
Legendary
Apr 17, 2003
8,544
2
370
350
i doubt many mir 2 npc makers can do mir3

mir3 npcs are alilttle harder to work with
 

Zen2

LOMCN Veteran
Veteran
Jul 26, 2007
1,818
18
145
Someone post a semi complex mir3 script up then :D
 

Hazuki

VIP
VIP
Apr 14, 2004
3,459
38
285
United Kingdom
Mir3 files can be confusing becuase they use alot of calls. Which in the long run make sense lol.

What type of scripts are you after?
 

Vagrant

Golden Oldie
Golden Oldie
Jul 13, 2004
2,309
65
155
Romania
Mir3 files can be confusing becuase they use alot of calls. Which in the long run make sense lol.

What type of scripts are you after?

well mainly i just want to sort out the Fame Point system display and use, i can do some of it now i've been scripting for a few days now it took me alot to figuer out little things, for example it took me almost 3 hours of testing in game to make Book NPC on kings to translate and learn a skill, and i only done 2 spells for warrios 100+ left but that wont be a problem now :).

And my own system (<Server name> System), some quests, oh and ye fame from bosses, boss counts how many you killed, i could probably do all that myself if i have an example...without an example of what i would like to do it would either take me ages to get it right either never.
 

^G0trex

Golden Oldie
Golden Oldie
Nov 7, 2003
1,946
28
155
Bham
I take it there's no list of npc commands like we have for Mir 2?

As Zen said, post an example script so we can get an idea...
 

Vagrant

Golden Oldie
Golden Oldie
Jul 13, 2004
2,309
65
155
Romania
My skill npc
Code:
[@Main]
#SAY
I can translate your books and can teach you them!!\
What would you like me to do for you?\\

<[ Translate Books ]/@tb>\
<[ Learn Skills ]/@ls>\
<[ Exit ]/@exit>\\\

[@tb]
#SAY
Choose the class for the book you want me to translate.\\

<[ Warrior ]/@war>\
<[ Wizard ]/@wiz>\
<[ Taoist ]/@tao>\
<[ Back ]/@Main>\\

[@war]
#SAY

<[ Slaying     Level 15]/@slay>\
<[ Thrusting   Level 20]/@thru>\
<[ Back ]/@main>\\

[@slay]
#SAY
Translating this book will cost you 100.000 Gold.\
Do you wish to pay?\\

<[ Yes i would! ]/@yesslaying>\

[@yesslaying]
#IF
checkitem Slaying 1
checkgold 100000
#SAY
Here is your book!!\
#ACT
take Slaying 1
take gold 100000
give Slaying(Manual)
#ELSEACT
goto @10 
break

[@thru]
#SAY
Translating this book will cost you 150.000 Gold.\
Do you wish to pay?\\

<[ Yes i would! ]/@yesthru>\

[@yesthru]
#IF
checkitem Thrusting 1
checkgold 150000
#SAY
Here is your book!!\
#ACT
take Thrusting 1
take gold 150000
give Thrusting(Manual)
#ELSEACT
goto @10 
break

[@10]
#SAY
Dont try to fool me!!\\

[@ls]
#SAY
I can help you learn your skills!\
Choose your class!\\

<[ Warrior ]/@wartrans>\
<[ Wizard ]/@wiztrans>\
<[ Taoist ]/@taotrans>\\
<[ Back ]/@main>\

[@wartrans]
#IF
CHECKJOB WARRIOR
#SAY
Which skill would you like to learn ?\\
<[ Fencing   Level 5 ]/@learnfencing>\
<[ Slaying   Level 15 ]/@learnslaying>\
<[ Thrusting Level 20 ]/@learnthrusting>\
<[ Back ]/@main]>\\
#ELSEACT
goto @10

[@learnfencing]
#IF
CHECK [100] 0
#ELSEACT
goto @11
break
#IF
CHECKLEVEL 5
checkitem Fencing(manual) 1 
#SAY 
If you give me Fencing(manual) i will teach you the spell!\\

<[ Give him the manual ]/@100>\\
#ELSEACT
goto @10 
break

[@100]
#SAY
Now go train your skill and leave me alone!!\\
#ACT
actcmd addmagic Fencing 0
take Fencing(manual) 1
SET [100] 1
#ELSEACT
goto @10
break

[@learnslaying]
#IF
CHECK [103] 0
#ELSEACT
goto @11
break
#IF
CHECKLEVEL 15
checkitem Slaying(manual) 1 
#SAY 
If you give me Slaying(manual) i will teach you the spell!\\

<[ Give him the manual ]/@101>\\
#ELSEACT
goto @10 
break

[@101]
#SAY
Now go train your skill and leave me alone!!\\
#ACT
actcmd addmagic Slaying 0
take Slaying(manual) 1
SET [103] 1
#ELSEACT
goto @10
break

[@learnthrusting]
#IF
CHECK [102] 0
#ELSEACT
goto @11
break
#IF
CHECKLEVEL 20
checkitem Thrusting(manual) 1 
#SAY 
If you give me Thrusting(manual) i will teach you the spell!\\

<[ Give him the manual ]/@102>\\
#ELSEACT
goto @10 
break

[@102]
#SAY
Now go train your skill and leave me alone!!\\
#ACT
actcmd addmagic Thrusting 0
take Thrusting(manual) 1
SET [102] 1
#ELSEACT
goto @10
break

[@11]
#SAY
You already learned this skill!!!\\\

00Default.txt
Code:
;;不要删掉此行
[@main]
#ACT
goto @SETSAFEZONE
goto @LottoSystem_ItemClick
goto @AreaQuest_7Item
goto @Luckystone_7Item
goto @ExpStone_Item
goto @ExplainStone_Item
goto @Goldbox_Item
goto @Silverbox_Item
goto @Famestone_Item
goto @Daohubook_Item
goto @Daohulifu_Item
break

[@SETSAFEZONE]
#CALL [System\SafeZone.txt] @SafeZone

[@LottoSystem_ItemClick]
#CALL [System\LottoSystem\LottoItemClick.txt] @LottoSystem_LottoItemClick

[@ExplainStone_Item]
#CALL [winma\攻略石.txt] @攻略石

[@ExpStone_Item]
#CALL [winma\经验石.txt] @经验石

[@Goldbox_Item]
#CALL [winma\精金宝箱.txt] @打开精金宝箱

[@Silverbox_Item]
#CALL [winma\密银宝箱.txt] @打开密银宝箱

[@Famestone_Item]
#CALL [winma\声望石.txt] @声望石

[@Daohubook_Item]
#CALL [winma\道狐书籍.txt] @道狐书籍

[@Daohulifu_Item]
#CALL [winma\道狐灵符.txt] @道狐灵符

[@_UserLogin]
#ACT
Delaygoto [Local] 2 @_UserFBLogin
Delaygoto [Local] 3 @BasicQuest_Control
Delaygoto [Local] 4 @_TIMEREVENT
break

[@_TIMEEVENT]
#CALL [KINGSCRIPT\UserTimeEvent.txt] @UserTimeEvent1

[@_Diary]
#CALL [System\MirGuideBook.txt] @Mir3GuideBook

[@_UserFBLogin]
#CALL [Vimascript\repetition_login.txt] @repetition_login

[@_MagicGate]
#ACT
MapMove D900 20 22

[@_MagicGate_Dark]
#ACT
MapMove D2900 45 34

[@AreaQuest_7Item]
#CALL [AreaQuest\ChoBoGuide7\ItemEvent.txt] @EventItem_Area7
[@Luckystone_7Item]
#CALL [KINGSCRIPT\LuckStone.txt] @LuckyStone

[@BasicQuest_Control]
#CALL [AreaQuest\HumMainControl.txt] @RootControl

[@_War_Ready_Sabuk]
#CALL [System\SabukCastle\SabukDefaultSetting.txt] @CastleWarReady
[@_War_Start_Sabuk]
#CALL [System\SabukCastle\SabukDefaultSetting.txt] @CastleWarStart
[@_War_Finish_Sabuk]
#CALL [System\SabukCastle\SabukDefaultSetting.txt] @CastleWarFinish
[@_CastleOwnerChanged_Sabuk]
#CALL [System\SabukCastle\Sabukflag.txt] @ChangeFlag
[@_CastleFlagChanged_Sabuk]
#CALL [System\SabukCastle\Sabukflag.txt] @ChangeFlag

[@_War_Ready_Taosung]
#CALL [System\TaosungCastle\TaosungDefaultSetting.txt] @CastleWarReady_TAOSUNG
[@_War_Start_Taosung]
#CALL [System\TaosungCastle\TaosungDefaultSetting.txt] @CastleWarStart_TAOSUNG
[@_War_Finish_Taosung]
#CALL [System\TaosungCastle\TaosungDefaultSetting.txt] @CastleWarFinish_TAOSUNG
[@_CastleOwnerChanged_Taosung]
#CALL [System\TaosungCastle\Taosungflag.txt] @ChangeFlag_TAOSUNG
[@_CastleFlagChanged_Taosung]
#CALL [System\TaosungCastle\Taosungflag.txt] @ChangeFlag_TAOSUNG

[@_UPLVLEVENT]
#CALL [KINGSCRIPT\UpLvlEvrnt.TXT] @UPLEVEL_EVENT

[@_USEROFFLINE]
#IF
checkcmd ISPKMODE
#ACT
goto @_USERDIE

[@_USERDIE]
#IF
checkcmd ISPKMODE
#ACT
loadvalue A0 "PlayerParam\PK赛记录.ini" [用户] [申请人]
loadvalue A1 "PlayerParam\PK赛记录.ini" [用户] [应战人]
savevalue "PlayerParam\PK赛记录.ini" [状态] [状态] 5
#ELSEACT
break

#IF
EQUAL A0 %USERNAME
#ACT
linemsg [grobal] "<$OUTPUT(A1)>在与<$USERNAME>PK中获胜."
savevalue "PlayerParam\PK赛记录.ini" [用户] [失败者] %A0
savevalue "PlayerParam\PK赛记录.ini" [用户] [胜利者] %A1
actcmd RUNSCRIPTLABEL %A1 "@_PK胜利"   
#ELSEACT
linemsg [grobal] "<$OUTPUT(A0)>在与<$USERNAME>PK中获胜."
savevalue "PlayerParam\PK赛记录.ini" [用户] [失败者] %A1
savevalue "PlayerParam\PK赛记录.ini" [用户] [胜利者] %A0
actcmd RUNSCRIPTLABEL %A0 "@_PK胜利"  

[@_PK胜利]
#ACT
loadvalue D4 "PlayerParam\PK赛记录.ini" [金额] [积分卷]
mov P1 2
mov P2 %D4
mov P3 9
mov P4 10
mul P1 P2
mul P9 P3
div P9 P4
#IF
Large P9 0
#ACT
mov D0 %P9
give 积分卷 %D0
linemsg [Grobal] "<$USERNAME>获得PK奖励<$OUTPUT(D0)>积分卷"
linemsg "E007" "请注意,PK场将在30秒后关闭"
cleardelaygoto 10033
delaygoto [grobal] 30 @PK胜利_2
#ELSEACT
linemsg "E007" "请注意,PK场将在30秒后关闭"
cleardelaygoto 10033
delaygoto [grobal] 30 @PK胜利_2

[@PK胜利_2]
#IF
#ACT
mapting E007 1 405 117
actcmd delfile "envir\PlayerParam\PK赛记录.ini"
SetAreaAttr "E007,40,40,200" "SAFE"

[@_ONUSERHOURCHANGE]
#CALL [Vimascript\玛珐族人得天赐.txt] @玛珐族人得天赐内容

[@_ONUSERDAYCHANGE]
#ACT
break

[@_ONUSERWEEKCHANGE]
#IF
!checkcmd ISTESTSERVER
#ACT
actcmd SETDOUBLEEXP = 50400000
sysmsg "双倍时间重置." 1
break

[@_ONREADBOOK]
#CALL [KINGSCRIPT\ONREADBOOK.txt] @READBOOKMAIN

[@_ONWEEKCHANGE]
#CALL [KINGSCRIPT\WeekchangeEvent.txt] @WeekchangeEvent1

[@_ONDAYCHANGE]
#CALL [KINGSCRIPT\DaychangeEvent.txt] @DaychangeEvent1

[@_ONHOURCHANGE]
#CALL [KINGSCRIPT\HourchangeEvent.txt] @HourchangeEvent1

[@_CHECKPASSEVENT]
#CALL [vimascript\上线锁定.txt] @lockequipevent


[@_UserLogin2]
#ACT
goto @CHECKUNSTUDEVENT
goto @NewCharEvent

[@CHECKUNSTUDEVENT]
#CALL [KINGSCRIPT\CHECKUNSTUDENT.TXT] @CHECKUNSTUDENT_LOGIN

[@NewCharEvent]
#CALL [KINGSCRIPT\NEWHUMAN.txt] @newhuman

[@_ONITEMDOWN]
#CALL [KINGSCRIPT\Itemlog.txt] @REDItemlog
;;不要删掉此行

I dunno what else to post, the most stupid thing i dont like on mir3 is the Convert Scripts, using #CALL or #INCLUDE commands they are really crap tbh, for example there is MirGuideBook.txt(press ''D'' and you open it)

<[ Saturn Points ]/@sp>\

[@sp]
#SAY
<[ Special Repair ]/@sr>\

[@sr]
#CALL [System\SpecRepairAll.txt] @CompleteSpecRepair

and in same folder there is SpecRepairAll.txt (sorry cant post the content of the SpecRepairAll.txt because the original npc script is not mine)

I really dont like these stupid commands and i dont understand alot of things in scripting thats why i need help :cool1:
 

Zen2

LOMCN Veteran
Veteran
Jul 26, 2007
1,818
18
145
Tbh... thats not even much different to mir2 if im honest. Anyone who has a half decent knowlage of scriptng could pick that up easy i didnt actually notice much difference at all from a mir2 script.
 

^G0trex

Golden Oldie
Golden Oldie
Nov 7, 2003
1,946
28
155
Bham
First script you posted is incredibly simple to anyone who has knowledge of scripting, the second (00Default.txt) was rather confusing to me though.

btw,

Code:
[@_ONUSERWEEKCHANGE]
#IF
[B][COLOR="Red"]![/COLOR][/B]checkcmd ISTESTSERVER
#ACT
actcmd SETDOUBLEEXP = 50400000
sysmsg "双倍时间重置." 1
break

that meant to be there?
 

Vagrant

Golden Oldie
Golden Oldie
Jul 13, 2004
2,309
65
155
Romania
btw,

Code:
[@_ONUSERWEEKCHANGE]
#IF
[B][COLOR="Red"]![/COLOR][/B]checkcmd ISTESTSERVER
#ACT
actcmd SETDOUBLEEXP = 50400000
sysmsg "双倍时间重置." 1
break

that meant to be there?

i got no idea :confused1: