VENKI00J.m

VENKI00J ; ; 16-MAR-2007

 ;;2.6;PCC+;;NOV 12, 2007

 Q:'DIFQR(19707.12)  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.12,1218,0)

 ;;=4^Know 4 Actions^wcdl1218^^^^^^^^0^80^41.0^42^^1

 ;;^UTILITY(U,$J,19707.12,1219,0)

 ;;=4^Know 4 Actions^wcdl1219^^^^^^^^0^80^42.0^43^^1

 ;;^UTILITY(U,$J,19707.12,1220,0)

 ;;=4^Know 4 Actions^wcdl1220^^^^^^^^0^80^43.0^44^^1

 ;;^UTILITY(U,$J,19707.12,1221,0)

 ;;=4^Know 4 Actions^wcdl1221^^^^^^^^1^80^44.0^45^^1

 ;;^UTILITY(U,$J,19707.12,1222,0)

 ;;=4^Know 4 Actions^wcdl1222^^^^^^^^1^85^45.0^46^^1

 ;;^UTILITY(U,$J,19707.12,1223,0)

 ;;=4^Know 4 Actions^wcdl1223^^^^^^^^1^85^46.0^47^^1

 ;;^UTILITY(U,$J,19707.12,1224,0)

 ;;=4^Know 4 Actions^wcdl1224^^^^^^^^1^85^47.0^48^^1

 ;;^UTILITY(U,$J,19707.12,1225,0)

 ;;=4^Know 4 Actions^wcdl1225^^^^^^^^1^85^48.0^49^^1

 ;;^UTILITY(U,$J,19707.12,1226,0)

 ;;=4^Know 4 Actions^wcdl1226^^^^^^^^1^85^49.0^50^^1

 ;;^UTILITY(U,$J,19707.12,1227,0)

 ;;=4^Know 4 Actions^wcdl1227^^^^^^^^1^90^50.0^51^^1

 ;;^UTILITY(U,$J,19707.12,1228,0)

 ;;=4^Know 4 Actions^wcdl1228^^^^^^^^1^100^51.0^52^^1

 ;;^UTILITY(U,$J,19707.12,1229,0)

 ;;=4^Laughs^wcdl1229^^^^^^^^0^25^1.5^2^^1

 ;;^UTILITY(U,$J,19707.12,1230,0)

 ;;=4^Laughs^wcdl1230^^^^^^^^0^60^2.0^2.5^^1

 ;;^UTILITY(U,$J,19707.12,1231,0)

 ;;=4^Laughs^wcdl1231^^^^^^^^0^75^2.5^3^^1

 ;;^UTILITY(U,$J,19707.12,1232,0)

 ;;=4^Laughs^wcdl1232^^^^^^^^0^90^3.0^3.5^^1

 ;;^UTILITY(U,$J,19707.12,1233,0)

 ;;=4^Laughs^wcdl1233^^^^^^^^0^100^3.5^4^^1

 ;;^UTILITY(U,$J,19707.12,1234,0)

 ;;=4^Laughs^wcdl1234^^^^^^^^0^100^4.0^4.5^^1

 ;;^UTILITY(U,$J,19707.12,1235,0)

 ;;=4^Name 1 Color^wcdl1235^^^^^^^^0^25^26.0^27^^1

 ;;^UTILITY(U,$J,19707.12,1236,0)

 ;;=4^Name 1 Color^wcdl1236^^^^^^^^1^30^27.0^28^^1

 ;;^UTILITY(U,$J,19707.12,1237,0)

 ;;=4^Name 1 Color^wcdl1237^^^^^^^^0^30^28.0^29^^1

 ;;^UTILITY(U,$J,19707.12,1238,0)

 ;;=4^Name 1 Color^wcdl1238^^^^^^^^0^35^29.0^30^^1

 ;;^UTILITY(U,$J,19707.12,1239,0)

 ;;=4^Name 1 Color^wcdl1239^^^^^^^^0^40^30.0^31^^1

 ;;^UTILITY(U,$J,19707.12,1240,0)

 ;;=4^Name 1 Color^wcdl1240^^^^^^^^0^40^31.0^32^^1

 ;;^UTILITY(U,$J,19707.12,1241,0)

 ;;=4^Name 1 Color^wcdl1241^^^^^^^^0^45^32.0^33^^1

 ;;^UTILITY(U,$J,19707.12,1242,0)

 ;;=4^Name 1 Color^wcdl1242^^^^^^^^0^45^33.0^34^^1

 ;;^UTILITY(U,$J,19707.12,1243,0)

 ;;=4^Name 1 Color^wcdl1243^^^^^^^^0^50^34.0^35^^1

 ;;^UTILITY(U,$J,19707.12,1244,0)

 ;;=4^Name 1 Color^wcdl1244^^^^^^^^0^55^35.0^36^^1

 ;;^UTILITY(U,$J,19707.12,1245,0)

 ;;=4^Name 1 Color^wcdl1245^^^^^^^^1^60^36.0^37^^1

 ;;^UTILITY(U,$J,19707.12,1246,0)

 ;;=4^Name 1 Color^wcdl1246^^^^^^^^1^65^37.0^38^^1

 ;;^UTILITY(U,$J,19707.12,1247,0)

 ;;=4^Name 1 Color^wcdl1247^^^^^^^^1^70^38.0^39^^1

 ;;^UTILITY(U,$J,19707.12,1248,0)

 ;;=4^Name 1 Color^wcdl1248^^^^^^^^1^75^39.0^40^^1

 ;;^UTILITY(U,$J,19707.12,1249,0)

 ;;=4^Name 1 Color^wcdl1249^^^^^^^^1^80^40.0^41^^1

 ;;^UTILITY(U,$J,19707.12,1250,0)

 ;;=4^Name 1 Color^wcdl1250^^^^^^^^1^80^41.0^42^^1

 ;;^UTILITY(U,$J,19707.12,1251,0)

 ;;=4^Name 1 Color^wcdl1251^^^^^^^^1^85^42.0^43^^1

 ;;^UTILITY(U,$J,19707.12,1252,0)

 ;;=4^Name 1 Color^wcdl1252^^^^^^^^1^85^43.0^44^^1

 ;;^UTILITY(U,$J,19707.12,1253,0)

 ;;=4^Name 1 Color^wcdl1253^^^^^^^^1^90^44.0^45^^1

 ;;^UTILITY(U,$J,19707.12,1254,0)

 ;;=4^Name 1 Color^wcdl1254^^^^^^^^1^100^45.0^46^^1

 ;;^UTILITY(U,$J,19707.12,1255,0)

 ;;=4^Name 1 Picture^wcdl1255^^^^^^^^1^25^19.0^20^^1

 ;;^UTILITY(U,$J,19707.12,1256,0)

 ;;=4^Name 1 Picture^wcdl1256^^^^^^^^0^50^20.0^21^^1

 ;;^UTILITY(U,$J,19707.12,1257,0)

 ;;=4^Name 1 Picture^wcdl1257^^^^^^^^0^60^21.0^22^^1

 ;;^UTILITY(U,$J,19707.12,1258,0)

 ;;=4^Name 1 Picture^wcdl1258^^^^^^^^0^65^22.0^23^^1

 ;;^UTILITY(U,$J,19707.12,1259,0)

 ;;=4^Name 1 Picture^wcdl1259^^^^^^^^1^70^23.0^24^^1

 ;;^UTILITY(U,$J,19707.12,1260,0)

 ;;=4^Name 1 Picture^wcdl1260^^^^^^^^1^75^24.0^25^^1

 ;;^UTILITY(U,$J,19707.12,1261,0)

 ;;=4^Name 1 Picture^wcdl1261^^^^^^^^1^80^25.0^26^^1

 ;;^UTILITY(U,$J,19707.12,1262,0)

 ;;=4^Name 1 Picture^wcdl1262^^^^^^^^1^85^26.0^27^^1

 ;;^UTILITY(U,$J,19707.12,1263,0)

 ;;=4^Name 1 Picture^wcdl1263^^^^^^^^1^90^27.0^28^^1

 ;;^UTILITY(U,$J,19707.12,1264,0)

 ;;=4^Name 1 Picture^wcdl1264^^^^^^^^1^100^28.0^29^^1

 ;;^UTILITY(U,$J,19707.12,1265,0)

 ;;=4^Name 4 Colors^wcdl1265^^^^^^^^0^25^36.0^37^^1

 ;;^UTILITY(U,$J,19707.12,1266,0)

 ;;=4^Name 4 Colors^wcdl1266^^^^^^^^0^30^37.0^38^^1

 ;;^UTILITY(U,$J,19707.12,1267,0)

 ;;=4^Name 4 Colors^wcdl1267^^^^^^^^0^30^38.0^39^^1

 ;;^UTILITY(U,$J,19707.12,1268,0)

 ;;=4^Name 4 Colors^wcdl1268^^^^^^^^0^35^39.0^40^^1

 ;;^UTILITY(U,$J,19707.12,1269,0)

 ;;=4^Name 4 Colors^wcdl1269^^^^^^^^0^40^40.0^41^^1

 ;;^UTILITY(U,$J,19707.12,1270,0)

 ;;=4^Name 4 Colors^wcdl1270^^^^^^^^0^40^41.0^42^^1

 ;;^UTILITY(U,$J,19707.12,1271,0)

 ;;=4^Name 4 Colors^wcdl1271^^^^^^^^0^45^42.0^43^^1

 ;;^UTILITY(U,$J,19707.12,1272,0)

 ;;=4^Name 4 Colors^wcdl1272^^^^^^^^0^50^43.0^44^^1

 ;;^UTILITY(U,$J,19707.12,1273,0)

 ;;=4^Name 4 Colors^wcdl1273^^^^^^^^0^55^44.0^45^^1

 ;;^UTILITY(U,$J,19707.12,1274,0)

 ;;=4^Name 4 Colors^wcdl1274^^^^^^^^0^60^45.0^46^^1

 ;;^UTILITY(U,$J,19707.12,1275,0)

 ;;=4^Name 4 Colors^wcdl1275^^^^^^^^0^60^46.0^47^^1

 ;;^UTILITY(U,$J,19707.12,1276,0)

 ;;=4^Name 4 Colors^wcdl1276^^^^^^^^0^65^47.0^48^^1

 ;;^UTILITY(U,$J,19707.12,1277,0)

 ;;=4^Name 4 Colors^wcdl1277^^^^^^^^0^70^48.0^49^^1

 ;;^UTILITY(U,$J,19707.12,1278,0)

 ;;=4^Name 4 Colors^wcdl1278^^^^^^^^1^70^49.0^50^^1

 ;;^UTILITY(U,$J,19707.12,1279,0)

 ;;=4^Name 4 Colors^wcdl1279^^^^^^^^1^75^50.0^51^^1

 ;;^UTILITY(U,$J,19707.12,1280,0)

 ;;=4^Name 4 Colors^wcdl1280^^^^^^^^0^80^51.0^52^^1

 ;;^UTILITY(U,$J,19707.12,1281,0)

 ;;=4^Name 4 Colors^wcdl1281^^^^^^^^1^80^52.0^53^^1

 ;;^UTILITY(U,$J,19707.12,1282,0)

 ;;=4^Name 4 Colors^wcdl1282^^^^^^^^1^80^53.0^54^^1

 ;;^UTILITY(U,$J,19707.12,1283,0)

 ;;=4^Name 4 Colors^wcdl1283^^^^^^^^1^85^54.0^55^^1

 ;;^UTILITY(U,$J,19707.12,1284,0)

 ;;=4^Name 4 Colors^wcdl1284^^^^^^^^1^85^55.0^56^^1

 ;;^UTILITY(U,$J,19707.12,1285,0)

 ;;=4^Name 4 Colors^wcdl1285^^^^^^^^1^85^56.0^57^^1

 ;;^UTILITY(U,$J,19707.12,1286,0)

 ;;=4^Name 4 Colors^wcdl1286^^^^^^^^1^90^57.0^58^^1

 ;;^UTILITY(U,$J,19707.12,1287,0)

 ;;=4^Name 4 Colors^wcdl1287^^^^^^^^1^100^58.0^59^^1

 ;;^UTILITY(U,$J,19707.12,1288,0)

 ;;=4^Name 4 Colors^wcdl1288^^^^^^^^1^100^59.0^60^^1

 ;;^UTILITY(U,$J,19707.12,1289,0)

 ;;=4^Name 4 Colors^wcdl1289^^^^^^^^1^100^60.0^61^^1

 ;;^UTILITY(U,$J,19707.12,1290,0)

 ;;=4^Name 4 Colors^wcdl1290^^^^^^^^1^100^61.0^62^^1

 ;;^UTILITY(U,$J,19707.12,1291,0)

 ;;=4^Name 4 Colors^wcdl1291^^^^^^^^1^100^62.0^63^^1

 ;;^UTILITY(U,$J,19707.12,1292,0)

 ;;=4^Name 4 Colors^wcdl1292^^^^^^^^1^100^63.0^64^^1

 ;;^UTILITY(U,$J,19707.12,1293,0)

 ;;=4^Name 4 Pictures^wcdl1293^^^^^^^^1^25^23.0^24^^1

 ;;^UTILITY(U,$J,19707.12,1294,0)

 ;;=4^Name 4 Pictures^wcdl1294^^^^^^^^1^30^24.0^25^^1

 ;;^UTILITY(U,$J,19707.12,1295,0)

 ;;=4^Name 4 Pictures^wcdl1295^^^^^^^^1^35^25.0^26^^1

 ;;^UTILITY(U,$J,19707.12,1296,0)

 ;;=4^Name 4 Pictures^wcdl1296^^^^^^^^1^40^26.0^27^^1

 ;;^UTILITY(U,$J,19707.12,1297,0)

 ;;=4^Name 4 Pictures^wcdl1297^^^^^^^^1^50^27.0^28^^1

 ;;^UTILITY(U,$J,19707.12,1298,0)

 ;;=4^Name 4 Pictures^wcdl1298^^^^^^^^1^60^28.0^29^^1

 ;;^UTILITY(U,$J,19707.12,1299,0)

 ;;=4^Name 4 Pictures^wcdl1299^^^^^^^^1^65^29.0^30^^1

 ;;^UTILITY(U,$J,19707.12,1300,0)

 ;;=4^Name 4 Pictures^wcdl1300^^^^^^^^1^70^30.0^31^^1

 ;;^UTILITY(U,$J,19707.12,1301,0)

 ;;=4^Name 4 Pictures^wcdl1301^^^^^^^^1^75^31.0^32^^1

 ;;^UTILITY(U,$J,19707.12,1302,0)

 ;;=4^Name 4 Pictures^wcdl1302^^^^^^^^1^80^32.0^33^^1

 ;;^UTILITY(U,$J,19707.12,1303,0)

 ;;=4^Name 4 Pictures^wcdl1303^^^^^^^^1^80^33.0^34^^1

 ;;^UTILITY(U,$J,19707.12,1304,0)

 ;;=4^Name 4 Pictures^wcdl1304^^^^^^^^1^85^34.0^35^^1

 ;;^UTILITY(U,$J,19707.12,1305,0)

 ;;=4^Name 4 Pictures^wcdl1305^^^^^^^^1^90^35.0^36^^1

 ;;^UTILITY(U,$J,19707.12,1306,0)

 ;;=4^Name 4 Pictures^wcdl1306^^^^^^^^1^100^36.0^37^^1

