Routine: VEN8I005

VEN8I005 ; IHS/OIT/GIS - DIFROM SUPPLIMENT TO KIDS ;

 ;;2.6;PCC+;**1,3**;APR 03, 2012;Build 24

 Q:'DIFQR(19707.17)  F I=1:2 S X=$T(Q+I) Q:X=""  S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,999) S:$A(Y)=61 Y=$E(Y,2,999) X NO E  S @X=Y

Q Q

 ;;^UTILITY(U,$J,19707.17,163,0)

 ;;=1^Copy Cross^wcdfm163^^^^^^^^1^100^60.0^61^^1

 ;;^UTILITY(U,$J,19707.17,164,0)

 ;;=1^Copy Cross^wcdfm164^^^^^^^^1^100^61.0^62^^1

 ;;^UTILITY(U,$J,19707.17,165,0)

 ;;=1^Copy Cross^wcdfm165^^^^^^^^1^100^62.0^63^^1

 ;;^UTILITY(U,$J,19707.17,166,0)

 ;;=1^Copy Square^wcdfm166^^^^^^^^0^25^56.0^57^^1

 ;;^UTILITY(U,$J,19707.17,167,0)

 ;;=1^Copy Square^wcdfm167^^^^^^^^0^30^57.0^58^^1

 ;;^UTILITY(U,$J,19707.17,168,0)

 ;;=1^Copy Square^wcdfm168^^^^^^^^0^35^58.0^59^^1

 ;;^UTILITY(U,$J,19707.17,169,0)

 ;;=1^Copy Square^wcdfm169^^^^^^^^0^40^59.0^60^^1

 ;;^UTILITY(U,$J,19707.17,170,0)

 ;;=1^Copy Square^wcdfm170^^^^^^^^0^40^60.0^61^^1

 ;;^UTILITY(U,$J,19707.17,171,0)

 ;;=1^Copy Square^wcdfm171^^^^^^^^0^45^61.0^62^^1

 ;;^UTILITY(U,$J,19707.17,172,0)

 ;;=1^Copy Square^wcdfm172^^^^^^^^0^50^62.0^63^^1

 ;;^UTILITY(U,$J,19707.17,173,0)

 ;;=1^Copy Square^wcdfm173^^^^^^^^0^60^63.0^64^^1

 ;;^UTILITY(U,$J,19707.17,174,0)

 ;;=1^Copy Square^wcdfm174^^^^^^^^0^65^64.0^65^^1

 ;;^UTILITY(U,$J,19707.17,175,0)

 ;;=1^Copy Square^wcdfm175^^^^^^^^0^70^65.0^66^^1

 ;;^UTILITY(U,$J,19707.17,176,0)

 ;;=1^Copy Square^wcdfm176^^^^^^^^0^75^66.0^67^^1

 ;;^UTILITY(U,$J,19707.17,177,0)

 ;;=1^Copy Square^wcdfm177^^^^^^^^0^80^67.0^68^^1

 ;;^UTILITY(U,$J,19707.17,178,0)

 ;;=1^Copy Square^wcdfm178^^^^^^^^0^80^68.0^69^^1

 ;;^UTILITY(U,$J,19707.17,179,0)

 ;;=1^Copy Square^wcdfm179^^^^^^^^0^80^69.0^70^^1

 ;;^UTILITY(U,$J,19707.17,180,0)

 ;;=1^Copy Square^wcdfm180^^^^^^^^0^85^70.0^71^^1

 ;;^UTILITY(U,$J,19707.17,181,0)

 ;;=1^Copy Square^wcdfm181^^^^^^^^0^85^71.0^72^^1

 ;;^UTILITY(U,$J,19707.17,182,0)

 ;;=1^Copy Square^wcdfm182^^^^^^^^0^90^72.0^73^^1

 ;;^UTILITY(U,$J,19707.17,183,0)

 ;;=1^Copy Square Demo^wcdfm183^^^^^^^^1^25^48.0^49^^1

 ;;^UTILITY(U,$J,19707.17,184,0)

 ;;=1^Copy Square Demo^wcdfm184^^^^^^^^0^30^49.0^50^^1

 ;;^UTILITY(U,$J,19707.17,185,0)

 ;;=1^Copy Square Demo^wcdfm185^^^^^^^^0^35^50.0^51^^1

 ;;^UTILITY(U,$J,19707.17,186,0)

 ;;=1^Copy Square Demo^wcdfm186^^^^^^^^0^40^51.0^52^^1

 ;;^UTILITY(U,$J,19707.17,187,0)

 ;;=1^Copy Square Demo^wcdfm187^^^^^^^^0^40^52.0^53^^1

 ;;^UTILITY(U,$J,19707.17,188,0)

 ;;=1^Copy Square Demo^wcdfm188^^^^^^^^0^45^53.0^54^^1

 ;;^UTILITY(U,$J,19707.17,189,0)

 ;;=1^Copy Square Demo^wcdfm189^^^^^^^^0^50^54.0^55^^1

 ;;^UTILITY(U,$J,19707.17,190,0)

 ;;=1^Copy Square Demo^wcdfm190^^^^^^^^0^55^55.0^56^^1

 ;;^UTILITY(U,$J,19707.17,191,0)

 ;;=1^Copy Square Demo^wcdfm191^^^^^^^^0^60^56.0^57^^1

 ;;^UTILITY(U,$J,19707.17,192,0)

 ;;=1^Copy Square Demo^wcdfm192^^^^^^^^0^60^57.0^58^^1

 ;;^UTILITY(U,$J,19707.17,193,0)

 ;;=1^Copy Square Demo^wcdfm193^^^^^^^^0^65^58.0^59^^1

 ;;^UTILITY(U,$J,19707.17,194,0)

 ;;=1^Copy Square Demo^wcdfm194^^^^^^^^0^70^59.0^60^^1

 ;;^UTILITY(U,$J,19707.17,195,0)

 ;;=1^Copy Square Demo^wcdfm195^^^^^^^^0^75^60.0^61^^1

 ;;^UTILITY(U,$J,19707.17,196,0)

 ;;=1^Copy Square Demo^wcdfm196^^^^^^^^0^80^61.0^62^^1

 ;;^UTILITY(U,$J,19707.17,197,0)

 ;;=1^Copy Square Demo^wcdfm197^^^^^^^^0^80^62.0^63^^1

 ;;^UTILITY(U,$J,19707.17,198,0)

 ;;=1^Copy Square Demo^wcdfm198^^^^^^^^0^85^63.0^64^^1

 ;;^UTILITY(U,$J,19707.17,199,0)

 ;;=1^Copy Square Demo^wcdfm199^^^^^^^^0^85^64.0^65^^1

 ;;^UTILITY(U,$J,19707.17,200,0)

 ;;=1^Copy Square Demo^wcdfm200^^^^^^^^0^90^65.0^66^^1

 ;;^UTILITY(U,$J,19707.17,201,0)

 ;;=1^Copy Square Demo^wcdfm201^^^^^^^^1^100^66.0^67^^1

 ;;^UTILITY(U,$J,19707.17,202,0)

 ;;=1^Draw Person 3 Parts^wcdfm202^^^^^^^^0^25^40.0^41^^1

 ;;^UTILITY(U,$J,19707.17,203,0)

 ;;=1^Draw Person 3 Parts^wcdfm203^^^^^^^^0^30^41.0^42^^1

 ;;^UTILITY(U,$J,19707.17,204,0)

 ;;=1^Draw Person 3 Parts^wcdfm204^^^^^^^^0^35^42.0^43^^1

 ;;^UTILITY(U,$J,19707.17,205,0)

 ;;=1^Draw Person 3 Parts^wcdfm205^^^^^^^^0^40^43.0^44^^1

 ;;^UTILITY(U,$J,19707.17,206,0)

 ;;=1^Draw Person 3 Parts^wcdfm206^^^^^^^^0^45^44.0^45^^1

 ;;^UTILITY(U,$J,19707.17,207,0)

 ;;=1^Draw Person 3 Parts^wcdfm207^^^^^^^^0^50^45.0^46^^1

 ;;^UTILITY(U,$J,19707.17,208,0)

 ;;=1^Draw Person 3 Parts^wcdfm208^^^^^^^^0^55^46.0^47^^1

 ;;^UTILITY(U,$J,19707.17,209,0)

 ;;=1^Draw Person 3 Parts^wcdfm209^^^^^^^^0^60^47.0^48^^1

 ;;^UTILITY(U,$J,19707.17,210,0)

 ;;=1^Draw Person 3 Parts^wcdfm210^^^^^^^^0^65^48.0^49^^1

 ;;^UTILITY(U,$J,19707.17,211,0)

 ;;=1^Draw Person 3 Parts^wcdfm211^^^^^^^^0^70^49.0^50^^1

 ;;^UTILITY(U,$J,19707.17,212,0)

 ;;=1^Draw Person 3 Parts^wcdfm212^^^^^^^^0^75^50.0^51^^1

 ;;^UTILITY(U,$J,19707.17,213,0)

 ;;=1^Draw Person 3 Parts^wcdfm213^^^^^^^^0^80^51.0^52^^1

 ;;^UTILITY(U,$J,19707.17,214,0)

 ;;=1^Draw Person 3 Parts^wcdfm214^^^^^^^^0^80^52.0^53^^1

 ;;^UTILITY(U,$J,19707.17,215,0)

 ;;=1^Draw Person 3 Parts^wcdfm215^^^^^^^^0^85^53.0^54^^1

 ;;^UTILITY(U,$J,19707.17,216,0)

 ;;=1^Draw Person 3 Parts^wcdfm216^^^^^^^^0^85^54.0^55^^1

 ;;^UTILITY(U,$J,19707.17,217,0)

 ;;=1^Draw Person 3 Parts^wcdfm217^^^^^^^^0^90^55.0^56^^1

 ;;^UTILITY(U,$J,19707.17,218,0)

 ;;=1^Draw Person 3 Parts^wcdfm218^^^^^^^^1^100^56.0^57^^1

 ;;^UTILITY(U,$J,19707.17,219,0)

 ;;=1^Draw Person 6 Parts^wcdfm219^^^^^^^^0^25^48.0^49^^1

 ;;^UTILITY(U,$J,19707.17,220,0)

 ;;=1^Draw Person 6 Parts^wcdfm220^^^^^^^^0^30^49.0^50^^1

 ;;^UTILITY(U,$J,19707.17,221,0)

 ;;=1^Draw Person 6 Parts^wcdfm221^^^^^^^^0^30^50.0^51^^1

 ;;^UTILITY(U,$J,19707.17,222,0)

 ;;=1^Draw Person 6 Parts^wcdfm222^^^^^^^^0^35^51.0^52^^1

 ;;^UTILITY(U,$J,19707.17,223,0)

 ;;=1^Draw Person 6 Parts^wcdfm223^^^^^^^^0^40^52.0^53^^1

 ;;^UTILITY(U,$J,19707.17,224,0)

 ;;=1^Draw Person 6 Parts^wcdfm224^^^^^^^^0^40^53.0^54^^1

 ;;^UTILITY(U,$J,19707.17,225,0)

 ;;=1^Draw Person 6 Parts^wcdfm225^^^^^^^^0^45^54.0^55^^1

 ;;^UTILITY(U,$J,19707.17,226,0)

 ;;=1^Draw Person 6 Parts^wcdfm226^^^^^^^^0^50^55.0^56^^1

 ;;^UTILITY(U,$J,19707.17,227,0)

 ;;=1^Draw Person 6 Parts^wcdfm227^^^^^^^^0^55^56.0^57^^1

 ;;^UTILITY(U,$J,19707.17,228,0)

 ;;=1^Draw Person 6 Parts^wcdfm228^^^^^^^^0^60^57.0^58^^1

 ;;^UTILITY(U,$J,19707.17,229,0)

 ;;=1^Draw Person 6 Parts^wcdfm229^^^^^^^^0^60^58.0^59^^1

 ;;^UTILITY(U,$J,19707.17,230,0)

 ;;=1^Draw Person 6 Parts^wcdfm230^^^^^^^^0^65^59.0^60^^1

 ;;^UTILITY(U,$J,19707.17,231,0)

 ;;=1^Draw Person 6 Parts^wcdfm231^^^^^^^^0^70^60.0^61^^1

 ;;^UTILITY(U,$J,19707.17,232,0)

 ;;=1^Draw Person 6 Parts^wcdfm232^^^^^^^^0^75^61.0^62^^1

 ;;^UTILITY(U,$J,19707.17,233,0)

 ;;=1^Draw Person 6 Parts^wcdfm233^^^^^^^^0^80^62.0^63^^1

 ;;^UTILITY(U,$J,19707.17,234,0)

 ;;=1^Draw Person 6 Parts^wcdfm234^^^^^^^^0^80^63.0^64^^1

 ;;^UTILITY(U,$J,19707.17,235,0)

 ;;=1^Draw Person 6 Parts^wcdfm235^^^^^^^^0^85^64.0^65^^1

 ;;^UTILITY(U,$J,19707.17,236,0)

 ;;=1^Draw Person 6 Parts^wcdfm236^^^^^^^^0^85^65.0^66^^1

 ;;^UTILITY(U,$J,19707.17,237,0)

 ;;=1^Draw Person 6 Parts^wcdfm237^^^^^^^^0^90^66.0^67^^1

 ;;^UTILITY(U,$J,19707.17,238,0)

 ;;=1^Draw Person 6 Parts^wcdfm238^^^^^^^^0^100^67.0^68^^1

 ;;^UTILITY(U,$J,19707.17,239,0)

 ;;=1^Draw Person 6 Parts^wcdfm239^^^^^^^^0^100^68.0^69^^1

 ;;^UTILITY(U,$J,19707.17,240,0)

 ;;=1^Draw Person 6 Parts^wcdfm240^^^^^^^^0^100^69.0^70^^1

 ;;^UTILITY(U,$J,19707.17,241,0)

 ;;=1^Draw Person 6 Parts^wcdfm241^^^^^^^^0^100^70.0^71^^1

 ;;^UTILITY(U,$J,19707.17,242,0)

 ;;=1^Draw Person 6 Parts^wcdfm242^^^^^^^^0^100^71.0^72^^1

 ;;^UTILITY(U,$J,19707.17,243,0)

 ;;=1^Draw Person 6 Parts^wcdfm243^^^^^^^^0^100^72.0^73^^1

 ;;^UTILITY(U,$J,19707.17,244,0)

 ;;=1^Dumps Raisin^wcdfm244^^^^^^^^0^25^13.0^13.5^^1

 ;;^UTILITY(U,$J,19707.17,245,0)

 ;;=1^Dumps Raisin^wcdfm245^^^^^^^^0^30^13.5^14^^1

 ;;^UTILITY(U,$J,19707.17,246,0)

 ;;=1^Dumps Raisin^wcdfm246^^^^^^^^0^40^14.0^14.5^^1

 ;;^UTILITY(U,$J,19707.17,247,0)

 ;;=1^Dumps Raisin^wcdfm247^^^^^^^^0^50^14.5^15^^1

 ;;^UTILITY(U,$J,19707.17,248,0)

 ;;=1^Dumps Raisin^wcdfm248^^^^^^^^0^60^15.0^15.5^^1

 ;;^UTILITY(U,$J,19707.17,249,0)

 ;;=1^Dumps Raisin^wcdfm249^^^^^^^^0^70^15.5^16^^1

