home *** CD-ROM | disk | FTP | other *** search
/ Chip Hitware 7 A / CHIP_HITWARE_7A.iso / internet / Webmaster / _SETUP.4 / Group3 / money.jav < prev    next >
Text File  |  1999-06-26  |  9KB  |  227 lines
  1. <!---BeginTitle--->Money Conversion Script <!---BeginJAVHead---><SCRIPT LANGUAGE="JavaScript">
  2. <!-- Hide Script from Old Browsers
  3. /* Script by CompuH@cker
  4.    compuhacker@geocities.com
  5.    http://www.geocities.com/SiliconValley/Vista/8435
  6. */
  7. function roundToPennies(n)
  8. {
  9.    pennies = n * 100;
  10.  
  11.    pennies = Math.round(pennies);
  12.  
  13.    strPennies = "" + pennies;
  14.    len = strPennies.length;
  15.  
  16.    first = strPennies.substring(0, len - 2) + ".";
  17.    last = strPennies.substring(len - 2, len);
  18.  
  19.    if(first == ".")
  20.    {
  21.       first = "0."
  22.    }
  23.  
  24.    if(last.length == 1)
  25.    {
  26.       last += "0";
  27.    }
  28.    return first + last;
  29. }
  30.  
  31. function Compute()
  32. {
  33.    MoneyValue = document.forms['MoneyForm'].elements['MoneyFormIn'].value;
  34.    UnitPlace = document.forms['MoneyForm'].elements['Unit'].selectedIndex;
  35.    Unit2Place = document.forms["MoneyForm"].elements["Unit2"].selectedIndex;
  36.    UnitValue = document.forms['MoneyForm'].elements['Unit'].options[UnitPlace].value;
  37.    Unit2Value = document.forms['MoneyForm'].elements['Unit2'].options[Unit2Place].value;
  38.    UnitName = document.forms['MoneyForm'].elements['Unit'].options[UnitPlace].text;
  39.    Unit2Name = document.forms['MoneyForm'].elements['Unit2'].options[Unit2Place].text;
  40.  
  41.    if(MoneyValue == "")
  42.    window.alert("You must choose an amout to convert");
  43.  
  44.    else
  45.  
  46.    if(UnitValue == "Alert")
  47.    window.alert("You must choose a first currency");
  48.  
  49.    else
  50.  
  51.    if(Unit2Value == "Alert")
  52.    window.alert("You must choose a second currency");
  53.  
  54.    else
  55.    {
  56.       Money = eval(MoneyValue);
  57.  
  58.       if(UnitName == Unit2Name)
  59.       document.forms['0'].elements['MoneyFormOut'].value = roundToPennies(Money);
  60.  
  61.       else
  62.       {
  63.          ToTRL = eval(UnitValue);
  64.          FromTRL = eval(Unit2Value);
  65.  
  66.          TRL = Money * ToTRL;
  67.          Money = TRL * FromTRL;
  68.  
  69.          document.forms['0'].elements['MoneyFormOut'].value = roundToPennies(Money);
  70.      }
  71.    }
  72. }
  73. // -->
  74. </SCRIPT><!---BeginJAVBody---><CENTER>
  75. <H1>Money Converter</H1>
  76. <HR>
  77. <FORM NAME="MoneyForm">
  78. <INPUT TYPE="Text" NAME="MoneyFormIn" SIZE="20">
  79. <SELECT SIZE="1" NAME="Unit">
  80. <OPTION VALUE="Alert" SELECTED>- Choose Currency Unit Below -
  81. <OPTION VALUE="2900.0000">DZD Algerian Dinars
  82. <OPTION VALUE="170000.00">USD American Dollars
  83. <OPTION VALUE="170000.00">ARP Argentinian Pesos
  84. <OPTION VALUE="120000.00">AUD Australian Dollars
  85. <OPTION VALUE="13000.000">ATS Austrian Schillings
  86. <OPTION VALUE="170000.00">BSD Bahamian Dollars
  87. <OPTION VALUE="82000.000">BBD Barbados Dollars
  88. <OPTION VALUE="4400.0000">BEF Belgian Francs
  89. <OPTION VALUE="170000.00">BMD Bermudian Dollars
  90. <OPTION VALUE="150000.00">BRR Brazilian Real
  91. <OPTION VALUE="270000.00">GBP British Pounds
  92. <OPTION VALUE="92.000000">BGL Bulgarian Lev
  93. <OPTION VALUE="120000.00">CAD Canadian Dollars
  94. <OPTION VALUE="400.00000">CLP Chilean Pesos
  95. <OPTION VALUE="20000.000">CNY Chinese Renmimbi
  96. <OPTION VALUE="310000.00">CYP Cyprus Pounds
  97. <OPTION VALUE="4900.0000">CSK Chech Coruna
  98. <OPTION VALUE="24000.000">DKK Danish Croner
  99. <OPTION VALUE="81000.000">NLG Dutch Guilders
  100. <OPTION VALUE="61000.000">XEC Eastern Caribbean Units
  101. <OPTION VALUE="49000.000">EGP Egyptian Pounds
  102. <OPTION VALUE="180000.00">XEU European Currency Units
  103. <OPTION VALUE="120000.00">FJD Fijian Dollars
  104. <OPTION VALUE="30000.000">FIM Finnish Markka
  105. <OPTION VALUE="27000.000">FRF French Francs
  106. <OPTION VALUE="91000.000">DEM German Marks
  107. <OPTION VALUE="54000000.0">XAU Gold Onces (New York)
  108. <OPTION VALUE="580.00000">GRD Greek Drachmas
  109. <OPTION VALUE="21000.000">HKD Hong Kong Dollars
  110. <OPTION VALUE="840.00000">HUF Hungarian Forint
  111. <OPTION VALUE="2300.0000">ISK Icelandic Krona
  112. <OPTION VALUE="4600.0000">INR Indian Rupees
  113. <OPTION VALUE="61.000000">IDR Indonesian Rupiah
  114. <OPTION VALUE="240000.00">IEP Irish Punt
  115. <OPTION VALUE="47000.000">ILS Israeli New Shekels
  116. <OPTION VALUE="93.000000">ITL Italian Lira
  117. <OPTION VALUE="4800.0000">JMD Jamacian Dollars
  118. <OPTION VALUE="1400.0000">JPY Japanese Yen
  119. <OPTION VALUE="230000.00">JOD Jordanian Dinar
  120. <OPTION VALUE="110.00000">LBP Lebanese Pounds
  121. <OPTION VALUE="4400.0000">LUF Luxembourg Francs
  122. <OPTION VALUE="60000.000">MYR Malaysian Ringgit
  123. <OPTION VALUE="21000.000">MXP Mexican New Pesos
  124. <OPTION VALUE="110000.00">NZD New Zealand Dollars
  125. <OPTION VALUE="22000.000">NOK Norwegian Kroner
  126. <OPTION VALUE="4100.0000">PKR Pakistan Rupees
  127. <OPTION VALUE="5600.0000">PHP Philippines Pesos
  128. <OPTION VALUE="68000000.0">XPT Platinum Ounces (New York)
  129. <OPTION VALUE="48000.000">PLZ Polish Zloty
  130. <OPTION VALUE="900.00000">PTE Portuguese Escudo
  131. <OPTION VALUE="22.000000">ROL Romanian Leu
  132. <OPTION VALUE="28.000000">SUR Russian Rubles
  133. <OPTION VALUE="44000.000">SAR Saudi Arabian Riyal
  134. <OPTION VALUE="760000.00">XAG Silver Ounces (New York)
  135. <OPTION VALUE="110000.00">SGD Singapore Dollars
  136. <OPTION VALUE="4800.0000">SKK Slovakian Koruna
  137. <OPTION VALUE="35000.000">ZAR South Afrikan Rand
  138. <OPTION VALUE="180.00000">KRW South Korean Won
  139. <OPTION VALUE="1100.0000">ESP Spanish Pesetas
  140. <OPTION VALUE="230000.00">XDR Special Drawing Right
  141. <OPTION VALUE="1000.0000">SDD Sudanese Dinar
  142. <OPTION VALUE="21000.000">SEK Swedish Krona
  143. <OPTION VALUE="110000.00">CHF Swiss Francs
  144. <OPTION VALUE="5800.0000">TWD Taiwan Dollars
  145. <OPTION VALUE="4900.0000">THB Thai Baht
  146. <OPTION VALUE="27000.000">TTD Trinidad and Tobago Dollars
  147. <OPTION VALUE="1.0000000">TRL Turkish Lira
  148. <OPTION VALUE="330.00000">VEB Venezuelan Bolivar
  149. <OPTION VALUE="130.00000">ZMK Zambian Kwacha
  150. </SELECT>
  151. <HR><INPUT TYPE="Button" VALUE="Compute!" onClick="Compute()">
  152. <HR>
  153. <INPUT TYPE="Text" NAME="MoneyFormOut" SIZE="20">
  154. <SELECT SIZE="1" NAME="Unit2">
  155. <OPTION VALUE="Alert" SELECTED>- Choose Currency Unit Below -
  156. <OPTION VALUE="0.0003500">DZD Algerian Dinars
  157. <OPTION VALUE="0.0000060">USD American Dollars
  158. <OPTION VALUE="0.0000060">ARP Argentinian Pesos
  159. <OPTION VALUE="0.0000081">AUD Australian Dollars
  160. <OPTION VALUE="0.0000770">ATS Austrian Schillings
  161. <OPTION VALUE="0.0000060">BSD Bahamian Dollars
  162. <OPTION VALUE="0.0000120">BBD Barbados Dollars
  163. <OPTION VALUE="0.0002300">BEF Belgian Francs
  164. <OPTION VALUE="0.0000060">BMD Bermudian Dollars
  165. <OPTION VALUE="0.0000066">BRR Brazilian Real
  166. <OPTION VALUE="0.0000038">GBP British Pounds
  167. <OPTION VALUE="0.0110000">BGL Bulgarian Lev
  168. <OPTION VALUE="0.0000084">CAD Canadian Dollars
  169. <OPTION VALUE="0.0025000">CLP Chilean Pesos
  170. <OPTION VALUE="0.0000500">CNY Chinese Renmimbi
  171. <OPTION VALUE="0.0000032">CYP Cyprus Pounds
  172. <OPTION VALUE="0.0002000">CSK Chech Coruna
  173. <OPTION VALUE="0.0000420">DKK Danish Croner
  174. <OPTION VALUE="0.0000120">NLG Dutch Guilders
  175. <OPTION VALUE="0.0000160">XEC Eastern Caribbean Units
  176. <OPTION VALUE="0.0000200">EGP Egyptian Pounds
  177. <OPTION VALUE="0.0000056">XEU European Currency Units
  178. <OPTION VALUE="0.0000087">FJD Fijian Dollars
  179. <OPTION VALUE="0.0000330">FIM Finnish Markka
  180. <OPTION VALUE="0.0000370">FRF French Francs
  181. <OPTION VALUE="0.0000110">DEM German Marks
  182. <OPTION VALUE="0.000000019">XAU Gold Onces (New York)
  183. <OPTION VALUE="0.0017000">GRD Greek Drachmas
  184. <OPTION VALUE="0.0000470">HKD Hong Kong Dollars
  185. <OPTION VALUE="0.0012000">HUF Hungarian Forint
  186. <OPTION VALUE="0.0004400">ISK Icelandic Krona
  187. <OPTION VALUE="0.0002200">INR Indian Rupees
  188. <OPTION VALUE="0.0160000">IDR Indonesian Rupiah
  189. <OPTION VALUE="0.0000041">IEP Irish Punt
  190. <OPTION VALUE="0.0000210">ILS Israeli New Shekels
  191. <OPTION VALUE="0.0110000">ITL Italian Lira
  192. <OPTION VALUE="0.0002100">JMD Jamacian Dollars
  193. <OPTION VALUE="0.0007200">JPY Japanese Yen
  194. <OPTION VALUE="0.0000043">JOD Jordanian Dinar
  195. <OPTION VALUE="0.0093000">LBP Lebanese Pounds
  196. <OPTION VALUE="0.0002300">LUF Luxembourg Francs
  197. <OPTION VALUE="0.0000170">MYR Malaysian Ringgit
  198. <OPTION VALUE="0.0000470">MXP Mexican New Pesos
  199. <OPTION VALUE="0.0000093">NZD New Zealand Dollars
  200. <OPTION VALUE="0.0000460">NOK Norwegian Kroner
  201. <OPTION VALUE="0.0002400">PKR Pakistan Rupees
  202. <OPTION VALUE="0.0001800">PHP Philippines Pesos
  203. <OPTION VALUE="0.000000015">XPT Platinum Ounces (New York)
  204. <OPTION VALUE="0.0000210">PLZ Polish Zloty
  205. <OPTION VALUE="0.0011000">PTE Portuguese Escudo
  206. <OPTION VALUE="0.0440000">ROL Romanian Leu
  207. <OPTION VALUE="0.0350000">SUR Russian Rubles
  208. <OPTION VALUE="0.0000230">SAR Saudi Arabian Riyal
  209. <OPTION VALUE="0.0000013">XAG Silver Ounces (New York)
  210. <OPTION VALUE="0.0000090">SGD Singapore Dollars
  211. <OPTION VALUE="0.0002100">SKK Slovakian Koruna
  212. <OPTION VALUE="0.0000280">ZAR South Afrikan Rand
  213. <OPTION VALUE="0.0054000">KRW South Korean Won
  214. <OPTION VALUE="0.0009300">ESP Spanish Pesetas
  215. <OPTION VALUE="0.0000044">XDR Special Drawing Right
  216. <OPTION VALUE="0.0009700">SDD Sudanese Dinar
  217. <OPTION VALUE="0.0000480">SEK Swedish Krona
  218. <OPTION VALUE="0.0000091">CHF Swiss Francs
  219. <OPTION VALUE="0.0001700">TWD Taiwan Dollars
  220. <OPTION VALUE="0.0002000">THB Thai Baht
  221. <OPTION VALUE="0.0000370">TTD Trinidad and Tobago Dollars
  222. <OPTION VALUE="1.0000000">TRL Turkish Lira
  223. <OPTION VALUE="0.0030000">VEB Venezuelan Bolivar
  224. <OPTION VALUE="0.0080000">ZMK Zambian Kwacha
  225. </SELECT>
  226. </FORM><!--EndJAVBody-->
  227.