mapadale
Guest
Ok I've noticed that a lot of scripts are being repeatedly added or asked about, so with this one thread I've added all the common ones in and then some.
Thanks goes to all those that have contributed to these scripts and have helped other users on understanding them better as well.
If there are any more scripts that people want or need, or have a script to add then let me know.
Thanks goes to all those that have contributed to these scripts and have helped other users on understanding them better as well.
Code:
[B][COLOR=red]Fame 4 Level[/COLOR][/B]
Add to 00default.txt
[@_UpLevel]
#IF
CheckFame
#ACT
Mov D4 %P9
#IF
SMALL D4 1000
#ACT
INC D4 1
SetFame %D4
sysmsg "You have recieved 1 FamePoint on Level Up"
break
Just a small little script, to showcase, how you can simplify a repetitive menu down. What use to be a much larger code, is simplified down to about 100 lines of code, for easier editing and use. I've helped alot of people on msn, who don't seem to know this little trick and end up with huge repetitive scripts, that are tedious to edit.
hope this helps you, let me know if you guys need any explanations, as im just showcasing the script, and assuming you no whats going on
pay close attention to the variables used. those are the most critical parts.. to getting a script like this to work.
Code:
[@FameMenu]
#IF
CheckFame
#ACT
Mov D4 %P9 ; Amount of FP
#SAY
Welcome to the Famepoint rebirth system.\
Currently we offer 8 rebirths to our members.\
Attaining all of them is not an easy task.\
Currently you have <$OUTPUT(D4)> FP's\
<Rebirth/@rebirthmenu>\
[@rebirthmenu]
#SAY
< Level 1 - 100 FP - Lvl100 - 60million gold/@rebirthauto(1,100,100,60000000)>\
< Level 2 - 200 FP - Lvl200 - 80million gold/@rebirthauto(2,200,200,80000000)>\
< Level 3 - 250 FP - Lvl300 - 100million gold/@rebirthauto(3,250,300,100000000)>\
< Level 4 - 300 FP - Lvl400 - 120million gold/@rebirthauto(4,300,400,120000000)>\
< Level 5 - 450 FP - Lvl500 - 150million gold/@rebirthauto(5,450,500,150000000)>\
< Level 6 - 550 FP - Lvl850 - 200million gold/@rebirthauto(6,550,850,200000000)>\
< Level 7 - 650 FP - Lvl1050 - 500million gold/@rebirthauto(7,650,1050,500000000)>\
< Level 8 - 900 FP - Lvl1200 - 1Billion gold/@rebirthauto(8,900,1200,1000000000)>
[@rebirthauto()]
#ACT
Mov D5 %ARG(1)
Mov D6 %ARG(2)
Mov D0 %ARG(3)
Mov D8 %ARG(4)
goto @dorebirth
[@dorebirth]
#IF
ELARGE D4 %D6
checkgold %D8
checklevel %D0
!HLSCRIPTCMD CHECKRELEVEL %D5
#ACT
DEC D4 %D6
SetFame %D4
take gold %D8
HLSCRIPTCMD REINCARNATION
HLSCRIPTCMD CLEAREXP
#SAY
You got <$HLREINCARNATION> rebirth now.\
#ELSESAY
You are short on something to gain this Rebirth.\
<[ Exit ]/@exit>\\\
Code:
[B][COLOR=red]Top Script[/COLOR][/B]
[@AllLevels]
#SAY
<$SERVERTOPALLLEVEL>\\
<[ Exit ]/@exit>\\\
[@TaoistLevels]
#SAY
<$SERVERTOPLEVEL2>\\
<[ Exit ]/@exit>\\\
[@WarriorLevels]
#SAY
<$SERVERTOPLEVEL0>\\
<[ Exit ]/@exit>\\\
[@WizardLevels]
#SAY
<$SERVERTOPLEVEL1>\\
<[ Exit ]/@exit>\\\
[@TopRich]
#SAY
<$SERVERTOPGOLD>\\
<[ Exit ]/@exit>\\\
Code:
[COLOR=red][B]Rebirth Script[/B][/COLOR]
[@rein]
#IF
HLSCRIPTCMD CHECKPOINT 500
!HLSCRIPTCMD CHECKRELEVEL 1
checklevel 60
#ACT
HLSCRIPTCMD REINCARNATION
HLSCRIPTCMD CLEAREXP
HLSCRIPTCMD SETPOINT - 500
[@rein2]
#IF
HLSCRIPTCMD CHECKPOINT 500
!HLSCRIPTCMD CHECKRELEVEL 2
checklevel 120
#ACT
HLSCRIPTCMD REINCARNATION
HLSCRIPTCMD CLEAREXP
HLSCRIPTCMD SETPOINT - 500
[@rein3]
#IF
HLSCRIPTCMD CHECKPOINT 500
!HLSCRIPTCMD CHECKRELEVEL 3
checklevel 210
#ACT
HLSCRIPTCMD REINCARNATION
HLSCRIPTCMD CLEAREXP
HLSCRIPTCMD SETPOINT - 500
Code:
[B][COLOR=red]Booty to Integral[/COLOR][/B]
[@main]
#SAY
Hello i take Amulet's, bone's and goldore and\
exchange them to integral S M and L.\ \
<Use your service/@service>\
[@service]
#IF
checkitem amulet 10
#ACT
take amulet 10
give integral(s) 1
#ELSEACT
goto @noitem
#IF
checkitem bone 10
#ACT
take bone 10
give integral(m) 1
#ELSEACT
goto @noitem
#IF
checkitem goldore 10
#ACT
take goldore 10
give integral(l)
#ELSEACT
goto @noitem
#SAY
Thanks.
[@noitem]
#SAY
you dont have bone's amulet's or gold ore.\ \
<exit/@exit>\
If there are any more scripts that people want or need, or have a script to add then let me know.