[NPC] Incomplete herbalist code

[GuildWars]

;Herbalist NPC created by GuildWars aka TheNation
;Bichon Wall herbnpc Beta V.01
(@buy @sell @makedrug)
[@main]
#IF
checklevel 30
#SAY
Hello <$USERNAME>,
Welcome to Bichon Wall's herb shop.\ \ \
<Buy/@buy> Herbs.\
<Sell/@sell-1> Herbs.\
<Herbalist Training/@herbtrain>.\
<Alchamey Training/@alchamey>\
<Close/@exit>
[@herbtrain]
#IF
checkjob wizard
#SAY
The skill Herbalism have been around for generations.\
From the begining of the land of mir it has been taught\
from herbalist to herbalist, the greatest wizards of any time\
have known this skill. It has brought many wonders to the mirians eyes.\
Would you like to train?\ \
<Train skill/@trainskill>.\
<Back/@main>\
<Close/@exit>
#ELSESAY
Your nowt a wizard.\ \
<Back/@main>\
<Close/@exit>
[@trainskill]
#IF
checklevel 10
#SAY
You are the correct level..\ \
<Continue/@next>
[@next]
#IF
checklevel 10
check 050 0
#SAY
Do you wish to proceed in learning this skill?\ \
<Learn skill Gather Herbs(apprentice)/@learnskill>\
"The basics of how to gather herbs from bushes and
other plants for use in Alchemy."\
<Back/@herbtrain>\
<Close/@exit>
#ELSEACT
goto @confirm
[@learnskill]
#IF
checklevel 10
check 050 0
#ACT
set 050 1
MessageBox "You have learned a new skill <Gather Herbs(Apprentice)>!"
break
[@confirm]
#IF
check 050 1
#SAY
Do you wish to further your training as an Herbalist?\ \
<Continue/@herbalist>\
<Nowt just go back/@herbtrain>\
<Close/@exit>
#ELSESAY
ERROR Herbalist NPC\ \ \ \
PLEASE Report to a Gamemaster.\
<Report to server/@report_1>
[@herbalist]
#IF
check 063 1
#SAY
Welcome to the Herbalist training menu..\
===============================\
<Learn Gather Herbs(Apprentice) <(?)/@infoapp> *KNOWN*\
<Learn Gather Herbs(Journeyman) <(?)/@infojour> *KNOWN*\
<Learn Gather Herbs(Expert) <(?)/@infoexp> *KNOWN*\
<Learn Gather Herbs(Artisan) <(?)/@infoart> *KNOWN*\
<Learn Gather Herbs(Master) <(?)/@infomast> *KNOWN*\
<Back/main>\
<close/@exit>
#ELSEACT
goto @herb-1
[@herbz_1]
#IF
check 062 1
#SAY
Welcome to the Herbalist training menu..\
===============================\
<Learn Gather Herbs(Apprentice) <(?)/@infoapp> *KNOWN*\
<Learn Gather Herbs(Journeyman) <(?)/@infojour> *KNOWN*\
<Learn Gather Herbs(Expert) <(?)/@infoexp> *KNOWN*\
<Learn Gather Herbs(Artisan) <(?)/@infoart> *KNOWN*\
<Learn Gather Herbs/@herbmast>(Master) <(?)/@infomast>\
<Back/main>\
<close/@exit>
#ELSEACT
goto @herbz_2
[@herbz_2]
#IF
check 061 1
#SAY
Welcome to the Herbalist training menu..\
===============================\
<Learn Gather Herbs(Apprentice) <(?)/@infoapp> *KNOWN*\
<Learn Gather Herbs(Journeyman) <(?)/@infojour> *KNOWN*\
<Learn Gather Herbs(Expert) <(?)/@infoexp> *KNOWN*\
<Learn Gather Herbs/@herbart>(Artisan) <(?)/@infoart>\
<Learn Gather Herbs/@herbmast>(Master) <(?)/@infomast>\
<Back/main>\
<close/@exit>
#ELSEACT
goto @herbz_3
[@herbz_3]
#IF
check 060 1
#SAY
Welcome to Herbalist training menu..\
===============================\
<Learn Gather Herbs(Apprentice) <(?)/@infoapp> *KNOWN*\
<Learn Gather Herbs(Journeyman) <(?)/@infojour> *KNOWN*\
<Learn Gather Herbs/@herbexp>(Expert) <(?)/@infoexp>\
<Learn Gather Herbs/@herbart>(Artisan) <(?)/@infoart>\
<Learn Gather Herbs/@herbmast>(Master) <(?)/@infomast>\
<Back/main>\
<close/@exit>
@ELSEACT
goto @herbz_4
[@herbz_4]
#IF
check 050 1
#SAY
Welcome to the Herbalist training menu..\
===============================\
<Learn Gather Herbs(Apprentice) <(?)/@infoapp> *KNOWN*\
<Learn Gather Herbs/@herbjour>(Journeyman) <(?)/@infojour>\
<Learn Gather Herbs/@herbexp>(Expert) <(?)/@infoexp>\
<Learn Gather Herbs/@herbart>(Artisan) <(?)/@infoart>\
<Learn Gather Herbs/@herbmast>(Master) <(?)/@infomast>\
<Back/main>\
<close/@exit>
#ELSESAY
ERROR Herbalist NPC\ \ \ \
PLEASE Report to a Gamemaster.\
<Report to Server/@report_2>\

