Currency Converter (script): Difference between revisions

From Elanthipedia
Jump to navigation Jump to search
mNo edit summary
No edit summary
 
(5 intermediate revisions by the same user not shown)
Line 2: Line 2:
|cat=information
|cat=information
|fe=Genie
|fe=Genie
|auth=Isharon
|auth=[[User:Isharon|Isharon]]
}}
}}
This script converts between the three Elanthian currencies. It also converts from coppers to other denominations. (For example, 12347 equals 1 Platinum, 2 Gold, 3 Silver, 4 Bronze, and 7 Copper Kronars.) This is displayed for each starting currency.
This script converts between the three Elanthian currencies. It also converts from coppers to other denominations. (For example, 12347 equals 1 Platinum, 2 Gold, 3 Silver, 4 Bronze, and 7 Copper Kronars.) This is displayed for each starting currency.
Line 11: Line 11:
<br>
<br>
%1 equals the number (in coppers) that you are starting with. For example, if you wanted to convert from 12347 Kronars to Lirums, you would type {{tt|.curr 12347}}. Then a menu will prompt you to choose Kronars as your starting currency.
%1 equals the number (in coppers) that you are starting with. For example, if you wanted to convert from 12347 Kronars to Lirums, you would type {{tt|.curr 12347}}. Then a menu will prompt you to choose Kronars as your starting currency.

==Changelog==

*'''7/7/2014''': changed rounding


==Script==
==Script==


<pre>evalmath Total %1
<pre>evalmath Total $lastbid
if_1 setvariable Total %1
var Copper 0
var Copper 0
var Bronze 0
var Bronze 0
Line 38: Line 43:
Kronars:
Kronars:


evalmath CKRONARS %1
evalmath CKRONARS %Total
evalmath BKRONARS %1/10
evalmath BKRONARS %Total/10
evalmath SKRONARS %1/100
evalmath SKRONARS %Total/100
evalmath GKRONARS %1/1000
evalmath GKRONARS %Total/1000
evalmath PKRONARS %1/10000
evalmath PKRONARS %Total/10000
evalmath CLIRUMS round(%1*.8)
evalmath CLIRUMS ceiling(%Total*.8)
evalmath BLIRUMS round(%1*.8)/10
evalmath BLIRUMS ceiling(%Total*.8)/10
evalmath SLIRUMS round(%1*.8)/100
evalmath SLIRUMS ceiling(%Total*.8)/100
evalmath GLIRUMS round(%1*.8)/1000
evalmath GLIRUMS ceiling(%Total*.8)/1000
evalmath PLIRUMS round(%1*.8)/10000
evalmath PLIRUMS ceiling(%Total*.8)/10000
evalmath CDOKORAS round(%1*.721)
evalmath CDOKORAS ceiling(%Total*.7216)
evalmath BDOKORAS round(%1*.721)/10
evalmath BDOKORAS ceiling(%Total*.7216)/10
evalmath SDOKORAS round(%1*.721)/100
evalmath SDOKORAS ceiling(%Total*.7216)/100
evalmath GDOKORAS round(%1*.721)/1000
evalmath GDOKORAS ceiling(%Total*.7216)/1000
evalmath PDOKORAS round(%1*.721)/10000
evalmath PDOKORAS ceiling(%Total*.7216)/10000


evalmath Platinum floor(%Total / 10000)
evalmath Platinum floor(%Total / 10000)
Line 60: Line 65:
evalmath Copper %Total-(%Platinum*10000)-(%Gold*1000)-(%Silver*100)-(%Bronze*10)
evalmath Copper %Total-(%Platinum*10000)-(%Gold*1000)-(%Silver*100)-(%Bronze*10)


echo %1 Kronars is equal to:
echo %Total Kronars is equal to:
echo
echo
echo copper Kronars: %CKRONARS
echo copper Kronars: %CKRONARS
Line 84: Line 89:


