9.8.3 货币换算实例
本例使用WML和WMLScript建立了一个简单的货币换算器，同时也给出了利用WML和WMLScript实现与用户交互的基本方法。
本例有两个程序文件：currency.wml和converter.wmls。前者建立了4个卡片，用于完成货币值和类型的输入、输出；后者负责将输入的货币值转换为指定货币的值，并显示到WAP浏览器上。
Currency.wml文件的程序清单如下：
<?xml version="1.0"?>
<!DOCTYPE wml PUBLIC "-//PHONE.COM//DTD WML 1.1//EN" "http://www.phone.com/dtd/ wml11.dtd">
<wml>
// 初始化卡片
<card id="first" >
<onevent type="onenterforward">
<refresh>
// 刷新变量值，即初始化
<setvar name="startCur" value=""/>
<setvar name="endCur" value=""/>
<setvar name="cur" value=""/>
</refresh>
</onevent>
<p>
<do type="accept" label="conv">
<go href="#destVal"/> // 跳转到destVal卡片
</do>
Currency converter!
Convert from?
// 显示选单，并让用户选择换算的原货币
<select name="startCur">
<option value="USD">USD</option>
<option value="DMark">D-Mark</option>
<option value="Franc">Franc</option>
<option value="Lira">Lira</option>
</select>
</p>
</card>
// 第2个卡片destVal
<card id="destVal">
<p>
<do type="accept" label="dest">
<go href="#valCard"/> 跳转到valCard卡片
</do>
Convert from $(startCur) to:
// 显示选单，并让用户选择换算的目的货币
<select name="endCur">
<option value="USD">USD</option>
<option value="DMark">D-Mark</option>
<option value="Franc">Franc</option>
<option value="Lira">Lira</option>
</select>
</p>
</card>
// 第3个卡片valCard
<card id="valCard">
<onevent type="onenterforward">
<refresh>
// 变量cur和ans刷新，即初始化
<setvar name="cur" value=""/>
<
此新闻共有3页 1 2 3
