RuneScape Construction v2

By Zeppelin382 on Jan 12, 2009

Alright, well I decided to get 99 construction and I hated using the scripts from bots like RuneScript and Vectra. I'm an amateur scripter and I think I did pretty well although I know there are better ways of putting this together. Also, when I started adding this snippet, I spotted quite a few bugs. With the help of a few people they were fixed.
Constructive Criticism appreciated. (no pun intended :P)

Usage:

Personal use-
/con Current-Level or Exp Goal-Level (+c)

+c for it to show in the channel

Everyone else-
[!.@]con(struction) level/exp goal

--Update: Added Percentage to it. Deleted Input and integrated it into the alias. 1/17/2009
--Update: Corrected a lot of bugs
--Update: Added the @con capability; added flood protection; compressed the alias
--Update: Compacted the script from 75 lines in a remote to 35. Added a syntax error to the alias, fixed percentages, fixed the Experience calculations.

alias con {
  if ($3 == +c ) { var %conmsg msg $chan }
  else { var %conmsg echo -a }
  if ($1 < 99 ) && ($2 <= 99 ) {
    var %needed $calc(%lvl [ $+ [ $2 ] ] - ( %lvl [ $+ [ $1 ] ] )) | var %neededham $ceil($calc(%needed / 50750)) | var %Con-percent $ceil($calc((%lvl [ $+ [ $1 ] ] / ( %lvl [ $+ [ $2 ] ] ) )*100))
    if ($1 <= 33 ) {
    var %neededpl $ceil($calc(%needed / 60)) | var %con-price $calc(%neededpl * 175) | var %con-price1 $calc(%neededpl *275) | %conmsg ---14Construction Level(from $1 $+  ):1 %con-percent $+ % to level $2 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededpl,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b)  $+ 14)1--- | halt }
    if ($1 isnum 33-99 ) { var %neededoak $ceil($calc(%needed / 120)) | var %butler$ $calc($ceil($calc((%neededoak / 120 )))*5000) | var %con-price $calc(%neededoak * 375) | var %con-price1 $calc(%neededoak *425) | %conmsg ---14Construction Level(from $1 $+ ):1 %con-percent $+ % to level $2 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededoak,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b)  $+ 14) 14(Butler Price:6 $bytes(%butler$,b) $+ 14)1--- | halt } 
  }
  if ($1 > 99 ) && ($2 <= 99 ) {
    var %needed $calc(%lvl [ $+ [ $2 ] ] - $1 ) | var %neededham $ceil($calc(%needed / 50750)) | var %Con-percent $ceil($calc(($1 / %lvl [ $+ [ $2 ] ] )*100))
    if ($1 <  18247 ) {  var %neededpl $ceil($calc(%needed / 120))  | var %butler$ $calc($ceil($calc((%neededoak / 120 )))*5000) | var %con-price $calc(%neededpl * 175) | var %con-price1 $calc(%neededpl *275)  | %conmsg ---14Construction Level(from $1 $+ ):1 %con-percent $+ % to $2 14Exp. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededpl,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b)  $+ 14) 14(Butler Price:6 $bytes(%butler$,b) $+ 14)1--- | halt }
    if ($1 > 18247 ) {  var %neededoak $ceil($calc(%needed / 120))   | var %butler$ $calc($ceil($calc((%neededoak / 120 )))*5000) | var %con-price $calc(%neededoak * 375) | var %con-price1 $calc(%neededoak *425) | %conmsg ---14Construction Level(from $1 $+ ):1 %con-percent $+ % to level $2 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededoak,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b)  $+ 14) 14(Butler Price:6 $bytes(%butler$,b) $+ 14)1--- | halt }
  }
  else { echo -a 4Syntax Error in6 $script $+ 4. Try: 7/con Level/Exp Goal Level4. For example /con 92 99 }
}
on $*:text:/^[@!.]con(struct)?(ion)? */Si:#: {
  inc -u3 %spam. [ $+ [ $nick ] ]
  if (%spam. [ $+ [ $nick ] ] isnum 3-20 ) { notice $nick Fuck you. Don't abuse my scripts faggot. | set %ignore. [ $+ [ $address($nick,2) ] ] | .timer 1 180 /unset %ignore. [ $+ [ $address($nick,2) ] ] | halt } 
  elseif ($address($nick,2) == %ignore. [ $+ [ $address ] ] ) { halt }
  if ($1 == @con ) { var %conmsg msg $chan }
  else { var %conmsg notice $nick }
  if ($2 !isnum || $3 !isnum ) { halt }
  if (!$2 || !$3 ) { notice $nick Syntax Error: (.!@)con(struction) Level/Exp Goal Level | halt } 
  if ($2 >= 1 ) && ($3 <= 99 ) {
    if ($2 >= $3 ) && ($2 <= 99 ) { notice $nick You must specify a level greater than your current!  | halt } 
    var %needed $calc(%lvl [ $+ [ $3 ] ] - %lvl [ $+ [ $2 ] ] ) | var %neededham $ceil($calc(%needed / 50750)) | var %con-percent $ceil($calc(( %lvl [ $+ [ $2 ] ] / %lvl [ $+ [ $3 ] ] )*100)))
    if ($2 <= 33 ) {  var %neededpl $ceil($calc(%needed / 60)) | var %con-price $calc(%neededpl * 175) | var %con-price1 $calc(%neededpl *275) | %conmsg ---14Construction Level(from $2 $+  ):1 %con-percent $+ % to level $3 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededpl,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b)  $+ 14)1--- | notice $nick The 12Hammers5- Sacred Clay from the mini-game stealing creations made into Hammers. The 7Planks5- Regular planks from Logs.  | halt }
    if ($2 isnum 33-99 ) { var %neededoak $ceil($calc(%needed / 120)) | var %butler$ $calc($ceil($calc((%neededoak / 120 )))*5000) | var %con-price $calc(%neededoak * 375) | var %con-price1 $calc(%neededoak *425) | %conmsg ---14Construction Level(from $2 $+  ):1 %con-percent $+ % to level $3 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededoak,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b)  $+ 14) 14(Butler Price:6 $bytes(%butler$,b) $+ 14)1--- | notice $nick The 12Hammers5- Sacred Clay from the mini-game stealing creations made into Hammers.  The 7Planks5- Oak planks. The 6Butler Price5- Is the price using a regular butler, not demon. | halt }}
  }  }   
  if ($2 > 99) && ($3 <= 99 ) {
    if (%lvl [ $+ [ $3 ] ] <= $2 ) { notice $nick You must specify a level or Exp greater than your current!  | halt } 
    var %needed $calc(%lvl [ $+ [ $3 ] ] - $2 ) | var %neededham $ceil($calc(%needed / 50750)) | var %Con-percent $ceil($calc(($2 / %lvl [ $+ [ $3 ] ] )*100))
    if ($2 <  18247 ) { var %neededpl $ceil($calc(%needed / 120))  | var %butler$ $calc($ceil($calc((%neededpl / 120 )))*5000) | var %con-price $calc(%neededpl * 200) | var %con-price1 $calc(%neededpl *300) | %conmsg ---14Construction Level(from $bytes($2,b) Exp):1 %con-percent $+ % to level $3 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededpl,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b)  $+ 14)1--- | notice $nick The 12Hammers5- Sacred Clay from the mini-game stealing creations made into Hammers. The 7Planks5- Regular planks from Logs.  | halt }
    elseif ($2 >= 18247 ) { var %neededoak $ceil($calc(%needed / 120))   | var %butler$ $calc($ceil($calc((%neededoak / 120 )))*5000) | var %con-price $calc(%neededoak * 375) | var %con-price1 $calc(%neededoak *425) | %conmsg ---14Construction Level(from $bytes($2,b) Exp):1 %con-percent $+ % to level $3 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededoak,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b)  $+ 14) 14(Butler Price:6 $bytes(%butler$,b) $+ 14)1--- | notice $nick The 12Hammers5- Sacred Clay from the mini-game stealing creations made into Hammers.  The 7Planks5- Oak planks. The 6Butler Price5- Is the price using a regular butler, not demon. | halt }
}  } }