Lirums:
Lirums:
evalmath CLIRUMS %1
evalmath CLIRUMS %Total
evalmath BLIRUMS %1/10
evalmath BLIRUMS %Total/10
evalmath SLIRUMS %1/100
evalmath SLIRUMS %Total/100
evalmath GLIRUMS %1/1000
evalmath GLIRUMS %Total/1000
evalmath PLIRUMS %1/10000
evalmath PLIRUMS %Total/10000
evalmath CKRONARS round(%1*1.25)
evalmath CKRONARS floor(%Total*1.25)
evalmath BKRONARS round(%1*1.25)/10
evalmath BKRONARS floor(%Total*1.25)/10
evalmath SKRONARS round(%1*1.25)/100
evalmath SKRONARS floor(%Total*1.25)/100
evalmath GKRONARS round(%1*1.25)/1000
evalmath GKRONARS floor(%Total*1.25)/1000
evalmath PKRONARS round(%1*1.25)/10000
evalmath PKRONARS floor(%Total*1.25)/10000
evalmath CDOKORAS round(%1*.902)
evalmath CDOKORAS ceiling(%Total*.902)
evalmath BDOKORAS round(%1*.902)/10
evalmath BDOKORAS ceiling(%Total*.902)/10
evalmath SDOKORAS round(%1*.902)/100
evalmath SDOKORAS ceiling(%Total*.902)/100
evalmath GDOKORAS round(%1*.902)/1000
evalmath GDOKORAS ceiling(%Total*.902)/1000
evalmath PDOKORAS round(%1*.902)/10000
evalmath PDOKORAS ceiling(%Total*.902)/10000


evalmath Platinum floor(%Total / 10000)
evalmath Platinum floor(%Total / 10000)
Line 106: Line 111:
evalmath Copper %Total-(%Platinum*10000)-(%Gold*1000)-(%Silver*100)-(%Bronze*10)
evalmath Copper %Total-(%Platinum*10000)-(%Gold*1000)-(%Silver*100)-(%Bronze*10)


echo %1 Lirums is equal to:
echo %Total Lirums is equal to:
echo
echo
echo copper Lirums: %CLIRUMS
echo copper Lirums: %CLIRUMS
Line 130: Line 135:


Dokoras:
Dokoras:
evalmath CDOKORAS %1
evalmath CDOKORAS %Total
evalmath BDOKORAS %1/10
evalmath BDOKORAS %Total/10
evalmath SDOKORAS %1/100
evalmath SDOKORAS %Total/100
evalmath GDOKORAS %1/1000
evalmath GDOKORAS %Total/1000
evalmath PDOKORAS %1/10000
evalmath PDOKORAS %Total/10000
evalmath CKRONARS round(%1*1.385)
evalmath CKRONARS ceiling(%Total*(1/.7216))
evalmath BKRONARS round(%1*1.385)/10
evalmath BKRONARS ceiling(%Total*(1/.7216))/10
evalmath SKRONARS round(%1*1.385)/100
evalmath SKRONARS ceiling(%Total*(1/.7216))/100
evalmath GKRONARS round(%1*1.385)/1000
evalmath GKRONARS ceiling(%Total*(1/.7216))/1000
evalmath PKRONARS round(%1*1.385)/10000
evalmath PKRONARS ceiling(%Total*(1/.7216))/10000
evalmath CLIRUMS round(%1*1.108)
evalmath CLIRUMS ceiling(%Total*(1/.902))
evalmath BLIRUMS round(%1*1.108)/10
evalmath BLIRUMS ceiling(%Total*(1/.902))/10
evalmath SLIRUMS round(%1*1.108)/100
evalmath SLIRUMS ceiling(%Total*(1/.902))/100
evalmath GLIRUMS round(%1*1.108)/1000
evalmath GLIRUMS ceiling(%Total*(1/.902))/1000
evalmath PLIRUMS round(%1*1.108)/10000
evalmath PLIRUMS ceiling(%Total*(1/.902))/10000


evalmath Platinum floor(%Total / 10000)
evalmath Platinum floor(%Total / 10000)
Line 152: Line 157:
evalmath Copper %Total-(%Platinum*10000)-(%Gold*1000)-(%Silver*100)-(%Bronze*10)
evalmath Copper %Total-(%Platinum*10000)-(%Gold*1000)-(%Silver*100)-(%Bronze*10)


