Помогите пожалуйста составить алгоритм управления Чертёжником чтобы получился рисунок жирафа в полный рост

uses Drawman;beginfield (13,25);topoint(9, 20);pendown;onvector(2, -15);onvector(0, -5);onvector(-1, 0);onvector(0, 5);onvector(-1, 0);onvector(0, -5);onvector(-1, 0);onvector(0, 5);onvector(-3, 0);onvector(0, -5);onvector(-1, 0);onvector(0, 5);onvector(-1, 0);onvector(0, -5);onvector(-1, 0);onvector(0, 7);onvector(-1, -1);onvector(0, 1);onvector(7, 0);onvector(-1, 13);onvector(0, 3);onvector(1, 1);onvector(0, -1);onvector(1, 1);onvector(0, -1);onvector(3, -1);onvector(0, -1);onvector(-3, -1);penup;topoint (0,0)end.