VENKI00J  ; ; 16-MAR-2007

 +1       ;;2.6;PCC+;;NOV 12, 2007

 +2        IF 'DIFQR(19707.12)

               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.12,1218,0)

 +2       ;;=4^Know 4 Actions^wcdl1218^^^^^^^^0^80^41.0^42^^1

 +3       ;;^UTILITY(U,$J,19707.12,1219,0)

 +4       ;;=4^Know 4 Actions^wcdl1219^^^^^^^^0^80^42.0^43^^1

 +5       ;;^UTILITY(U,$J,19707.12,1220,0)

 +6       ;;=4^Know 4 Actions^wcdl1220^^^^^^^^0^80^43.0^44^^1

 +7       ;;^UTILITY(U,$J,19707.12,1221,0)

 +8       ;;=4^Know 4 Actions^wcdl1221^^^^^^^^1^80^44.0^45^^1

 +9       ;;^UTILITY(U,$J,19707.12,1222,0)

 +10      ;;=4^Know 4 Actions^wcdl1222^^^^^^^^1^85^45.0^46^^1

 +11      ;;^UTILITY(U,$J,19707.12,1223,0)

 +12      ;;=4^Know 4 Actions^wcdl1223^^^^^^^^1^85^46.0^47^^1

 +13      ;;^UTILITY(U,$J,19707.12,1224,0)

 +14      ;;=4^Know 4 Actions^wcdl1224^^^^^^^^1^85^47.0^48^^1

 +15      ;;^UTILITY(U,$J,19707.12,1225,0)

 +16      ;;=4^Know 4 Actions^wcdl1225^^^^^^^^1^85^48.0^49^^1

 +17      ;;^UTILITY(U,$J,19707.12,1226,0)

 +18      ;;=4^Know 4 Actions^wcdl1226^^^^^^^^1^85^49.0^50^^1

 +19      ;;^UTILITY(U,$J,19707.12,1227,0)

 +20      ;;=4^Know 4 Actions^wcdl1227^^^^^^^^1^90^50.0^51^^1

 +21      ;;^UTILITY(U,$J,19707.12,1228,0)

 +22      ;;=4^Know 4 Actions^wcdl1228^^^^^^^^1^100^51.0^52^^1

 +23      ;;^UTILITY(U,$J,19707.12,1229,0)

 +24      ;;=4^Laughs^wcdl1229^^^^^^^^0^25^1.5^2^^1

 +25      ;;^UTILITY(U,$J,19707.12,1230,0)

 +26      ;;=4^Laughs^wcdl1230^^^^^^^^0^60^2.0^2.5^^1

 +27      ;;^UTILITY(U,$J,19707.12,1231,0)

 +28      ;;=4^Laughs^wcdl1231^^^^^^^^0^75^2.5^3^^1

 +29      ;;^UTILITY(U,$J,19707.12,1232,0)

 +30      ;;=4^Laughs^wcdl1232^^^^^^^^0^90^3.0^3.5^^1

 +31      ;;^UTILITY(U,$J,19707.12,1233,0)

 +32      ;;=4^Laughs^wcdl1233^^^^^^^^0^100^3.5^4^^1

 +33      ;;^UTILITY(U,$J,19707.12,1234,0)

 +34      ;;=4^Laughs^wcdl1234^^^^^^^^0^100^4.0^4.5^^1

 +35      ;;^UTILITY(U,$J,19707.12,1235,0)

 +36      ;;=4^Name 1 Color^wcdl1235^^^^^^^^0^25^26.0^27^^1

 +37      ;;^UTILITY(U,$J,19707.12,1236,0)

 +38      ;;=4^Name 1 Color^wcdl1236^^^^^^^^1^30^27.0^28^^1

 +39      ;;^UTILITY(U,$J,19707.12,1237,0)

 +40      ;;=4^Name 1 Color^wcdl1237^^^^^^^^0^30^28.0^29^^1

 +41      ;;^UTILITY(U,$J,19707.12,1238,0)

 +42      ;;=4^Name 1 Color^wcdl1238^^^^^^^^0^35^29.0^30^^1

 +43      ;;^UTILITY(U,$J,19707.12,1239,0)

 +44      ;;=4^Name 1 Color^wcdl1239^^^^^^^^0^40^30.0^31^^1

 +45      ;;^UTILITY(U,$J,19707.12,1240,0)

 +46      ;;=4^Name 1 Color^wcdl1240^^^^^^^^0^40^31.0^32^^1

 +47      ;;^UTILITY(U,$J,19707.12,1241,0)

 +48      ;;=4^Name 1 Color^wcdl1241^^^^^^^^0^45^32.0^33^^1

 +49      ;;^UTILITY(U,$J,19707.12,1242,0)

 +50      ;;=4^Name 1 Color^wcdl1242^^^^^^^^0^45^33.0^34^^1

 +51      ;;^UTILITY(U,$J,19707.12,1243,0)

 +52      ;;=4^Name 1 Color^wcdl1243^^^^^^^^0^50^34.0^35^^1

 +53      ;;^UTILITY(U,$J,19707.12,1244,0)

 +54      ;;=4^Name 1 Color^wcdl1244^^^^^^^^0^55^35.0^36^^1

 +55      ;;^UTILITY(U,$J,19707.12,1245,0)

 +56      ;;=4^Name 1 Color^wcdl1245^^^^^^^^1^60^36.0^37^^1

 +57      ;;^UTILITY(U,$J,19707.12,1246,0)

 +58      ;;=4^Name 1 Color^wcdl1246^^^^^^^^1^65^37.0^38^^1

 +59      ;;^UTILITY(U,$J,19707.12,1247,0)

 +60      ;;=4^Name 1 Color^wcdl1247^^^^^^^^1^70^38.0^39^^1

 +61      ;;^UTILITY(U,$J,19707.12,1248,0)

 +62      ;;=4^Name 1 Color^wcdl1248^^^^^^^^1^75^39.0^40^^1

 +63      ;;^UTILITY(U,$J,19707.12,1249,0)

 +64      ;;=4^Name 1 Color^wcdl1249^^^^^^^^1^80^40.0^41^^1

 +65      ;;^UTILITY(U,$J,19707.12,1250,0)

 +66      ;;=4^Name 1 Color^wcdl1250^^^^^^^^1^80^41.0^42^^1

 +67      ;;^UTILITY(U,$J,19707.12,1251,0)

 +68      ;;=4^Name 1 Color^wcdl1251^^^^^^^^1^85^42.0^43^^1

 +69      ;;^UTILITY(U,$J,19707.12,1252,0)

 +70      ;;=4^Name 1 Color^wcdl1252^^^^^^^^1^85^43.0^44^^1

 +71      ;;^UTILITY(U,$J,19707.12,1253,0)

 +72      ;;=4^Name 1 Color^wcdl1253^^^^^^^^1^90^44.0^45^^1

 +73      ;;^UTILITY(U,$J,19707.12,1254,0)

 +74      ;;=4^Name 1 Color^wcdl1254^^^^^^^^1^100^45.0^46^^1

 +75      ;;^UTILITY(U,$J,19707.12,1255,0)

 +76      ;;=4^Name 1 Picture^wcdl1255^^^^^^^^1^25^19.0^20^^1

 +77      ;;^UTILITY(U,$J,19707.12,1256,0)

 +78      ;;=4^Name 1 Picture^wcdl1256^^^^^^^^0^50^20.0^21^^1

 +79      ;;^UTILITY(U,$J,19707.12,1257,0)

 +80      ;;=4^Name 1 Picture^wcdl1257^^^^^^^^0^60^21.0^22^^1

 +81      ;;^UTILITY(U,$J,19707.12,1258,0)

 +82      ;;=4^Name 1 Picture^wcdl1258^^^^^^^^0^65^22.0^23^^1

 +83      ;;^UTILITY(U,$J,19707.12,1259,0)

 +84      ;;=4^Name 1 Picture^wcdl1259^^^^^^^^1^70^23.0^24^^1

 +85      ;;^UTILITY(U,$J,19707.12,1260,0)

 +86      ;;=4^Name 1 Picture^wcdl1260^^^^^^^^1^75^24.0^25^^1

 +87      ;;^UTILITY(U,$J,19707.12,1261,0)

 +88      ;;=4^Name 1 Picture^wcdl1261^^^^^^^^1^80^25.0^26^^1

 +89      ;;^UTILITY(U,$J,19707.12,1262,0)

 +90      ;;=4^Name 1 Picture^wcdl1262^^^^^^^^1^85^26.0^27^^1

 +91      ;;^UTILITY(U,$J,19707.12,1263,0)

 +92      ;;=4^Name 1 Picture^wcdl1263^^^^^^^^1^90^27.0^28^^1

 +93      ;;^UTILITY(U,$J,19707.12,1264,0)

 +94      ;;=4^Name 1 Picture^wcdl1264^^^^^^^^1^100^28.0^29^^1

 +95      ;;^UTILITY(U,$J,19707.12,1265,0)

 +96      ;;=4^Name 4 Colors^wcdl1265^^^^^^^^0^25^36.0^37^^1

 +97      ;;^UTILITY(U,$J,19707.12,1266,0)

 +98      ;;=4^Name 4 Colors^wcdl1266^^^^^^^^0^30^37.0^38^^1

 +99      ;;^UTILITY(U,$J,19707.12,1267,0)

 +100     ;;=4^Name 4 Colors^wcdl1267^^^^^^^^0^30^38.0^39^^1

 +101     ;;^UTILITY(U,$J,19707.12,1268,0)

 +102     ;;=4^Name 4 Colors^wcdl1268^^^^^^^^0^35^39.0^40^^1

 +103     ;;^UTILITY(U,$J,19707.12,1269,0)

 +104     ;;=4^Name 4 Colors^wcdl1269^^^^^^^^0^40^40.0^41^^1

 +105     ;;^UTILITY(U,$J,19707.12,1270,0)

 +106     ;;=4^Name 4 Colors^wcdl1270^^^^^^^^0^40^41.0^42^^1

 +107     ;;^UTILITY(U,$J,19707.12,1271,0)

 +108     ;;=4^Name 4 Colors^wcdl1271^^^^^^^^0^45^42.0^43^^1

 +109     ;;^UTILITY(U,$J,19707.12,1272,0)

 +110     ;;=4^Name 4 Colors^wcdl1272^^^^^^^^0^50^43.0^44^^1

 +111     ;;^UTILITY(U,$J,19707.12,1273,0)

 +112     ;;=4^Name 4 Colors^wcdl1273^^^^^^^^0^55^44.0^45^^1

 +113     ;;^UTILITY(U,$J,19707.12,1274,0)

 +114     ;;=4^Name 4 Colors^wcdl1274^^^^^^^^0^60^45.0^46^^1

 +115     ;;^UTILITY(U,$J,19707.12,1275,0)

 +116     ;;=4^Name 4 Colors^wcdl1275^^^^^^^^0^60^46.0^47^^1

 +117     ;;^UTILITY(U,$J,19707.12,1276,0)

 +118     ;;=4^Name 4 Colors^wcdl1276^^^^^^^^0^65^47.0^48^^1

 +119     ;;^UTILITY(U,$J,19707.12,1277,0)

 +120     ;;=4^Name 4 Colors^wcdl1277^^^^^^^^0^70^48.0^49^^1

 +121     ;;^UTILITY(U,$J,19707.12,1278,0)

 +122     ;;=4^Name 4 Colors^wcdl1278^^^^^^^^1^70^49.0^50^^1

 +123     ;;^UTILITY(U,$J,19707.12,1279,0)

 +124     ;;=4^Name 4 Colors^wcdl1279^^^^^^^^1^75^50.0^51^^1

 +125     ;;^UTILITY(U,$J,19707.12,1280,0)

 +126     ;;=4^Name 4 Colors^wcdl1280^^^^^^^^0^80^51.0^52^^1

 +127     ;;^UTILITY(U,$J,19707.12,1281,0)

 +128     ;;=4^Name 4 Colors^wcdl1281^^^^^^^^1^80^52.0^53^^1

 +129     ;;^UTILITY(U,$J,19707.12,1282,0)

 +130     ;;=4^Name 4 Colors^wcdl1282^^^^^^^^1^80^53.0^54^^1

 +131     ;;^UTILITY(U,$J,19707.12,1283,0)

 +132     ;;=4^Name 4 Colors^wcdl1283^^^^^^^^1^85^54.0^55^^1

 +133     ;;^UTILITY(U,$J,19707.12,1284,0)

 +134     ;;=4^Name 4 Colors^wcdl1284^^^^^^^^1^85^55.0^56^^1

 +135     ;;^UTILITY(U,$J,19707.12,1285,0)

 +136     ;;=4^Name 4 Colors^wcdl1285^^^^^^^^1^85^56.0^57^^1

 +137     ;;^UTILITY(U,$J,19707.12,1286,0)

 +138     ;;=4^Name 4 Colors^wcdl1286^^^^^^^^1^90^57.0^58^^1

 +139     ;;^UTILITY(U,$J,19707.12,1287,0)

 +140     ;;=4^Name 4 Colors^wcdl1287^^^^^^^^1^100^58.0^59^^1

 +141     ;;^UTILITY(U,$J,19707.12,1288,0)

 +142     ;;=4^Name 4 Colors^wcdl1288^^^^^^^^1^100^59.0^60^^1

 +143     ;;^UTILITY(U,$J,19707.12,1289,0)

 +144     ;;=4^Name 4 Colors^wcdl1289^^^^^^^^1^100^60.0^61^^1

 +145     ;;^UTILITY(U,$J,19707.12,1290,0)

 +146     ;;=4^Name 4 Colors^wcdl1290^^^^^^^^1^100^61.0^62^^1

 +147     ;;^UTILITY(U,$J,19707.12,1291,0)

 +148     ;;=4^Name 4 Colors^wcdl1291^^^^^^^^1^100^62.0^63^^1

 +149     ;;^UTILITY(U,$J,19707.12,1292,0)

 +150     ;;=4^Name 4 Colors^wcdl1292^^^^^^^^1^100^63.0^64^^1

 +151     ;;^UTILITY(U,$J,19707.12,1293,0)

 +152     ;;=4^Name 4 Pictures^wcdl1293^^^^^^^^1^25^23.0^24^^1

 +153     ;;^UTILITY(U,$J,19707.12,1294,0)

 +154     ;;=4^Name 4 Pictures^wcdl1294^^^^^^^^1^30^24.0^25^^1

 +155     ;;^UTILITY(U,$J,19707.12,1295,0)

 +156     ;;=4^Name 4 Pictures^wcdl1295^^^^^^^^1^35^25.0^26^^1

 +157     ;;^UTILITY(U,$J,19707.12,1296,0)

 +158     ;;=4^Name 4 Pictures^wcdl1296^^^^^^^^1^40^26.0^27^^1

 +159     ;;^UTILITY(U,$J,19707.12,1297,0)

 +160     ;;=4^Name 4 Pictures^wcdl1297^^^^^^^^1^50^27.0^28^^1

 +161     ;;^UTILITY(U,$J,19707.12,1298,0)

 +162     ;;=4^Name 4 Pictures^wcdl1298^^^^^^^^1^60^28.0^29^^1

 +163     ;;^UTILITY(U,$J,19707.12,1299,0)

 +164     ;;=4^Name 4 Pictures^wcdl1299^^^^^^^^1^65^29.0^30^^1

 +165     ;;^UTILITY(U,$J,19707.12,1300,0)

 +166     ;;=4^Name 4 Pictures^wcdl1300^^^^^^^^1^70^30.0^31^^1

 +167     ;;^UTILITY(U,$J,19707.12,1301,0)

 +168     ;;=4^Name 4 Pictures^wcdl1301^^^^^^^^1^75^31.0^32^^1

 +169     ;;^UTILITY(U,$J,19707.12,1302,0)

 +170     ;;=4^Name 4 Pictures^wcdl1302^^^^^^^^1^80^32.0^33^^1

 +171     ;;^UTILITY(U,$J,19707.12,1303,0)

 +172     ;;=4^Name 4 Pictures^wcdl1303^^^^^^^^1^80^33.0^34^^1

 +173     ;;^UTILITY(U,$J,19707.12,1304,0)

 +174     ;;=4^Name 4 Pictures^wcdl1304^^^^^^^^1^85^34.0^35^^1

 +175     ;;^UTILITY(U,$J,19707.12,1305,0)

 +176     ;;=4^Name 4 Pictures^wcdl1305^^^^^^^^1^90^35.0^36^^1

 +177     ;;^UTILITY(U,$J,19707.12,1306,0)

 +178     ;;=4^Name 4 Pictures^wcdl1306^^^^^^^^1^100^36.0^37^^1