echo %1 Dokoras is equal to
echo %Total Dokoras is equal to
echo
echo
echo copper Dokoras: %CDOKORAS
echo copper Dokoras: %CDOKORAS
Line 175: Line 180:
goto end
goto end


end:
end:</pre>
</pre>

Latest revision as of 18:26, 4 March 2016

Currency Converter (script)
Category information
Front-end Genie
Author Isharon

This script converts between the three Elanthian currencies. It also converts from coppers to other denominations. (For example, 12347 equals 1 Platinum, 2 Gold, 3 Silver, 4 Bronze, and 7 Copper Kronars.) This is displayed for each starting currency.

Syntax

.CURR %1

%1 equals the number (in coppers) that you are starting with. For example, if you wanted to convert from 12347 Kronars to Lirums, you would type .CURR 12347. Then a menu will prompt you to choose Kronars as your starting currency.

Changelog

  • 7/7/2014: changed rounding

Script

evalmath Total $lastbid
if_1 setvariable Total %1
var Copper 0
var Bronze 0
var Silver 0
var Gold 0
var Platinum 0

echo Convert From
echo
echo 1: Kronars
echo
echo 2: Lirums
echo
echo 3: Dokoras
echo
echo Enter Number:

matchre Kronars ^1
matchre Lirums ^2
matchre Dokoras ^3
matchwait

Kronars:

evalmath CKRONARS %Total
evalmath BKRONARS %Total/10
evalmath SKRONARS %Total/100
evalmath GKRONARS %Total/1000
evalmath PKRONARS %Total/10000
evalmath CLIRUMS ceiling(%Total*.8)
evalmath BLIRUMS ceiling(%Total*.8)/10
evalmath SLIRUMS ceiling(%Total*.8)/100
evalmath GLIRUMS ceiling(%Total*.8)/1000
evalmath PLIRUMS ceiling(%Total*.8)/10000
evalmath CDOKORAS ceiling(%Total*.7216)
evalmath BDOKORAS ceiling(%Total*.7216)/10
evalmath SDOKORAS ceiling(%Total*.7216)/100
evalmath GDOKORAS ceiling(%Total*.7216)/1000
evalmath PDOKORAS ceiling(%Total*.7216)/10000

evalmath Platinum floor(%Total / 10000)
evalmath Gold floor((%Total-(%Platinum*10000)) / 1000)
evalmath Silver floor((%Total-(%Platinum*10000)-(%Gold*1000)) / 100)
evalmath Bronze floor((%Total-(%Platinum*10000)-(%Gold*1000)-(%Silver*100)) / 10)
evalmath Copper %Total-(%Platinum*10000)-(%Gold*1000)-(%Silver*100)-(%Bronze*10)

echo %Total Kronars is equal to:
echo
echo copper Kronars: %CKRONARS
echo bronze Kronars: %BKRONARS
echo silver Kronars: %SKRONARS
echo gold Kronars: %GKRONARS
echo platinum Kronars: %PKRONARS
echo Coins: %Platinum Platinum, %Gold Gold, %Silver Silver, %Bronze Bronze, and %Copper Copper Kronars
echo
echo copper Lirums: %CLIRUMS
echo bronze Lirums: %BLIRUMS
echo silver Lirums: %SLIRUMS
echo gold Lirums: %GLIRUMS
echo platinum Lirums: %PLIRUMS
echo
echo copper Dokoras: %CDOKORAS
echo bronze Dokoras: %BDOKORAS
echo silver Dokoras: %SDOKORAS
echo gold Dokoras: %GDOKORAS
echo platinum Dokoras: %PDOKORAS

goto end

Lirums:
evalmath CLIRUMS %Total
evalmath BLIRUMS %Total/10
evalmath SLIRUMS %Total/100
evalmath GLIRUMS %Total/1000
evalmath PLIRUMS %Total/10000
evalmath CKRONARS floor(%Total*1.25)
evalmath BKRONARS floor(%Total*1.25)/10
evalmath SKRONARS floor(%Total*1.25)/100
evalmath GKRONARS floor(%Total*1.25)/1000
evalmath PKRONARS floor(%Total*1.25)/10000
evalmath CDOKORAS ceiling(%Total*.902)
evalmath BDOKORAS ceiling(%Total*.902)/10
evalmath SDOKORAS ceiling(%Total*.902)/100
evalmath GDOKORAS ceiling(%Total*.902)/1000
evalmath PDOKORAS ceiling(%Total*.902)/10000