[@herbjour]
#IF
check 060 0
check 050 1
CheckVar Human herbs > 9
#ACT
set 060 1
MessageBox "You have learned a new skill <Gather Herbs(Journeyman)>!"
break
#ELSEACT
SENDMSG 1 "Cannot learn, not enough skill in <Gather Herbs>(10)"

[@herbexp]
#IF
check 061 0
check 050 1
check 060 1
CheckVar Human herbs > 19
#ACT
set 061 1
MessageBox "You have learned a new skill <Gather Herbs(Expert)>!"
break
#ELSEACT
SENDMSG 1 "Cannot learn, not enough skill in <Gather Herbs>(20)"
break
[@herbart]
#IF
check 062 0
check 050 1
check 060 1
check 061 1
CheckVar Human herbs > 29
#ACT
set 062 1
MessageBox "You have learned a new skill <Gather Herbs(Artisan)>!"
break
#ELSEACT
SENDMSG 1 "Cannot learn, not enough skill in <Gather Herbs>(30)"
break
[@herbmast]
#IF
check 063 0
check 050 1
check 060 1
check 061 1
check 062 1
CheckVar Human herbs > 39
#ACT
set 063 1
MessageBox "You have learned a new skill <Gather Herbs(Master)>!"
break
#ELSEACT
SENDMSG 1 "Cannot learn, not enough skill in <Gather Herbs>(40)"
break
[@alchamey]
#SAY
Feature currently unavailable..\
<Back/@main>\
<Close/@exit>
[@report_1]
#IF
checknamelist report1.txt
#SAY
Your last report was sent and the problem will be looked into. Please allow 24hrs.\ \ \
<Back to main menu/@main>\
<Close/@exit>
#ELSEACT
addnamelist report1.txt
#ELSESAY
Your report has been sent!\ \ \
<Back to main menu/@main>\
<Close/@exit>
[@report_2]
#IF
checknamelist report2.txt
#SAY
Your last report was sent and the problem will be looked into. Please allow 24hrs.\ \ \
<Back to main menu/@main>\
<Close/@exit>
#ELSEACT
addnamelist report2.txt
#ELSESAY
Your report has been sent!\ \ \
<Back to main menu/@main>\
<Close/@exit>
[@sell-1]
#SAY
I'm sorry we currently are not buying any herbs..\ \
<Back/@main>\
<Close/@exit>
[@buy]
#ACT
SENDMSG 6 "You begin to trade with the Herbalist merchant"
#SAY
I have minor herbs from the area that surrounds "Bichon wall".\ \
<Back/@main>\
<Close/@exit>

[goods]
Minorweed 100 1
Redweed 100 1
Greenweed 100 1
Brownweed 100 1
Silverweed 100 1
Bronzeweed 100 1
Goldweed 100 1
Majorweed 100 1


What you see is what i got done.. what you see is not what it could be.

enjoi

someone finish it please!

\TheNation

 

[GhettoFx]

Seen this in another server mate this isnt ur herbalist npc cause i'll get u the completed one.

 

[GuildWars]

I'm tired of everytime someone post a new map/npc there has to be someone to say, "I've seen that on this server, thats not yours m8" .. It is mine so stfu.

If you have that other herbalist npc that you can get. Post it, or just stop posting on my threads.
Go search user 'lifco' and make a post in one of his threads. lol


\thenation

 

[GhettoFx]

Kk WHat ever i beleive u i'll try give it a shot to finish it off mate if u wnat?

 

[Far]

thought u just said u had the completed one? lol

 

[jasper]

the point is it's a release, and its in the release section, if he wants to release it, who am i to argue.
cheers guildwars.
if i was any good at scripting i would release.

 

[GhettoFx]

I'm nearly Finished it should be a Nice Npc to go into my Release Thread Made By GuildWars Finished By Diamond

 

[GuildWars]

Mob/Drop files
Mob1 = 'CannibalPlant' drops canniballeafs/minorweed
Mob2 = 'unknown1' drops redweed/greenweed
Mob2 = 'unknown2' drops bronze/silver/goldweed
Mob3 = 'unknown3' drops majorweed

GatherHerb info:
CannibalPlant allows a possibility of 10
Unknown1 allows a possibility of 20
Unknown2 allows a possibility of 30
Unknown3 allows a possiblity of 40

MAPQUEST:
0 [051] 1 Cannibalplant * HerbPlant1
mapquest Herbplant1.txt file info:
[@main]
#IF
check 051 1
checkvar human herb < 10
#ACT
goto @next

[@next]
#IF
random 10
#ACT
CalcVar Human Herb + 2
SaveVar Human Herb ..\QuestDiary\Variables\HerbalistInfo.txt
SENDMSG 6 "You have gained a skill point in <Gather Herbs>(2)"

#IF
random 5
#ACT
CalcVar Human Herb + 1
SaveVar Human Herb ..\QuestDiary\Variables\HerbalistInfo.txt
SENDMSG 6 "You have gained a skill point in <Gather Herbs>(1)"
#ELSEACT
close

Uhmm.. i made a few mistakes in NPC in first post. corrected.


more to come .. dun dun dun..

<3 lomcn long time

/Thenation

 

[killer22]

crist thats going back sum.. npc scripting o.0 i use 2 know that like i knew myself but deff forgotten since ... i still able to read the code n all but cant remember most command lines n stuff.

 

[Akuma]

