[CD3.55] making ores

dagras

LOMCN Veteran
Veteran
Feb 6, 2011
282
3
44
hi , im fairly newish to making scripts.im trying to make script for npc to make jadeores., basically i tried copying and re-editing the files all ready in server to make steelores but that didnt work. then i tried making a basic script ie checkitem, takeitems, give jadeore blah blah blah, and that didnt work lol.would anyone be able to point me in the right direction how i should set up this script and if it needs to go in more than 1 place, let me know basic infomation i need to put in there please?TYVM for ur time and assistance in advance.
 

Geordiehc

Mad Dog Geo
VIP
Jul 4, 2007
2,827
49
195
Redditch, UK
Basic script would be (i suggest visiting 'The One thread You Will Ever Need' if you can't already do this:

#SAY
<Give me Ore/@ore> 100 Gold \

[@ore]
#IF
CHECKGOLD 100
#ACT
GIVE JadeOre
#ELSESAY
You do not have enough money


With this you need to make sure JadeOre is created in the item database, other than thta it should work fine
 
Upvote 0

dagras

LOMCN Veteran
Veteran
Feb 6, 2011
282
3
44
ty for replies- however i managaed 2 make a couple and work_ heres the scripts if anyone wants to use :_

[@RefineJadeOre]
{
#Define D1{PROB} D1
#Define D2{TYPE} D2
#Define D3{ATOM} D3


#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_0

[@@testRefineAccessory]
#IF
#ACT
mov A1 %INPUTSTR

#IF
Equal A1 ""
#ACT
break

#IF

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_1

[@retryRefine]
#ACT
goto @@testRefineAccessory

[@doRefineAcc()]
#IF
not CheckItem corundum 10
or not CheckGold 100000
#ACT
goto @didnotMatchConditions
break

#IF
#ACT

mov D2{TYPE} %ARG(1)
mov D3{ATOM} %ARG(2)
TestRefineAccessories %A1 %D2 %D3
mov D1{PROB} %P9

#IF
Small D1{PROB} 0
#ACT
goto @didnotMatchConditions
break

#IF

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_2

[@GetRefineProb]
#IF
Small D1 30

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_3

#ACT
break

#IF
Small D1 38

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_4

#ACT
break

#IF
Small D1 45

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_5

#ACT
break

#IF
Small D1 55

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_6

#ACT
break

#IF
Small D1 65

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_7

#ACT
break

#IF

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_8

#ACT
break

[@RefineAccNow]
#IF
not CheckItem Corundum 10
or not CheckGold 100000
#ACT
break

#IF
#ACT
Take corundum 10
Take Gold 100000
RefineAccessories %A1 %D2 %D3

#IF
Equal P9 1

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_9

#IF
Equal P9 0

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_10

[@didnotMatchConditions]

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_11

[@askAboutRefineAccessories]

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_12

}


[@RefineGangOk]
{
#IF

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_13

[@RefineGangOk_MainCheck]
#IF
CheckItem corundum 10
!CheckItem corundum 11
#ACT
goto @RefineGangOk_MainCheck_1
break

#ELSEACT
break

#ELSESAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_14

[@RefineGangOk_MainCheck_1]
#IF
Checkgold 100000
#ACT
goto @RefineGangOk_MainCheck_2
break

#ELSEACT
break

#ELSESAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_15

[@RefineGangOk_MainCheck_2]
#IF
Checkduraeva corundum 10
#ACT
goto @RefineGangOk_MainRefine_RandSet
break

#ELSEACT
break

#ELSESAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_16

[@RefineGangOk_MainRefine_RandSet]
#IF
Random 3
#ACT
take corundum 10
take Gold 100000
break

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_17

#ELSEACT
goto @RefineGangOk_MainRefine
break

[@RefineGangOk_MainRefine]
#IF
checkitem corundum 10
!Checkitem corundum 11
checkgold 100000
checkduraeva corundum 10
#ACT
take corundum 10
take Gold 100000
give JadeOre 1

#SAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_18

#ELSEACT
break

#ELSESAY
#INCLUDE [..\Convert_Def\QuestDiary\System\RefineAccessory.txt] @Convert_RefineAccessory_19


or this one is easier:-

[@makeJadeOre]
#IF
Checkitem Garnet 10
#ACT
MOV D4 %P9
Take Garnet 10
#IF
Checkitem Diamond 10
#ACT
MOV D4 %P9
Take Diamond 10
#IF
Checkitem SilverOre 10
#ACT
MOV D4 %P9
Take SilverOre 10
#ACT
MOV D4 %P9
CheckGold 100000
Take Gold 100000
Give JadeOre
sysmsg "You have received one JadeOre!"
@main
#SAY
Congrats!
#ELSEACT
goto @Miss
 
Upvote 0

dagras

LOMCN Veteran
Veteran
Feb 6, 2011
282
3
44
make ores..... these ones are for making jadeores can also be used for nephritores, both on npc
 
Upvote 0