evalmath Platinum floor(%Total / 10000)
evalmath Gold floor((%Total-(%Platinum*10000)) / 1000)
evalmath Silver floor((%Total-(%Platinum*10000)-(%Gold*1000)) / 100)
evalmath Bronze floor((%Total-(%Platinum*10000)-(%Gold*1000)-(%Silver*100)) / 10)
evalmath Copper %Total-(%Platinum*10000)-(%Gold*1000)-(%Silver*100)-(%Bronze*10)

echo %Total Lirums is equal to:
echo
echo copper Lirums: %CLIRUMS
echo bronze Lirums: %BLIRUMS
echo silver Lirums: %SLIRUMS
echo gold Lirums: %GLIRUMS
echo platinum Lirums: %PLIRUMS
echo Coins: %Platinum Platinum, %Gold Gold, %Silver Silver, %Bronze Bronze, and %Copper Copper Lirums
echo
echo copper Kronars: %CKRONARS
echo bronze Kronars: %BKRONARS
echo silver Kronars: %SKRONARS
echo gold Kronars: %GKRONARS
echo platinum Kronars: %PKRONARS
echo
echo copper Dokoras: %CDOKORAS
echo bronze Dokoras: %BDOKORAS
echo silver Dokoras: %SDOKORAS
echo gold Dokoras: %GDOKORAS
echo platinum Dokoras: %PDOKORAS

goto end

Dokoras:
evalmath CDOKORAS %Total
evalmath BDOKORAS %Total/10
evalmath SDOKORAS %Total/100
evalmath GDOKORAS %Total/1000
evalmath PDOKORAS %Total/10000
evalmath CKRONARS ceiling(%Total*(1/.7216))
evalmath BKRONARS ceiling(%Total*(1/.7216))/10
evalmath SKRONARS ceiling(%Total*(1/.7216))/100
evalmath GKRONARS ceiling(%Total*(1/.7216))/1000
evalmath PKRONARS ceiling(%Total*(1/.7216))/10000
evalmath CLIRUMS ceiling(%Total*(1/.902))
evalmath BLIRUMS ceiling(%Total*(1/.902))/10
evalmath SLIRUMS ceiling(%Total*(1/.902))/100
evalmath GLIRUMS ceiling(%Total*(1/.902))/1000
evalmath PLIRUMS ceiling(%Total*(1/.902))/10000

evalmath Platinum floor(%Total / 10000)
evalmath Gold floor((%Total-(%Platinum*10000)) / 1000)
evalmath Silver floor((%Total-(%Platinum*10000)-(%Gold*1000)) / 100)
evalmath Bronze floor((%Total-(%Platinum*10000)-(%Gold*1000)-(%Silver*100)) / 10)
evalmath Copper %Total-(%Platinum*10000)-(%Gold*1000)-(%Silver*100)-(%Bronze*10)

echo %Total Dokoras is equal to
echo
echo copper Dokoras: %CDOKORAS
echo bronze Dokoras: %BDOKORAS
echo silver Dokoras: %SDOKORAS
echo gold Dokoras: %GDOKORAS
echo platinum Dokoras: %PDOKORAS
echo Coins: %Platinum Platinum, %Gold Gold, %Silver Silver, %Bronze Bronze, and %Copper Copper Dokoras
echo
echo copper Kronars: %CKRONARS
echo bronze Kronars: %BKRONARS
echo silver Kronars: %SKRONARS
echo gold Kronars: %GKRONARS
echo platinum Kronars: %PKRONARS
echo
echo copper Lirums: %CLIRUMS
echo bronze Lirums: %BLIRUMS
echo silver Lirums: %SLIRUMS
echo gold Lirums: %GLIRUMS
echo platinum Lirums: %PLIRUMS

goto end

end: