Adventure Quest Calculator

By Vengeance on Jul 22, 2007

Okay so Aqstats.com does it 10x better :(

But this is the Very first dialog I made

Just Load it to remotes and right click a channel to load

Input your stats then hit calculate And it's done

menu channel {
  .AQCalc { AQCalc }
}

alias AQCalc {
  dialog -m aqcalc aqcalc
}

dialog AQCalc {
  title "Dialog"
  size -1 -1 260 427
  option pixels notheme
  tab "Basic", 1, 1 157 259 265
  tab "Misc", 2
  radio "X-Guardian?", 3, 135 27 100 20
  text "Level", 4, 10 30 40 15
  edit "Level?", 5, 50 30 60 20
  text "Str", 6, 10 53 40 15
  edit "Str?", 7, 50 55 60 20
  text "Dex", 8, 10 73 40 15
  edit "Dex?", 9, 50 75 60 20
  text "Int", 10, 10 93 40 15
  edit "Int?", 11, 50 95 60 20
  text "End", 12, 135 55 40 15
  edit "End?", 13, 175 55 60 20
  text "Chr", 14, 135 75 40 15
  edit "Chr?", 15, 175 75 60 20
  text "Lck", 16, 135 95 40 15
  edit "Lck?", 17, 175 95 60 20
  button "Calculate", 18, 10 125 235 25
  edit "Magic BTH", 19, 106 252 100 20, tab 1  disable
  text "Magic BTH:", 20, 6 252 100 17, tab 1
  text "Melee Bth:", 21, 7 277 100 17, tab 1
  edit "Melee BTH", 23, 107 277 100 20, tab 1 disable
  text "Range Bth:", 22, 6 302 100 17, tab 1
  edit "Range Bth", 24, 106 302 100 20, tab 1 disable
  text "Magic Bonus:", 25, 7 342 100 17, tab 1
  edit "Magic Bonus", 28, 107 342 100 20, tab 1 disable
  text "Melee Bonus:", 26, 7 367 100 17, tab 1
  edit "Melee Bonus", 29, 107 367 100 20, tab 1 disable
  text "Range Bonus:", 27, 7 392 100 17, tab 1
  edit "Range Bonus", 30, 107 392 100 20, tab 1 disable
  text "Max HP", 35, 6 192 100 20, tab 1
  edit "Max Hp", 37, 106 191 100 20, tab 1 disable
  text "Max MP", 36, 6 219 100 20, tab 1
  edit "Max MP", 38, 106 219 100 20, tab 1 disable
  text "RA: Single Level", 31, 14 195 100 20, tab 2
  edit "Single Min", 34, 113 195 35 20, tab 2 disable
  edit "Single Max", 41, 156 195 35 20, tab 2 disable
  text "RA: Pack Level", 32, 14 219 100 20, tab 2
  edit "Pack Min", 33, 113 219 35 20, tab 2 disable
  edit "Pack Max", 42, 156 219 35 20, tab 2 disable
  text "-", 39, 148 196 5 17, tab 2 tab 2 
  text "-", 40, 148 219 5 17, tab 2 tab 2
  text ".:AQ Calculator:. .:Battousai:. .:Caelestia:.", 43, 10 5 226 20
}

on *:dialog:AQCalc:sclick:18:{
  var %Level $did(5)
  var %Str $did(7)
  var %Dex $did(9)
  var %Int $did(11)
  var %End $did(13)
  var %Chr $did(15)
  var %Luk $did(17)
  did -ra AQCalc 23 $round( $calc( %DEX /16 + %str /16 + %LUK /20 ),0)
  did -ra AQCalc 24 $round( $calc( %DEX /8 + %LUK /20 ),0)
  did -ra AQCalc 19 $round( $calc( %DEX /16 + %INT /16 + %LUK /20 ),0)
  did -ra AQCalc 28 $round( $calc( %int /8 ),0)
  did -ra AQCalc 29 $round( $calc( %str /8 ),0)
  did -ra AQCalc 30 $round( $calc( %str /16 + %dex /16 ),0)
  did -ra AQCalc 38 $round( $calc( 5 * %Level + 0.05 * ( %Level * %int ) + %int + 100),0)
  did -ra AQCalc 37 $round( $calc( 5 * %Level + 0.05 * ( %Level * %End ) + %End + 100),0)
  did -ra AQCalc 34 $round( $calc( 0.70 * %level - 10 ),0)
  did -ra AQCalc 33 $round( $calc( 0.6 * ( %level - 20) ),0)
  did -ra AQCalc 41 $round( $calc( 1.1 * %level + 1 ),0)
  did -ra AQCalc 42 $round( $calc( %level - 20 ),0)
} 

Comments

Sign in to comment.
JUGGERNAUT   -  Jul 24, 2007

Nice!

 Respond  
Vengeance   -  Jul 24, 2007

Sry about that and slow reply

And about x-guardian when you\'re one you get a 10% exp boost wich would affect somethings

Never got around to making that part on this one was there for a just incase :)

And level goes up to 130 and stats go up by 5 points at once

 Respond  
Callison1   -  Jul 24, 2007

I wouldn\'t know how to test how it functions as I would not know what sort of levels are normal, however, the dialog looks very good. One thing that I do not fully understand is the \"X-Guardian?\" radio. I don\'t know what an X-Guardian is, but I did notice that once you check it, you can\'t uncheck, I would recommend using a checkbox so it can be unchecked. Also, correct me if I\'m wrong, but I did not see anything calling upon that object. I saw no \'$did(3)\' or \'did -* 3\'. 5/10

 Respond  
napa182   -  Jul 24, 2007

nice Snippet but i have no idea what Adventure Quest is. lol

 Respond  
Vengeance   -  Jul 24, 2007

Any comment\'s at all would be nice...

 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.