;Herbalist NPC created by GuildWars aka TheNation
;Bichon Wall herbnpc Beta V.01
(@buy @sell @makedrug)
[@main]
#IF
checklevel 30 <----------- If this is so
#SAY
Hello <$USERNAME>,
Welcome to Bichon Wall's herb shop.\ \ \
<Buy/@buy> Herbs.\
<Sell/@sell-1> Herbs.\
<Herbalist Training/@herbtrain>.\
<Alchamey Training/@alchamey>\
<Close/@exit>
[@herbtrain]
#IF
checkjob wizard
#SAY
The skill Herbalism have been around for generations.\
From the begining of the land of mir it has been taught\
from herbalist to herbalist, the greatest wizards of any time\
have known this skill. It has brought many wonders to the mirians eyes.\
Would you like to train?\ \
<Train skill/@trainskill>.\
<Back/@main>\
<Close/@exit>
#ELSESAY
Your nowt a wizard.\ \
<Back/@main>\
<Close/@exit>
[@trainskill]
#IF
checklevel 10 <------------ How Does this work?
#SAY
You are the correct level..\ \
<Continue/@next>
[@next]
#IF
checklevel 10
check 050 0
#SAY
Do you wish to proceed in learning this skill?\ \
<Learn skill Gather Herbs(apprentice)/@learnskill>\
"The basics of how to gather herbs from bushes and
other plants for use in Alchemy."\
<Back/@herbtrain>\
<Close/@exit>
#ELSEACT
goto @confirm
[@learnskill]
#IF
checklevel 10
check 050 0 <--------- check [50] 0
#ACT
set 050 1 <----------set [50] 1
MessageBox "You have learned a new skill <Gather Herbs(Apprentice)>!"
break
[@confirm]
#IF
check 050 1 <--------- check [50] 1
#SAY
Do you wish to further your training as an Herbalist?\ \
<Continue/@herbalist>\
<Nowt just go back/@herbtrain>\
<Close/@exit>
#ELSESAY
ERROR Herbalist NPC\ \ \ \
PLEASE Report to a Gamemaster.\
<Report to server/@report_1>
[@herbalist]
#IF
check 063 1 <--------- check [63] 1
#SAY
Welcome to the Herbalist training menu..\
===============================\
<Learn Gather Herbs(Apprentice) <(?)/@infoapp> *KNOWN*\
<Learn Gather Herbs(Journeyman) <(?)/@infojour> *KNOWN*\
<Learn Gather Herbs(Expert) <(?)/@infoexp> *KNOWN*\
<Learn Gather Herbs(Artisan) <(?)/@infoart> *KNOWN*\
<Learn Gather Herbs(Master) <(?)/@infomast> *KNOWN*\
<Back/main>\
<close/@exit>
#ELSEACT
goto @herb-1
[@herbz_1]
#IF
check 062 1 <--------- check [62] 1
#SAY
Welcome to the Herbalist training menu..\
===============================\
<Learn Gather Herbs(Apprentice) <(?)/@infoapp> *KNOWN*\
<Learn Gather Herbs(Journeyman) <(?)/@infojour> *KNOWN*\
<Learn Gather Herbs(Expert) <(?)/@infoexp> *KNOWN*\
<Learn Gather Herbs(Artisan) <(?)/@infoart> *KNOWN*\
<Learn Gather Herbs/@herbmast>(Master) <(?)/@infomast>\
<Back/main>\
<close/@exit>
#ELSEACT
goto @herbz_2
[@herbz_2]
#IF
check 061 1 <--------- check [61] 1
#SAY
Welcome to the Herbalist training menu..\
===============================\
<Learn Gather Herbs(Apprentice) <(?)/@infoapp> *KNOWN*\
<Learn Gather Herbs(Journeyman) <(?)/@infojour> *KNOWN*\
<Learn Gather Herbs(Expert) <(?)/@infoexp> *KNOWN*\
<Learn Gather Herbs/@herbart>(Artisan) <(?)/@infoart>\
<Learn Gather Herbs/@herbmast>(Master) <(?)/@infomast>\
<Back/main>\
<close/@exit>
#ELSEACT
goto @herbz_3
[@herbz_3]
#IF
check 060 1 <--------- check [60] 1
#SAY
Welcome to Herbalist training menu..\
===============================\
<Learn Gather Herbs(Apprentice) <(?)/@infoapp> *KNOWN*\
<Learn Gather Herbs(Journeyman) <(?)/@infojour> *KNOWN*\
<Learn Gather Herbs/@herbexp>(Expert) <(?)/@infoexp>\
<Learn Gather Herbs/@herbart>(Artisan) <(?)/@infoart>\
<Learn Gather Herbs/@herbmast>(Master) <(?)/@infomast>\
<Back/main>\
<close/@exit>
@ELSEACT
goto @herbz_4
[@herbz_4]
#IF
check 050 1 <--------- check [50] 1
#SAY
Welcome to the Herbalist training menu..\
===============================\
<Learn Gather Herbs(Apprentice) <(?)/@infoapp> *KNOWN*\
<Learn Gather Herbs/@herbjour>(Journeyman) <(?)/@infojour>\
<Learn Gather Herbs/@herbexp>(Expert) <(?)/@infoexp>\
<Learn Gather Herbs/@herbart>(Artisan) <(?)/@infoart>\
<Learn Gather Herbs/@herbmast>(Master) <(?)/@infomast>\
<Back/main>\
<close/@exit>
#ELSESAY
ERROR Herbalist NPC\ \ \ \
PLEASE Report to a Gamemaster.\
<Report to Server/@report_2>\

