.版本 2.支援庫 pop3.支援庫 spec.區域性變數 個數.區域性變數 大小.區域性變數 i, 整數型.區域性變數 郵件資訊, 郵件資訊.區域性變數 已接受, 邏輯型已接受 ＝ 假.如果 (連線收信伺服器 (“伺服器地址”, 110, “帳號”, “密碼”, 30000, 3)) .如果真 (獲取郵件資訊 (個數, 大小)) .計次迴圈首 (個數, i) 郵件資訊 ＝ 接收郵件 () .如果真 (郵件資訊.取發件人地址="####@yeah.net") 除錯輸出 (“接收到郵件了”) 除錯輸出 (郵件資訊.取超文字內容 ()) 已接受 ＝ 真 跳出迴圈 () .如果真結束 .計次迴圈尾 () .如果真 (已接受 ＝ 假) 資訊框 (“沒有####@yeah.net發來的任何郵件”, 0, ) .如果真結束 返回 () .如果真結束.否則 資訊框 (“伺服器連線失敗”, 0, ).如果結束