;;;;;;THIS GOES IN VARIABLES;;;;;
%lvl1 0
%lvl2 83
%lvl3 174
%lvl4 276
%lvl5 388
%lvl6 512
%lvl7 650
%lvl8 801
%lvl9 969
%lvl10 1154
%lvl11 1358
%lvl12 1584
%lvl13 1833
%lvl14 2107
%lvl15 2411
%lvl16 2746
%lvl17 3115
%lvl18 3523
%lvl19 3973
%lvl20 4470
%lvl21 5018
%lvl22 5624
%lvl23 6291
%lvl24 7028
%lvl25 7842
%lvl26 8740
%lvl27 9730
%lvl28 10824
%lvl29 12031
%lvl30 13363
%lvl31 14833
%lvl32 16456
%lvl33 18247
%lvl34 20224
%lvl35 22406
%lvl36 24815
%lvl37 27473
%lvl38 30408
%lvl39 33648
%lvl40 37224
%lvl41 41171
%lvl42 45529
%lvl43 50339
%lvl44 55649
%lvl45 61512
%lvl46 67983
%lvl47 75127
%lvl48 83014
%lvl49 91721
%lvl50 101333
%lvl51 111945 
%lvl52 123660
%lvl53 136594
%lvl54 150872
%lvl55 166636
%lvl56 174040
%lvl57 203254
%lvl58 224466
%lvl59 247886
%lvl60 273742
%lvl61 302288
%lvl62 333804
%lvl63 368599
%lvl64 407015
%lvl65 449428
%lvl66 496254
%lvl67 547953
%lvl68 605032
%lvl69 668051
%lvl70 737627
%lvl71 814445
%lvl72 899895
%lvl73 1096278
%lvl74 1210421
%lvl75 1336443
%lvl76 1336443
%lvl77 1475581
%lvl78 1629200
%lvl79 1798808
%lvl80 1986068
%lvl81 2192818
%lvl82 2421087
%lvl83 2673114
%lvl84 2951373
%lvl85 3258594
%lvl86 3597792
%lvl87 3972294
%lvl88 4385776
%lvl89 4842295 
%lvl90 5346332
%lvl91 5902831
%lvl92 6517253
%lvl93 7195629
%lvl94 7944614
%lvl95 8771558
%lvl96 9684577
%lvl97 10692629
%lvl98 11805606
%lvl99 13034431
;;;;;;;;;;;

Comments

Sign in to comment.
Jethro   -  May 31, 2011

No, the alias is on its own. Then you only need to use the term: setvar

 Respond  
poborski   -  May 31, 2011

so it would look like this?

alias con {
setvar {
var %i 100
while %i <= 127 {
set $+($(%,),lvl) %i $r(1,999999999)
inc %i
}
}
if ($3 == +c ) { var %conmsg msg $chan }
else { var %conmsg echo -a }
if ($1 < 127 ) && ($2 <= 127 ) {
var %needed $calc(%lvl [ $+ [ $2 ] ] - ( %lvl [ $+ [ $1 ] ] )) | var %neededham $ceil($calc(%needed / 50750)) | var %Con-percent $ceil($calc((%lvl [ $+ [ $1 ] ] / ( %lvl [ $+ [ $2 ] ] ) )100))
if ($1 <= 33 ) {
var %neededpl $ceil($calc(%needed / 60)) | var %con-price $calc(%neededpl
175) | var %con-price1 $calc(%neededpl 275) | %conmsg ---14Construction Level(from $1 $+ ):1 %con-percent $+ % to level $2 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededpl,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b) $+ 14)1--- | halt }
if ($1 isnum 33-127 ) { var %neededoak $ceil($calc(%needed / 120)) | var %butler$ $calc($ceil($calc((%neededoak / 120 )))
5000) | var %con-price $calc(%neededoak 375) | var %con-price1 $calc(%neededoak 425) | %conmsg ---14Construction Level(from $1 $+ ):1 %con-percent $+ % to level $2 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededoak,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b) $+ 14) 14(Butler Price:6 $bytes(%butler$,b) $+ 14)1--- | halt }
}
if ($1 > 127 ) && ($2 <= 127 ) {
var %needed $calc(%lvl [ $+ [ $2 ] ] - $1 ) | var %neededham $ceil($calc(%needed / 50750)) | var %Con-percent $ceil($calc(($1 / %lvl [ $+ [ $2 ] ] )100))
if ($1 < 18247 ) { var %neededpl $ceil($calc(%needed / 120)) | var %butler$ $calc($ceil($calc((%neededoak / 120 )))
5000) | var %con-price $calc(%neededpl 175) | var %con-price1 $calc(%neededpl 275) | %conmsg ---14Construction Level(from $1 $+ ):1 %con-percent $+ % to $2 14Exp. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededpl,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b) $+ 14) 14(Butler Price:6 $bytes(%butler$,b) $+ 14)1--- | halt }
if ($1 > 18247 ) { var %neededoak $ceil($calc(%needed / 120)) | var %butler$ $calc($ceil($calc((%neededoak / 120 )))5000) | var %con-price $calc(%neededoak 375) | var %con-price1 $calc(%neededoak 425) | %conmsg ---14Construction Level(from $1 $+ ):1 %con-percent $+ % to level $2 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededoak,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b) $+ 14) 14(Butler Price:6 $bytes(%butler$,b) $+ 14)1--- | halt }
}
else { echo -a 4Syntax Error in6 $script $+ 4. Try: 7/con Level/Exp Goal Level4. For example /con 92 127 }
}
on $
:text:/^[@!.]con(struct)?(ion)? /Si:#: {
setvar {
var %i 100
while %i <= 127 {
set $+($(%,),lvl) %i $r(1,999999999)
inc %i
}
}
inc -u3 %spam. [ $+ [ $nick ] ]
if (%spam. [ $+ [ $nick ] ] isnum 3-20 ) { notice $nick Fuck you. Don't abuse my scripts faggot. | set %ignore. [ $+ [ $address($nick,2) ] ] | .timer 1 180 /unset %ignore. [ $+ [ $address($nick,2) ] ] | halt }
elseif ($address($nick,2) == %ignore. [ $+ [ $address ] ] ) { halt }
if ($1 == @con ) { var %conmsg msg $chan }
else { var %conmsg notice $nick }
if ($2 !isnum || $3 !isnum ) { halt }
if (!$2 || !$3 ) { notice $nick Syntax Error: (.!@)con(struction) Level/Exp Goal Level | halt }
if ($2 >= 1 ) && ($3 <= 127 ) {
if ($2 >= $3 ) && ($2 <= 127 ) { notice $nick You must specify a level greater than your current! | halt }
var %needed $calc(%lvl [ $+ [ $3 ] ] - %lvl [ $+ [ $2 ] ] ) | var %neededham $ceil($calc(%needed / 50750)) | var %con-percent $ceil($calc(( %lvl [ $+ [ $2 ] ] / %lvl [ $+ [ $3 ] ] )
100)))
if ($2 <= 33 ) { var %neededpl $ceil($calc(%needed / 60)) | var %con-price $calc(%neededpl 175) | var %con-price1 $calc(%neededpl 275) | %conmsg ---14Construction Level(from $2 $+ ):1 %con-percent $+ % to level $3 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededpl,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b) $+ 14)1--- | notice $nick The 12Hammers5- Sacred Clay from the mini-game stealing creations made into Hammers. The 7Planks5- Regular planks from Logs. | halt }
if ($2 isnum 33-127 ) { var %neededoak $ceil($calc(%needed / 120)) | var %butler$ $calc($ceil($calc((%neededoak / 120 )))5000) | var %con-price $calc(%neededoak 375) | var %con-price1 $calc(%neededoak 425) | %conmsg ---14Construction Level(from $2 $+ ):1 %con-percent $+ % to level $3 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededoak,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b) $+ 14) 14(Butler Price:6 $bytes(%butler$,b) $+ 14)1--- | notice $nick The 12Hammers5- Sacred Clay from the mini-game stealing creations made into Hammers. The 7Planks5- Oak planks. The 6Butler Price5- Is the price using a regular butler, not demon. | halt }}
} }
if ($2 > 127) && ($3 <= 127 ) {
if (%lvl [ $+ [ $3 ] ] <= $2 ) { notice $nick You must specify a level or Exp greater than your current! | halt }
var %needed $calc(%lvl [ $+ [ $3 ] ] - $2 ) | var %neededham $ceil($calc(%needed / 50750)) | var %Con-percent $ceil($calc(($2 / %lvl [ $+ [ $3 ] ] )
100))
if ($2 < 18247 ) { var %neededpl $ceil($calc(%needed / 120)) | var %butler$ $calc($ceil($calc((%neededpl / 120 )))5000) | var %con-price $calc(%neededpl 200) | var %con-price1 $calc(%neededpl 300) | %conmsg ---14Construction Level(from $bytes($2,b) Exp):1 %con-percent $+ % to level $3 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededpl,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b) $+ 14)1--- | notice $nick The 12Hammers5- Sacred Clay from the mini-game stealing creations made into Hammers. The 7Planks5- Regular planks from Logs. | halt }
elseif ($2 >= 18247 ) { var %neededoak $ceil($calc(%needed / 120)) | var %butler$ $calc($ceil($calc((%neededoak / 120 )))
5000) | var %con-price $calc(%neededoak 375) | var %con-price1 $calc(%neededoak 425) | %conmsg ---14Construction Level(from $bytes($2,b) Exp):1 %con-percent $+ % to level $3 $+ 14. Exp:4 $bytes(%needed,b) 14(Planks:7 $bytes(%neededoak,b) $+ 14) (Hammers:12 $bytes(%neededham,b) 14) (Price:3 $bytes(%con-price,b) - $bytes(%con-price1,b) $+ 14) 14(Butler Price:6 $bytes(%butler$,b) $+ 14)1--- | notice $nick The 12Hammers5- Sacred Clay from the mini-game stealing creations made into Hammers. The 7Planks5- Oak planks. The 6Butler Price5- Is the price using a regular butler, not demon. | halt }
} } }

 Respond  
