.子程序 取網頁純文本, 文本型.參數 網址, 文本型
.局部變量 temp_____, 文本型
.局部變量 邏輯, 邏輯型
temp_____ ＝ 到文本 (HTTP讀文件 (網址))邏輯 ＝ 真
.循環判斷首 ()
處理事件 ()
.如果 (尋找文本 (temp_____, “<”, , 假) ＞ 尋找文本 (temp_____, “>”, , 假))
temp_____ ＝ 子文本替換 (temp_____, “>”, , , 1, 真)
.否則
temp_____ ＝ 子文本替換 (temp_____, 取文本中間 (temp_____, 尋找文本 (temp_____, “<”, , 假), 尋找文本 (temp_____, “>”, , 假) － 尋找文本 (temp_____, “<”, , 假)), , , , 假)
.如果結束
.如果真 (尋找文本 (temp_____, “<”, , 假) ＝ -1)
邏輯 ＝ 假
.如果真結束
.循環判斷尾 (邏輯)返回 (temp_____)