procedurepenuptinatina20x20ytina90lefttina0jiaoforwardtina60MULTIPLY1a3lefttina-198pendowntinabegintina#ffff00tina#ffff00tina0,1,2,3051iforwardtina150slefttina144endtinapenuptinaa20jiao0tinapenuptinatina-300200pendowntinabegintina#ff0000tina#ff0000tina0,1,2,3021iforwardtina600righttina90forwardtina400righttina90endtinaMULTIPLY33sqrt0.998MINUS1MULTIPLY21MULTIPLY1a1a1MULTIPLY1MULTIPLY21MULTIPLY1a1a1COS144DIVIDE1MULTIPLY1441pi180-2001000HelloMULTIPLY33sqrt0.998MINUS1MULTIPLY21MULTIPLY1a1a1MULTIPLY1MULTIPLY21MULTIPLY1a1a1COS144DIVIDE1MULTIPLY1441pi180aDIVIDE1a3MULTIPLY33sqrt0.998MINUS1MULTIPLY21MULTIPLY1a1a1MULTIPLY1MULTIPLY21MULTIPLY1a1a1COS144DIVIDE1MULTIPLY1441pi180-100160121MULTIPLY33sqrt0.998MINUS1MULTIPLY21MULTIPLY1a1a1MULTIPLY1MULTIPLY21MULTIPLY1a1a1COS144DIVIDE1MULTIPLY1441pi180-6012098MULTIPLY33sqrt0.998MINUS1MULTIPLY21MULTIPLY1a1a1MULTIPLY1MULTIPLY21MULTIPLY1a1a1COS144DIVIDE1MULTIPLY1441pi180-606074MULTIPLY33sqrt0.998MINUS1MULTIPLY21MULTIPLY1a1a1MULTIPLY1MULTIPLY21MULTIPLY1a1a1COS144DIVIDE1MULTIPLY1441pi180-1002051#ff0000tina#ff0000tinabackwardtina10