VEN8I005  ; IHS/OIT/GIS - DIFROM SUPPLIMENT TO KIDS ;

 +1       ;;2.6;PCC+;**1,3**;APR 03, 2012;Build 24

 +2        IF 'DIFQR(19707.17)

               QUIT

           FOR I=1:2

               SET X=$TEXT(Q+I)

               IF X=""

                   QUIT

               SET Y=$EXTRACT($TEXT(Q+I+1),4,999)

               SET X=$EXTRACT(X,4,999)

               IF $ASCII(Y)=126

                   SET I=I+1

                   SET Y=$EXTRACT(Y,2,999)_$EXTRACT($TEXT(Q+I+1),5,999)

               IF $ASCII(Y)=61

                   SET Y=$EXTRACT(Y,2,999)

               XECUTE NO

              IF '$TEST

                   SET @X=Y

Q          QUIT

 +1       ;;^UTILITY(U,$J,19707.17,163,0)

 +2       ;;=1^Copy Cross^wcdfm163^^^^^^^^1^100^60.0^61^^1

 +3       ;;^UTILITY(U,$J,19707.17,164,0)

 +4       ;;=1^Copy Cross^wcdfm164^^^^^^^^1^100^61.0^62^^1

 +5       ;;^UTILITY(U,$J,19707.17,165,0)

 +6       ;;=1^Copy Cross^wcdfm165^^^^^^^^1^100^62.0^63^^1

 +7       ;;^UTILITY(U,$J,19707.17,166,0)

 +8       ;;=1^Copy Square^wcdfm166^^^^^^^^0^25^56.0^57^^1

 +9       ;;^UTILITY(U,$J,19707.17,167,0)

 +10      ;;=1^Copy Square^wcdfm167^^^^^^^^0^30^57.0^58^^1

 +11      ;;^UTILITY(U,$J,19707.17,168,0)

 +12      ;;=1^Copy Square^wcdfm168^^^^^^^^0^35^58.0^59^^1

 +13      ;;^UTILITY(U,$J,19707.17,169,0)

 +14      ;;=1^Copy Square^wcdfm169^^^^^^^^0^40^59.0^60^^1

 +15      ;;^UTILITY(U,$J,19707.17,170,0)

 +16      ;;=1^Copy Square^wcdfm170^^^^^^^^0^40^60.0^61^^1

 +17      ;;^UTILITY(U,$J,19707.17,171,0)

 +18      ;;=1^Copy Square^wcdfm171^^^^^^^^0^45^61.0^62^^1

 +19      ;;^UTILITY(U,$J,19707.17,172,0)

 +20      ;;=1^Copy Square^wcdfm172^^^^^^^^0^50^62.0^63^^1

 +21      ;;^UTILITY(U,$J,19707.17,173,0)

 +22      ;;=1^Copy Square^wcdfm173^^^^^^^^0^60^63.0^64^^1

 +23      ;;^UTILITY(U,$J,19707.17,174,0)

 +24      ;;=1^Copy Square^wcdfm174^^^^^^^^0^65^64.0^65^^1

 +25      ;;^UTILITY(U,$J,19707.17,175,0)

 +26      ;;=1^Copy Square^wcdfm175^^^^^^^^0^70^65.0^66^^1

 +27      ;;^UTILITY(U,$J,19707.17,176,0)

 +28      ;;=1^Copy Square^wcdfm176^^^^^^^^0^75^66.0^67^^1

 +29      ;;^UTILITY(U,$J,19707.17,177,0)

 +30      ;;=1^Copy Square^wcdfm177^^^^^^^^0^80^67.0^68^^1

 +31      ;;^UTILITY(U,$J,19707.17,178,0)

 +32      ;;=1^Copy Square^wcdfm178^^^^^^^^0^80^68.0^69^^1

 +33      ;;^UTILITY(U,$J,19707.17,179,0)

 +34      ;;=1^Copy Square^wcdfm179^^^^^^^^0^80^69.0^70^^1

 +35      ;;^UTILITY(U,$J,19707.17,180,0)

 +36      ;;=1^Copy Square^wcdfm180^^^^^^^^0^85^70.0^71^^1

 +37      ;;^UTILITY(U,$J,19707.17,181,0)

 +38      ;;=1^Copy Square^wcdfm181^^^^^^^^0^85^71.0^72^^1

 +39      ;;^UTILITY(U,$J,19707.17,182,0)

 +40      ;;=1^Copy Square^wcdfm182^^^^^^^^0^90^72.0^73^^1

 +41      ;;^UTILITY(U,$J,19707.17,183,0)

 +42      ;;=1^Copy Square Demo^wcdfm183^^^^^^^^1^25^48.0^49^^1

 +43      ;;^UTILITY(U,$J,19707.17,184,0)

 +44      ;;=1^Copy Square Demo^wcdfm184^^^^^^^^0^30^49.0^50^^1

 +45      ;;^UTILITY(U,$J,19707.17,185,0)

 +46      ;;=1^Copy Square Demo^wcdfm185^^^^^^^^0^35^50.0^51^^1

 +47      ;;^UTILITY(U,$J,19707.17,186,0)

 +48      ;;=1^Copy Square Demo^wcdfm186^^^^^^^^0^40^51.0^52^^1

 +49      ;;^UTILITY(U,$J,19707.17,187,0)

 +50      ;;=1^Copy Square Demo^wcdfm187^^^^^^^^0^40^52.0^53^^1

 +51      ;;^UTILITY(U,$J,19707.17,188,0)

 +52      ;;=1^Copy Square Demo^wcdfm188^^^^^^^^0^45^53.0^54^^1

 +53      ;;^UTILITY(U,$J,19707.17,189,0)

 +54      ;;=1^Copy Square Demo^wcdfm189^^^^^^^^0^50^54.0^55^^1

 +55      ;;^UTILITY(U,$J,19707.17,190,0)

 +56      ;;=1^Copy Square Demo^wcdfm190^^^^^^^^0^55^55.0^56^^1

 +57      ;;^UTILITY(U,$J,19707.17,191,0)

 +58      ;;=1^Copy Square Demo^wcdfm191^^^^^^^^0^60^56.0^57^^1

 +59      ;;^UTILITY(U,$J,19707.17,192,0)

 +60      ;;=1^Copy Square Demo^wcdfm192^^^^^^^^0^60^57.0^58^^1

 +61      ;;^UTILITY(U,$J,19707.17,193,0)

 +62      ;;=1^Copy Square Demo^wcdfm193^^^^^^^^0^65^58.0^59^^1

 +63      ;;^UTILITY(U,$J,19707.17,194,0)

 +64      ;;=1^Copy Square Demo^wcdfm194^^^^^^^^0^70^59.0^60^^1

 +65      ;;^UTILITY(U,$J,19707.17,195,0)

 +66      ;;=1^Copy Square Demo^wcdfm195^^^^^^^^0^75^60.0^61^^1

 +67      ;;^UTILITY(U,$J,19707.17,196,0)

 +68      ;;=1^Copy Square Demo^wcdfm196^^^^^^^^0^80^61.0^62^^1

 +69      ;;^UTILITY(U,$J,19707.17,197,0)

 +70      ;;=1^Copy Square Demo^wcdfm197^^^^^^^^0^80^62.0^63^^1

 +71      ;;^UTILITY(U,$J,19707.17,198,0)

 +72      ;;=1^Copy Square Demo^wcdfm198^^^^^^^^0^85^63.0^64^^1

 +73      ;;^UTILITY(U,$J,19707.17,199,0)

 +74      ;;=1^Copy Square Demo^wcdfm199^^^^^^^^0^85^64.0^65^^1

 +75      ;;^UTILITY(U,$J,19707.17,200,0)

 +76      ;;=1^Copy Square Demo^wcdfm200^^^^^^^^0^90^65.0^66^^1

 +77      ;;^UTILITY(U,$J,19707.17,201,0)

 +78      ;;=1^Copy Square Demo^wcdfm201^^^^^^^^1^100^66.0^67^^1

 +79      ;;^UTILITY(U,$J,19707.17,202,0)

 +80      ;;=1^Draw Person 3 Parts^wcdfm202^^^^^^^^0^25^40.0^41^^1

 +81      ;;^UTILITY(U,$J,19707.17,203,0)

 +82      ;;=1^Draw Person 3 Parts^wcdfm203^^^^^^^^0^30^41.0^42^^1

 +83      ;;^UTILITY(U,$J,19707.17,204,0)

 +84      ;;=1^Draw Person 3 Parts^wcdfm204^^^^^^^^0^35^42.0^43^^1

 +85      ;;^UTILITY(U,$J,19707.17,205,0)

 +86      ;;=1^Draw Person 3 Parts^wcdfm205^^^^^^^^0^40^43.0^44^^1

 +87      ;;^UTILITY(U,$J,19707.17,206,0)

 +88      ;;=1^Draw Person 3 Parts^wcdfm206^^^^^^^^0^45^44.0^45^^1

 +89      ;;^UTILITY(U,$J,19707.17,207,0)

 +90      ;;=1^Draw Person 3 Parts^wcdfm207^^^^^^^^0^50^45.0^46^^1

 +91      ;;^UTILITY(U,$J,19707.17,208,0)

 +92      ;;=1^Draw Person 3 Parts^wcdfm208^^^^^^^^0^55^46.0^47^^1

 +93      ;;^UTILITY(U,$J,19707.17,209,0)

 +94      ;;=1^Draw Person 3 Parts^wcdfm209^^^^^^^^0^60^47.0^48^^1

 +95      ;;^UTILITY(U,$J,19707.17,210,0)

 +96      ;;=1^Draw Person 3 Parts^wcdfm210^^^^^^^^0^65^48.0^49^^1

 +97      ;;^UTILITY(U,$J,19707.17,211,0)

 +98      ;;=1^Draw Person 3 Parts^wcdfm211^^^^^^^^0^70^49.0^50^^1

 +99      ;;^UTILITY(U,$J,19707.17,212,0)

 +100     ;;=1^Draw Person 3 Parts^wcdfm212^^^^^^^^0^75^50.0^51^^1

 +101     ;;^UTILITY(U,$J,19707.17,213,0)

 +102     ;;=1^Draw Person 3 Parts^wcdfm213^^^^^^^^0^80^51.0^52^^1

 +103     ;;^UTILITY(U,$J,19707.17,214,0)

 +104     ;;=1^Draw Person 3 Parts^wcdfm214^^^^^^^^0^80^52.0^53^^1

 +105     ;;^UTILITY(U,$J,19707.17,215,0)

 +106     ;;=1^Draw Person 3 Parts^wcdfm215^^^^^^^^0^85^53.0^54^^1

 +107     ;;^UTILITY(U,$J,19707.17,216,0)

 +108     ;;=1^Draw Person 3 Parts^wcdfm216^^^^^^^^0^85^54.0^55^^1

 +109     ;;^UTILITY(U,$J,19707.17,217,0)

 +110     ;;=1^Draw Person 3 Parts^wcdfm217^^^^^^^^0^90^55.0^56^^1

 +111     ;;^UTILITY(U,$J,19707.17,218,0)

 +112     ;;=1^Draw Person 3 Parts^wcdfm218^^^^^^^^1^100^56.0^57^^1

 +113     ;;^UTILITY(U,$J,19707.17,219,0)

 +114     ;;=1^Draw Person 6 Parts^wcdfm219^^^^^^^^0^25^48.0^49^^1

 +115     ;;^UTILITY(U,$J,19707.17,220,0)

 +116     ;;=1^Draw Person 6 Parts^wcdfm220^^^^^^^^0^30^49.0^50^^1

 +117     ;;^UTILITY(U,$J,19707.17,221,0)

 +118     ;;=1^Draw Person 6 Parts^wcdfm221^^^^^^^^0^30^50.0^51^^1

 +119     ;;^UTILITY(U,$J,19707.17,222,0)

 +120     ;;=1^Draw Person 6 Parts^wcdfm222^^^^^^^^0^35^51.0^52^^1

 +121     ;;^UTILITY(U,$J,19707.17,223,0)

 +122     ;;=1^Draw Person 6 Parts^wcdfm223^^^^^^^^0^40^52.0^53^^1

 +123     ;;^UTILITY(U,$J,19707.17,224,0)

 +124     ;;=1^Draw Person 6 Parts^wcdfm224^^^^^^^^0^40^53.0^54^^1

 +125     ;;^UTILITY(U,$J,19707.17,225,0)

 +126     ;;=1^Draw Person 6 Parts^wcdfm225^^^^^^^^0^45^54.0^55^^1

 +127     ;;^UTILITY(U,$J,19707.17,226,0)

 +128     ;;=1^Draw Person 6 Parts^wcdfm226^^^^^^^^0^50^55.0^56^^1

 +129     ;;^UTILITY(U,$J,19707.17,227,0)

 +130     ;;=1^Draw Person 6 Parts^wcdfm227^^^^^^^^0^55^56.0^57^^1

 +131     ;;^UTILITY(U,$J,19707.17,228,0)

 +132     ;;=1^Draw Person 6 Parts^wcdfm228^^^^^^^^0^60^57.0^58^^1

 +133     ;;^UTILITY(U,$J,19707.17,229,0)

 +134     ;;=1^Draw Person 6 Parts^wcdfm229^^^^^^^^0^60^58.0^59^^1

 +135     ;;^UTILITY(U,$J,19707.17,230,0)

 +136     ;;=1^Draw Person 6 Parts^wcdfm230^^^^^^^^0^65^59.0^60^^1

 +137     ;;^UTILITY(U,$J,19707.17,231,0)

 +138     ;;=1^Draw Person 6 Parts^wcdfm231^^^^^^^^0^70^60.0^61^^1

 +139     ;;^UTILITY(U,$J,19707.17,232,0)

 +140     ;;=1^Draw Person 6 Parts^wcdfm232^^^^^^^^0^75^61.0^62^^1

 +141     ;;^UTILITY(U,$J,19707.17,233,0)

 +142     ;;=1^Draw Person 6 Parts^wcdfm233^^^^^^^^0^80^62.0^63^^1

 +143     ;;^UTILITY(U,$J,19707.17,234,0)

 +144     ;;=1^Draw Person 6 Parts^wcdfm234^^^^^^^^0^80^63.0^64^^1

 +145     ;;^UTILITY(U,$J,19707.17,235,0)

 +146     ;;=1^Draw Person 6 Parts^wcdfm235^^^^^^^^0^85^64.0^65^^1

 +147     ;;^UTILITY(U,$J,19707.17,236,0)

 +148     ;;=1^Draw Person 6 Parts^wcdfm236^^^^^^^^0^85^65.0^66^^1

 +149     ;;^UTILITY(U,$J,19707.17,237,0)

 +150     ;;=1^Draw Person 6 Parts^wcdfm237^^^^^^^^0^90^66.0^67^^1

 +151     ;;^UTILITY(U,$J,19707.17,238,0)

 +152     ;;=1^Draw Person 6 Parts^wcdfm238^^^^^^^^0^100^67.0^68^^1

 +153     ;;^UTILITY(U,$J,19707.17,239,0)

 +154     ;;=1^Draw Person 6 Parts^wcdfm239^^^^^^^^0^100^68.0^69^^1

 +155     ;;^UTILITY(U,$J,19707.17,240,0)

 +156     ;;=1^Draw Person 6 Parts^wcdfm240^^^^^^^^0^100^69.0^70^^1

 +157     ;;^UTILITY(U,$J,19707.17,241,0)

 +158     ;;=1^Draw Person 6 Parts^wcdfm241^^^^^^^^0^100^70.0^71^^1

 +159     ;;^UTILITY(U,$J,19707.17,242,0)

 +160     ;;=1^Draw Person 6 Parts^wcdfm242^^^^^^^^0^100^71.0^72^^1

 +161     ;;^UTILITY(U,$J,19707.17,243,0)

 +162     ;;=1^Draw Person 6 Parts^wcdfm243^^^^^^^^0^100^72.0^73^^1

 +163     ;;^UTILITY(U,$J,19707.17,244,0)

 +164     ;;=1^Dumps Raisin^wcdfm244^^^^^^^^0^25^13.0^13.5^^1

 +165     ;;^UTILITY(U,$J,19707.17,245,0)

 +166     ;;=1^Dumps Raisin^wcdfm245^^^^^^^^0^30^13.5^14^^1

 +167     ;;^UTILITY(U,$J,19707.17,246,0)

 +168     ;;=1^Dumps Raisin^wcdfm246^^^^^^^^0^40^14.0^14.5^^1

 +169     ;;^UTILITY(U,$J,19707.17,247,0)

 +170     ;;=1^Dumps Raisin^wcdfm247^^^^^^^^0^50^14.5^15^^1

 +171     ;;^UTILITY(U,$J,19707.17,248,0)

 +172     ;;=1^Dumps Raisin^wcdfm248^^^^^^^^0^60^15.0^15.5^^1

 +173     ;;^UTILITY(U,$J,19707.17,249,0)

 +174     ;;=1^Dumps Raisin^wcdfm249^^^^^^^^0^70^15.5^16^^1

VEN8I005.m