2 THERDYN SUBROUTINE 8 CALCULATION SUBROUTINE Skert) Dofine comnon ares and translate date Anslyse user's meseage trarislated from monitor StArt Define some parameters Translating date into,subroutine .Define phase with comroon ar题a <TEf=1?> N Eveluation Celculating CP,5,H,G,BT value Y temperature N Eveluation temperatyre Pha8 escalling phaee？ Y Return Call primting subroutine 图8 to end 图身 Rokuen 4 PRINTING SUBROUTINE Start Translating results into the subroutine with common area Printing in formal menner Prepare data for drawing subroutine Return to THERDYN subroutine ·30·吕 矛的 主 立 移 山七 七。 二叻 主 脚 月峨娜 梦口 图 习 竹 ， 刀乓 典名勺 山 叻 议 工 卜 仍。 八 全性 公 拍 。 功 ·