Jethro   -  May 31, 2011

Put the setvar alias I provided at the bottom or above the snippet. Then under:> alias con {
setvar
;the rest of code stays the same
$:text:/^[@!.]con(struct)?(ion)? /Si:#: {
setvar
;the rest of code stays the same
Put setvar like so.

 Respond  
poborski   -  May 31, 2011

where would i set up the loop?

 Respond  
Jethro   -  May 28, 2011

No, it's not a replacement of the current alias. It's a separate alias to set all those variables you showed.

 Respond  
poborski   -  May 28, 2011

so that alias would replace the current alias? still reading guides to build stuff so any tip i would like it

 Respond  
Jethro   -  May 27, 2011

Why not use a while loop? That is a heck of a lot of hard work jotting them down from 100 to 127 one by one.

alias setvar {
  var %i 100
  while %i <= 127 {
    set $+($(%,),lvl) %i $r(1,999999999)
    inc %i
  }
}
 Respond  
poborski   -  May 26, 2011

your script is good but i would suggest to rise variables till 200m since its the max from that game

i will post here for ppl who wants it

%lvl100 14391160
%lvl 101 15889109
%lvl 102 17542976
%lvl 103 19368992
%lvl 104 21385073
%lvl 105 23611006
%lvl 106 26068632
%lvl 107 28782069
%lvl 108 31777943
%lvl 109 35085654
%lvl 110 38737661
%lvl 111 42769801
%lvl 112 47221641
%lvl 113 52136869
%lvl 114 57563718
%lvl 115 63555443
%lvl 116 70170840
%lvl 117 77474828
%lvl 118 85539082
%lvl 119 94442737
%lvl 120 104273167
%lvl 121 115126838
%lvl 122 127110260
%lvl 123 140341028
%lvl 124 154948977
%lvl 125 171077457
%lvl 126 188884740
%lvl 127 200000000

ps i changed the value from 127 cuz the result would be 208m and something but since the max from hiscores its only 200m i made 127 has 200m

 Respond  
Riffpilgrim   -  Oct 16, 2009

I always admired this script of yours Zep, a socket would have been easier and simpler but if it does the job it does the job and this is/was unique when you made it. Never got on here to comment tho.
I will say though you could shorten it a little by setting your vars like this:

 var %a blah,%b blah, %c etc

that would reduce alot of the pipes and make it look a little neater. Plus, why did you not script it around that exp alias you made? :p
Goodjob though zep

 Respond  
Korvin   -  Jan 24, 2009

muuuuuuuch easier, use a socket XD

 Respond  
Zeppelin382   -  Jan 15, 2009

Fixed a few bugs and the Butler price.

@Aucun50 I doubt Tip.it incorporates the Butler price and the planks/price with hammers from Stealing Creation.

 Respond  
darkarrow   -  Jan 13, 2009

k

 Respond  
Aucun50   -  Jan 13, 2009
Zeppelin382   -  Jan 13, 2009

Shows you how much experience needed from the levels specified, the oak/regular planks needed, the # of stealing creation hammers needed, an estimated price of planks, and the price of using your (regular, not Demon) butler to gain construction levels.

eg:
---Construction Level(from 50): 55. Exp: 65,303 (Oak Planks: 545) (Hammers: 2 ) (Price: 204,375) (Butler Price: 22,709)---

 Respond  
darkarrow   -  Jan 13, 2009

whats it saposed to do?

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.