[@herbjour]
#IF
check 060 0 <--------- check [60] 0
check 050 1 <--------- check [50] 1
CheckVar Human herbs > 9
#ACT
set 060 1 <--------- set [60] 1
MessageBox "You have learned a new skill <Gather Herbs(Journeyman)>!"
break
#ELSEACT
SENDMSG 1 "Cannot learn, not enough skill in <Gather Herbs>(10)"

[@herbexp]
#IF
check 061 0 <--------- check [61] 0
check 050 1 <--------- check [50] 1
check 060 1 <--------- check [60] 1
CheckVar Human herbs > 19
#ACT
set 061 1 <--------- check [60] 1
MessageBox "You have learned a new skill <Gather Herbs(Expert)>!"
break
#ELSEACT
SENDMSG 1 "Cannot learn, not enough skill in <Gather Herbs>(20)"
break
[@herbart]
#IF
check 062 0 <--------- check [62] 0
check 050 1 <--------- check [50] 1
check 060 1 <--------- check [60] 1
check 061 1 <--------- check [61] 1
CheckVar Human herbs > 29
#ACT
set 062 1 <--------- set [62] 1
MessageBox "You have learned a new skill <Gather Herbs(Artisan)>!"
break
#ELSEACT
SENDMSG 1 "Cannot learn, not enough skill in <Gather Herbs>(30)"
break
[@herbmast]
#IF
check 063 0 <--------- check [63] 0
check 050 1 <--------- check [50] 1
check 060 1 <--------- check [60] 1
check 061 1 <--------- check [61] 1
check 062 1 <--------- check [62] 1
CheckVar Human herbs > 39
#ACT
set 063 1 <--------- set [63] 1
MessageBox "You have learned a new skill <Gather Herbs(Master)>!"
break
#ELSEACT
SENDMSG 1 "Cannot learn, not enough skill in <Gather Herbs>(40)"
break
[@alchamey]
#SAY
Feature currently unavailable..\
<Back/@main>\
<Close/@exit>
[@report_1]
#IF
checknamelist report1.txt
#SAY
Your last report was sent and the problem will be looked into. Please allow 24hrs.\ \ \
<Back to main menu/@main>\
<Close/@exit>
#ELSEACT
addnamelist report1.txt
#ELSESAY
Your report has been sent!\ \ \
<Back to main menu/@main>\
<Close/@exit>
[@report_2]
#IF
checknamelist report2.txt
#SAY
Your last report was sent and the problem will be looked into. Please allow 24hrs.\ \ \
<Back to main menu/@main>\
<Close/@exit>
#ELSEACT
addnamelist report2.txt
#ELSESAY
Your report has been sent!\ \ \
<Back to main menu/@main>\
<Close/@exit>
[@sell-1]
#SAY
I'm sorry we currently are not buying any herbs..\ \
<Back/@main>\
<Close/@exit>
[@buy]
#ACT
SENDMSG 6 "You begin to trade with the Herbalist merchant"
#SAY
I have minor herbs from the area that surrounds "Bichon wall".\ \
<Back/@main>\
<Close/@exit>

[goods]
Minorweed 100 1
Redweed 100 1
Greenweed 100 1
Brownweed 100 1
Silverweed 100 1
Bronzeweed 100 1
Goldweed 100 1
Majorweed 100 1


What you see is what i got done.. what you see is not what it could be.

enjoi

someone finish it please!

\TheNation

all i can see quickly as late for qwork lol will look at more when i get home

VirUs

 

[GhettoFx]

Nice to see virus taking intrest with npc trying my best to finish guildwars nice release mate the one i had was a simple one i though it was same but it wasnt guys this is mint work.