当 Screen1.初始化 时
  调用 Web查看器1.加载URL("https://www.fun123.cn")

当 Web查看器1.页面加载完成 时（网页标题）
  设置 标签_标题.文本 = 网页标题

// 调用JS函数
当 按钮_调用JS.被点击 时
  调用 Web查看器1.执行JavaScript(
    "document.getElementById('result').innerText = 'Hello from App!';"
  )

// 调用JS函数并获取返回值
当 按钮_获取值.被点击 时
  调用 Web查看器1.执行JavaScript(
    "getElementById('input').value"
  )

当 Web查看器1.JavaScript执行完成 时（结果）
  设置 标签_返回值.文本 = 结果

// 在网页中添加回调代码
var script = `
  function callApp(data) {
    // 调用App Inventor的方法
    AppInventor.setWebViewString(JSON.stringify(data));
  }
`;
Web查看器1.执行JavaScript(script)

// App端接收
当 Web查看器1.WebViewString改变 时（新值）
  初始化局部变量 数据 = 调用 字典.JSON转字典(新值)
  设置 标签_回调.文本 = 获取键的值(数据, "message", "")

// App端：拼接支付URL
定义 发起支付宝支付(订单号, 金额)
  初始化局部变量 支付URL = 合并字符串(
    "alipay://alipayclient/?",
    "biz_content=%7B%22out_trade_no%22%3A%22", 订单号, 
    "%22%2C%22total_amount%22%3A%22", 金额,
    "%22%2C%22subject%22%3A%22App%E4%B8%AD%E5%BA%AF%E6%94%AF%E4%BB%98%22%7D",
    "&biz_context=%7B%22sc%22%3A%22tpnull%22%7D"
  )
  
  调用 活动启动器1.启动活动()
    数据URI = 支付URL

// 支付结果回调
当 活动启动器1.活动完成 时（结果）
  初始化局部变量 状态 = 获取键的值(调用 字典.JSON转字典(结果), "resultStatus", "")
  如果 状态 = "9000" 则
    调用 对话框1.显示消息对话框("支付成功", "提示", "确定")

// 生成微信小程序URL Scheme
定义 生成微信小程序链接(页面路径, 参数)
  返回 合并字符串(
    "weixin://dl/business/?",
    "path=", 页面路径,
    "&query=", 参数
  )

当 按钮_获取数据.被点击 时
  调用 Web客户端1.发送GET请求("https://api.example.com/data")

当 Web客户端1.获得文本 时（URL, 响应码, 响应类型, 响应内容）
  如果 响应码 = 200 则
    初始化局部变量 数据 = 调用 字典.JSON转字典(响应内容)
    设置 标签_结果.文本 = 获取键的值(数据, "content", "")

定义 抓取网页数据()
  调用 Web查看器1.执行JavaScript(
    "JSON.stringify({title: document.title, links: Array.from(document.querySelectorAll('a')).map(a => a.href)})"
  )

当 Web查看器1.JavaScript执行完成 时（结果）
  初始化局部变量 数据 = 调用 字典.JSON转字典(结果)
  设置 标签_链接数.文本 = 列表长度(获取键的值(数据, "links", []))

// JS调用App的分享
var shareBtn = document.getElementById('share');
shareBtn.onclick = function() {
  AppInventor.setWebViewString(JSON.stringify({
    action: 'share',
    title: document.title,
    url: window.location.href
  }));
};

当 Web查看器1.WebViewString改变 时（新值）
  初始化局部变量 命令 = 获取键的值(调用 字典.JSON转字典(新值), "action", "")
  
  如果 命令 = "分享" 则
    初始化局部变量 标题 = 获取键的值(调用 字典.JSON转字典(新值), "title", "")
    初始化局部变量 链接 = 获取键的值(调用 字典.JSON转字典(新值), "url", "")
    // 调用系统分享
    调用 短信1.发送短信(链接, "分享链接")