XProfan

 {$clr}
 {$batch copy xprofan-screensaver-v1.exe c:xprofan-screensaver-v1.scr}
/*
WinXP Parameters Information:
Select Saver:	/p hdl&
Setup:		/c:hdl&
Preview:	/s
/p Passes a HWND for the preview
/c Show options dialog
/s Start screen saver
*/
declare resx&,resy&,ex&,mx&,my&,pipe&,appname$,appver$,hdl&
declare picname$;picname$=$tempdir+\xprofanscreensaver.bmp
declare tme&,bmpxx&,bmpyy&
seterrorlevel -1
 $U pipe.pcu = pipe.
randomize
appname$:=XProfan Screensaver;appver$:=V1.0
case (val(substr$($winver,1,.))<5) : _oldos// anti old OS
case pipe.is(xprofan-screensaver) : end// saver is already in use
pipe&:=pipe.create(xprofan-screensaver)// create alreadyInUse blocker

if %parcount>0

    if par$(1)==/p

        hdl&:=val(par$(2))

        if (hdl&)

            _preview hdl&

        endif

    elseif par$(1)==/s

        _main

    elseif mid$(par$(1),1,2)==/c

        _options

    else

        _main

    endif

else

    _main

endif

pipe.close pipe&// remove alreadyInUse blocker
end

proc _oldos

    messagebox Sorry, but +appname$+ +appver$+ requires WindowsXP or higher.,appname$,16
    end

endproc

proc _main

    deflatepic
    resx&:=%maxx// save resoltion into statics
    resy&:=%maxy
    windowstyle ( 80 | 512 )// create black window
    windowtitle appname$
    window 0,0 - 0,0
    cls 0
    showcursor 0
    setwindowpos %hwnd=0,0 - resx&,resy&;-1
    mloadbmp picname$
    bmpxx&:=%bmpx
    bmpyy&:=%bmpy
    settimer 1;waitinput;killtimer// fill %mousexy sysvars and store mousepos into statics
    mx&:=%mousex
    my&:=%mousey
    drawthepic ((resx&/2)-(bmpxx&/2)),((resy&/2)-(bmpyy&/2))
    settimer 500

    whilenot ex&

        waitinput

        ifnot %wmtimer

            ex&+

        else

            case ((%mousex<mx&-5) or (%mousex>mx&+5) or (%mousey<my&-5)  or (%mousey>my&+5) ) : ex&+
            tme&+

            if (tme&==20)//vry 10 secs

                tme&:=0
                drawthepic rnd(resx&-bmpxx&),rnd(resy&-bmpyy&)

            endif

        endif

    wend

    killtimer
    showcursor 1
    removepic

endproc

proc _preview

    parameters h&

endproc

proc _options

    messagebox appname$+ +appver$+ is without any options.,appname$,16

endproc

proc removepic

    assign #1,picname$
    erase #1

endproc

proc drawthepic

    parameters x&,y&
    cls 0
    mcopybmp 0,0 - bmpxx&,bmpyy& > x&,y&;0

endproc

proc deflatepic

    Declare mem#
    Dim mem#,29068
    Clear mem#
    Long mem#,0=1904627010,0,70647808,2621440,11468800,10420224,65536,8,1833959424,185794560,185794560,16777216,0,16973824,218628099,352780309,285868039,135659545,235929606,303562768,370409485,218497048,369754152,470482982,471007283
    Long mem#,100=471072805,555614259,621608990,638386214,588775483,672727080,874053684,170328119,321388549,472186888,238419988,389480454,473301001,640745491,690356244,723779619,874971191,674562109,842530876,993329185,520486973,705495133
    Long mem#,188=688652355,822870107,772997185,722600004,873791579,1008205896,856686683,690290790,958988371,975700039,691077202,1026621523,959709254,891617368,1110638695,1175978047,1092091980,1259929707,1495072884,1545404513,1780351092
    Long mem#,272=1227423867,1109917772,1428947027,1462632524,1110704209,1194786892,1580204117,1463353420,1210646614,1277493355,1495466100,1529086049,1312292980,1278738537,1396637812,1479671913,1731526774,1814691926,441188472,726532106
    Long mem#,352=743047181,460259377,677838857,895877130,695599117,880279562,980942858,913571856,893911082,1146355792,1097138210,1165295633,1279983665,1464205394,1765998696,1733427288,1383268465,1635254350,1903034462,688193646,755302529
    Long mem#,436=990707862,889651341,974323860,1041498254,772079766,906166450,939786413,1360593075,1158217868,1174667435,1409941689,1310130363,1108344997,1511719095,1494810795,1729953972,1512833206,1495728268,1831076013,1764229251
    Long mem#,516=1898578074,1999044743,1732116636,1731657858,2084110491,2000093324,1730412696,1747189922,2082996411,1948713122,1631191230,1815281827,2017001658,1966473383,1275789497,1426456770,1544290499,1293222104,1528299715,1561657538
    Long mem#,596=1511391452,1678508274,1695219915,1763311829,1813774530,1931280605,1763246276,1763115241,1948057842,1897660654,1495662833,1780613319,1814429891,2049245405,2032795845,1815216348,2083913949,2100560072,1830944988,1763770604
    Long mem#,676=2015756529,1914700009,2083782896,1430323431,1867710601,2018115721,1584267440,1986461835,2121662606,2068119723,2101608653,-2110455582,-2076901224,-2094333776,-2043871032,-2076901159,-2043346746,-1858207526,-2077425462
    Long mem#,752=-2009792285,-1942552345,-1824849678,-1808138005,-2075328268,-2008481650,-2056060747,-1888485221,-1941372749,-1958543148,-1790377757,-1706819355,-1671692044,-1705312024,-1504313102,-1754464014,-1688010546,-1569324815
    Long mem#,824=-1536884523,-1486815000,-1485373198,-1401618202,-1250295565,-1267072788,394854645,646447109,864288774,881000455,630784018,714342406,982777878,882114566,514785302,715915272,1167785991,1300955141,1253179435,1504706567
    Long mem#,904=1535508527,1720909915,701694051,736559109,854065157,771227655,905510915,1355808771,1525022729,1659371526,-1920794618,-1400307557,-1517879080,-1383661340,-1232469775,-1165491991,-1147928329,-1114308371,-1013448459
    Long mem#,980=-1030422322,-65289,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,-65281,255,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,1148=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1536,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,768,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,1560=67372032,67375876,67372051,67109907,0,0,0,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,100926464,336856582,320017171,320017171,320017171,1250052,0,0,0,0,0,0,2048,0,0,0,0,0,0,0,0,0,0
    Long mem#,1824=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,117899521,118818567,336860437,320017172,320017171,320017171,67375892,0,0,0,0,0,0,768,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50528513,117901063,353699591
    Long mem#,2088=387192085,370611991,370546198,387388950,101061652,5,0,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50397441,117901059,117901063,421075213,387520793,1229526807,1229539657,387402057,353638167
    Long mem#,2284=263,0,0,0,0,0,9984,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,16842752,50529027,185273095,269488139,421075226,1243158809,1229605450,1229539657,1229539657,353704215,16975623,16843009,0,0,0,0,768,0,0,0
    Long mem#,2500=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50528513,185008899,269488139,437260304,421141018,1246382622,1296911690,1297042765,1246382669,421075274,151718669,50923785,65792,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,2712=0,0,0,0,0,0,0,0,0,0,0,0,0,0,16843008,50529025,269159177,269488144,454761232,522132508,1246450763,-917483954,1338558543,1246384072,437918026,252710928,151587081,16843529,0,0,0,14080,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,2900=0,0,0,0,0,0,0,0,0,0,16777216,50529025,151192323,269486857,286330896,471604251,1463495964,1414813527,-917483435,-909522487,1246777545,471539486,252776722,151654159,50923785,1,0,0,768,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,3072=0,0,0,0,0,0,0,0,0,0,0,16777216,50529027,185139971,269488139,471538449,992815658,1465333535,1465539160,-917483180,-926299703,1464749903,807353431,605169195,168431375,151587081,3,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,3244=0,0,0,0,0,0,0,0,0,0,0,0,16842752,50529027,185273097,286330896,706485275,1010513962,1515739224,-1598638688,-934326956,1338558664,1481264461,1128702369,640170047,168763665,151587082,16779273,0,0,14848,0,0,0,0,0,0
    Long mem#,3392=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50397440,151192323,269486857,454758672,707406364,1480342588,-1600103848,1186914527,-875868341,-875836469,1464649931,1186248609,657604422,253830696,151587343,17369353,1,0,768
    Long mem#,3544=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50528512,151192323,269486859,471538448,992619050,1482179388,-543121318,1471670240,-673722295,-673720104,1263522007,-1262962306,843007600,254158375,151654177,50923785
    Long mem#,3708=1,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50528512,185141507,286330891,471603995,1010511146,1515734332,-524901472,1403052260,-623192241,-656745766,1271977946,-1179142241,1061582772,556148786,168759055
    Long mem#,3880=151587081,1,0,9472,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50528512,185272579,286265360,706485019,1010580266,1515739196,-387931232,1266599141,-623192120,-623191334,1238423770,-1179142312,1131849143,640034879
    Long mem#,4052=252645153,151587082,259,0,768,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50528512,185273091,454037520,706485275,1010580269,1515739223,-387391325,1262927592,-623191856,-606414118,1305991386,-1179015889,1185003961
    Long mem#,4224=640038968,252645670,151587343,259,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50397440,185271043,286265355,706485019,1010580266,1515739196,-387389258,1230550244,-606349104,-606348325,1339546331,-1179157729
    Long mem#,4396=-1581663815,707410032,286331174,151587343,259,0,8704,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50397440,185271043,286330891,471603995,1010580269,-1604822980,-420944160,1294901700,-606348585,-606348325,-925378085
    Long mem#,4568=-1195871971,-1212696392,707411014,286331178,151587345,259,0,768,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,16842752,184746755,286264075,471603995,993733930,-1252501444,-387389211,1293908420,-606348329,-606348325
    Long mem#,4740=-875045925,-1348112053,-1195855944,707476606,286331178,151587088,259,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,16777216,50529027,269486859,471538449,992619050,-531022788,-454498072,-887263045,-606348329
    Long mem#,4912=-606348325,-791094309,-1349097655,-1196445777,472595608,269553947,151587083,257,0,6400,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50528513,185273099,454758416,707406364,-442483657,-974722842,-800350279
    Long mem#,5084=-606348327,-606348325,-791028773,-1349243315,-1347440721,472532652,185602321,50923787,1,0,768,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50528512,185272579,286265355,707402523,-390710230,-991631128,-800481353
    Long mem#,5260=-606348329,-606348325,-673457189,-1718477745,-1347440721,287080111,151720209,16976137,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,16842752,185008899,269486859,471535889,-421511397,-1142627096,-682808667
    Long mem#,5436=-606348325,-606348325,-673457189,-1770972216,-1347440977,287873455,151587600,66313,0,0,3584,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,16777216,50529025,269159177,286330896,-420962277,-1178147612,-682680963
    Long mem#,5612=-606348325,-606348325,-673457189,-1670296632,-1364283748,188721839,50923787,65795,0,0,768,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50528513,185273091,286265355,-387402212,-1178213148,-657777801,-606348325
    Long mem#,5792=-606348325,-656679973,-1774236720,-1667457892,293314222,50529033,257,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,16842752,185139971,185273099,-454762429,-1211964188,-657437840,-606348325,-606348325
    Long mem#,5972=-623125541,2070039248,-1667457892,580295836,16843529,0,0,0,3072,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50528513,185273097,-454761055,-1782987036,-657437901,-623191334,-623125798,-656745766,-1843704361
    Long mem#,6156=-1667457874,1890491548,10,0,0,0,768,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50397184,470221571,-454760256,-1715813148,-674281156,-673720361,-673720361,-673720361,-1843704625,-1667457892,2107415708
    Long mem#,6340=10,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,16777216,1476854529,-454761244,2142225124,-934524630,-926365496,-926365496,-926365496,1846233420,-1667457893,-1768121188,808,0,0,0,3072,0,0,0
    Long mem#,6548=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-1240792320,-454761240,-1766212922,689776959,489233693,454895901,454895901,-2043733221,-1667392358,-1667457904,877,0,0,0,768,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,6780=0,0,0,0,0,0,0,0,0,0,0,0,-533200896,-958077724,-1347240508,1886482557,1903260017,1903260017,1905422705,-1937347727,-1852728164,-1667460721,8844,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,7004=-459275520,-958077724,-1347241278,-1365659729,-1766936914,-1666278250,-1667457892,-1667593072,-1886282596,-1668182129,12948,0,0,0,3584,0,0,0,0,0,0,67371008,67372036,67372036,67372036,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,7160=0,0,0,0,0,-457172224,-993598236,-1296909630,-1347440462,-1347440721,-1364283473,-1667457892,-1667457892,-1886282596,-1869639793,683662,0,0,0,768,0,0,0,0,0,0,352716292,320082964,320017174,320017171,67372051,0,0
    Long mem#,7292=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-455064061,-993605916,-1296911678,-1330466126,-1347440720,-1364217937,-1667453266,-1667457892,-1886282596,-1886417009,2657422,0,0,0,256,0,0,0,0,0,117900033,336925959,387389204,370546199
    Long mem#,7452=370546198,101978899,4,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-454778608,-993736988,-1296909638,-1347374414,-1347440721,-1364283729,-1667457892,-1667457892,-1886285668,-1886417009,57381006,0,0,0,9216,0,0,0,16777216,117637379
    Long mem#,7612=352782087,421075221,387389721,1229539607,1229539657,337057559,1799,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-456736708,-1161640506,-1297108303,-1347768401,-1364283734,-1768116562,-1667851108,-1668247396,-1886416495,-1903259761
    Long mem#,7748=577671055,0,0,0,768,0,0,16777216,50529025,117901063,420483079,421075225,1246382666,1229539657,1229539657,387402057,17237781,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,184549376,-993605984,-1986676286,-1987475057,-2071360887
    Long mem#,7900=-2071690108,-2071755644,-2105244797,1768522345,1768515970,-1887141271,1653051022,3,0,0,256,0,0,50528512,185272579,269488144,437918224,1243487770,1246382666,1296911693,1296715597,424299082,117904665,134284035,65793
    Long mem#,8000=0,0,0,0,0,0,0,0,0,0,0,0,0,0,452984832,-1027291458,-1953655368,-2088533111,-2088533117,-2088533117,-2088533117,1770160771,1768515945,1768515945,-2107020951,-2054189425,9,0,0,10752,0,16777216,151192323,269486859
    Long mem#,8136=286265360,471603995,1260330527,1347308106,-934295216,1330597832,424299082,269490713,151587083,16976137,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1174601728,-1396522045,-1920100951,-2088533111,-2088533117,-2088533117,1768515971
    Long mem#,8260=1768515945,1768515945,1718184297,1768318566,-2020700284,34,0,0,768,0,50528512,185272579,286265355,471535889,522132508,1465331760,1347769428,-909522487,1330694601,525027920,286333980,168431889,50923785,257,0,0,0
    Long mem#,8368=0,0,0,0,0,0,0,0,0,0,-1593114624,-1448295747,-1919576683,-2088531575,-2088533117,1770226563,1768515971,1768515945,1768515945,1717987689,1717986918,-2004385178,2407,0,0,256,16777216,50528513,269159177,286330896,706485275
    Long mem#,8492=1010573101,1463703383,1347835735,-909522608,1347406281,928470862,640031772,252645650,151587338,16843017,0,0,0,0,0,0,0,0,0,0,0,0,0,-1105264640,-1784043079,-1919576683,-2088531571,-2088533117,1770226563,1768515971
    Long mem#,8612=1768515945,1718184297,1717987689,1717986918,-2021497242,2694,0,0,11520,16842752,151192323,269486859,470880528,925510172,1480342588,-1247782312,1297589174,-934426545,1297042888,-1582016438,826226800,556017704,151654159
    Long mem#,8704=17369353,0,0,0,0,0,0,0,0,0,0,0,0,0,-1167064320,-1785353815,-1785358955,-2088531059,-2088533117,1768515945,1768515945,1768515945,1768515945,1717987689,1701144166,1768318565,205444,0,0,768,50528512,185008899,286265360
    Long mem#,8836=706485019,1010510378,1515739196,-522214496,1330267070,-875836469,-926168117,-1214164151,1061580980,304621618,168759073,50923786,1,0,0,0,0,0,0,0,0,0,0,0,0,-1787484669,-1785358935,-1920103027,-2088137331,-2088533117
    Long mem#,8956=1768522627,1768515945,1768515945,1768515945,1717986921,1701144166,1717986917,680294,0,0,256,50528512,269159171,454103056,707402779,1010579242,-1604691880,-438258013,-800499785,-673720361,-791160873,-1183376049
    Long mem#,9044=1181791416,673591872,253829413,151587338,259,0,0,0,0,0,0,0,0,0,0,0,0,-1785299422,-1785358955,-1920100979,-2088137843,-2088533117,1768515945,1768515945,1768515945,1768515945,1717986918,1701144166,1701144165,157181541
    Long mem#,9164=0,0,11776,50529025,269159175,454103312,707406364,1480342588,-1600103848,-521936715,-682667103,-623191334,-673522982,-1197520437,2008332727,657538886,253829414,151587343,265,0,0,0,0,0,0,0,0,0,0,0,671285248,-1785353867
    Long mem#,9292=-1785358955,-1785883243,-1987342963,-2090237053,1768515945,1768515945,1768515945,1717987689,1717986918,1717986918,1701143910,1583637861,32,0,768,50529025,269486855,454761233,992619036,1480342588,-1247782312,-1058674464
    Long mem#,9380=-674739296,-623191334,-656745766,-1516287536,-1581794887,640894534,253830694,151654159,66313,0,0,0,0,0,0,0,0,0,0,0,1863385088,-1785358935,-1785358955,-1785358955,-1953788531,1770226563,1768515945,1768515945,1768515945
    Long mem#,9496=1717987686,1717986918,1701143910,1701143909,1684432229,40,0,256,50529024,269486855,471538449,992815644,1480473660,-526165416,-1209473304,-657437864,-623191334,-623191334,-2126558000,-1212565063,943681697,286336554
    Long mem#,9584=168431377,67849,0,0,0,0,0,0,0,0,0,0,0,1729101824,-1786931857,-1920100971,-1785358955,1869574029,1770226563,1768515945,1768515945,1768515945,1717987686,1717986918,1701143910,1701209701,1600087653,265,0,12032,50528512
    Long mem#,9708=269486859,471538449,992815644,1482112060,-387950504,-1262033176,-623883944,-606348325,-623125541,2066632663,-1212565064,943956407,286403114,168759569,66314,0,0,0,0,0,0,0,0,0,0,0,50331648,-1821415642,-1919576707
    Long mem#,9824=-1919578739,1869574029,1770226571,1768515945,1768515945,1768515945,1717986921,1717986918,1701143910,1701143909,153116260,0,0,768,50528512,269159175,454761232,992619036,1480342587,-438281640,-1579096344,-623424210
    Long mem#,9912=-606348325,-606348325,1897777367,-1179076425,1011267511,287058474,152113425,777,0,0,0,0,0,0,0,0,0,0,0,0,1731332867,-1920110737,-1953789043,1870363531,1768581743,1768515945,1768515945,1768515945,1717986921,1717986918
    Long mem#,10032=1701144166,1600415077,2336,0,0,256,50528512,185273095,454758672,707406364,1044134971,-387402153,-2117998872,-606646482,-606348325,-606348325,1884015575,-1195853671,1014479288,287975978,152047889,777,0,0,0,0,0
    Long mem#,10140=0,0,0,0,0,0,0,251854848,1871540018,-1953789045,1869577083,1785360239,1768515945,1768515945,1768515945,1717986918,1717986918,1701143910,173956959,3,0,0,11776,50397184,185272067,454037520,707402779,1044134957,-387391400
    Long mem#,10256=1891361768,-606614755,-606348325,-606348325,1125634264,-1347440743,782612655,287975978,151719953,777,0,0,0,0,0,0,0,0,0,0,0,0,0,1869029891,-1953796211,1870363515,1785622383,1768515945,1768515945,1768515945,1717986918
    Long mem#,10380=1717986918,1684104550,598111,0,0,0,768,16777216,185271043,269488139,706485019,1010248234,-387587936,-1615345946,-606482357,-606348325,-606348325,776655065,-1347445098,1185724591,286333980,151588880,259,0,0,0,0
    Long mem#,10488=0,0,0,0,0,0,0,0,0,637534208,1871408999,1869574011,1785556847,1768515945,1768515945,1718184297,1717986918,1701209702,677340261,9,0,0,0,256,0,151192321,269486859,471535888,1008478748,-387389258,1470481636,-606351285
    Long mem#,10616=-606348325,-606348325,709875675,-1347447150,2125442991,269553962,50924299,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1869031433,1869574027,1852731247,1768515946,1768515945,1717986921,1717986918,1717921126,50945887,0,0,0,0
    Long mem#,10756=12032,0,50528512,185273095,454103056,1461459995,-454498112,1065466852,-606349490,-606348325,-606348325,499701723,-1364289935,-2120306770,185667896,50923785,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,856294144,1869579879,1852731759
    Long mem#,10892=1768515950,1768515945,1717986921,1717986918,1600087653,800,0,0,0,0,768,0,50397184,185272579,286265355,-1608770799,-454630172,780057030,-606349489,-606348325,-606348325,499701723,-1667457935,-1766871396,151718768
    Long mem#,10992=16974601,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,150994944,-1955764465,1852731758,1768516206,1718184297,1717986918,1717986918,153247588,0,0,0,0,0,256,0,16777216,184746755,269159179,-1238754800,-454761240,510769350,-606349112
    Long mem#,11144=-606348325,-606348325,1271978715,-1667460033,-1364288356,151719793,66307,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1730283776,1903265414,1768517230,1768515945,1717986918,1600546406,2600,0,0,0,0,0,11520,0,0,50397440,185273091
    Long mem#,11304=-532475893,-454761244,1265670596,-606349104,-606348325,-606348325,1255201499,-1667853777,-1768121188,51063446,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,151191552,1835886376,1768844909,1701210473,1717986662,543055718,3
    Long mem#,11440=0,0,0,0,0,768,0,0,16777216,185139971,-442494709,-958077722,1229235641,-606414640,-606348325,-623191077,1305991898,-1667853777,-1667457892,17262486,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1801587203,1768779142,1768515945
    Long mem#,11604=1717986661,50929761,0,0,0,0,0,0,256,0,0,0,50528513,-390190581,-958077724,1227848626,-673720369,-673654824,-673720105,1288689623,-1667460581,-1667457892,616342,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,570621952,1802201906
    Long mem#,11776=1717987689,576807270,10,0,0,0,0,0,0,11776,0,0,0,50397184,-455059449,-1127815964,1244428217,-876033972,-876033848,-926365496,1246546123,-1667470581,-1667457892,51342225,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1801921027
    Long mem#,11952=1717987458,50945633,0,0,0,0,0,0,0,768,0,0,0,50331648,-456744949,-1027283740,692027826,488319259,454761757,488447259,455678747,-1667600849,-1869508207,2452364,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,688586752,677799527
    Long mem#,12132=800,0,0,0,0,0,0,0,256,0,0,0,0,-455035108,-1161509148,1887279537,1903259761,1903260016,1903260017,-2056162959,-1852007570,-1903062639,153644943,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,335806464,387191828,387192340,153234975
    Long mem#,12308=0,0,0,0,0,0,0,0,11520,0,0,0,0,-456933828,-1161640220,-1347440462,-1767205223,-1766941543,-1667851090,-1802464100,-1852007268,-1886417007,258443150,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-921238528,-740502573,-590097453
    Long mem#,12480=283347,0,0,0,0,0,0,0,0,768,0,0,0,50331648,-960250208,-1161640762,-1330466126,-1347440721,-1364283473,-1667457874,-1667457892,-1667457892,-1886417007,678334350,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1292107776,-572662061
    Long mem#,12652=-572662307,1364958,0,0,0,0,0,0,0,0,256,0,0,0,452984832,-960184159,-1162165050,-1296911694,-1347374414,-1347440721,-1364283730,-1667457892,-1667457892,-1886417007,1653051279,9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,67108864
    Long mem#,12824=-572662710,-555819298,1364957,0,0,0,0,0,0,0,0,11520,0,0,0,1006829568,-960052297,-1296382266,-1296911694,-1347440720,-1364283473,-1364283730,-1667457892,-1868784484,-1886417007,1804045967,802,0,0,0,0,0,0,0,0,0
    Long mem#,12968=0,0,0,0,0,0,0,0,-573552124,-572662308,1298653,0,0,0,0,0,0,0,0,768,0,0,0,-1609891840,-974994242,-1313752382,-1347439950,-1431393617,-1667457878,-1667453284,-1667460970,-1852728176,-1886417009,-2054189426,2402,0
    Long mem#,13112=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-800522240,-589505060,1298653,0,0,0,0,0,0,0,0,256,0,0,0,-1592000512,-1195195456,-1986949739,-1987475063,-1987475063,-2071361148,-2088532860,-2105310588,-2107014551,-2090243735,-1936814204
    Long mem#,13280=51062897,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1224998912,-589505335,315612,0,0,0,0,0,0,0,0,11008,0,0,0,-1236924672,-1783053889,-1987474539,-2088533117,-2088533117,-2088533117,-2105375869,1768515970,1768515945,1718184297
    Long mem#,13452=-1903197054,946896276,199441,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-589509866,315607,0,0,0,0,0,0,0,0,768,0,0,0,-1147135232,-1784038981,-2088137331,-2088533117,-2088533117,1768522627,1768515945,1768515945,1768515945
    Long mem#,13624=1717986921,-1887213978,-2122212210,287983264,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-674556160,315612,0,0,0,0,0,0,0,0,256,0,0,0,-1212924925,-1784043095,-2088006251,-2088533117,-2088533117,1768522627,1768515945,1768515945
    Long mem#,13796=1768515945,1717986921,-2107218330,-1734764913,2008328345,203839,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1276313600,1298647,0,0,0,0,0,0,0,0,11008,0,0,0,-1448579045,-1785358935,-1987211883,-2088533117,-2088533117,1768515971
    Long mem#,13964=1768515945,1768515945,1768515945,1717986918,1717986918,2106888066,-1212634219,188238004,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,318767104,313164,0,0,0,0,0,0,0,0,768,0,0,50331648,-1786940630,-1785358955,-1987211883,-2088533117
    Long mem#,14132=-2090237309,1768515971,1768515945,1768515945,1718184297,1717986918,1717986918,-1818459546,-1213420677,273066168,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,267027,0,0,0,0,0,0,0,0,256,0,0,285212672,-1786938768,-1919576683
    Long mem#,14300=-1785885299,-2088533117,1770226563,1768515945,1768515945,1768515945,1718184297,1717986918,1717986918,1854040422,-1431602319,457354168,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,11008,0,0,1728708608,-1786931843
    Long mem#,14472=-1919576683,-1920103027,-2088533111,1770219907,1768515945,1768515945,1768515945,1717986918,1717986918,1717986918,1768318566,-1399489682,289843375,0,50331648,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,768
    Long mem#,14632=0,0,1865550336,-1785358957,-1785358955,-1919576683,-2088531573,1768515971,1768515945,1768515945,1717987689,1717986918,1717986918,1701144166,1717986917,-1399483514,289374639,50331648,638650889,2314,0,0,0,0,0,0
    Long mem#,14736=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,256,0,0,1731404547,-1785365123,-1785358955,-1919576691,-2088531061,1768515971,1768515945,1768515945,1717987689,1717986918,1717986918,1701143909,1768318565,-1431661435,187790745
    Long mem#,14876=252248064,1734816562,457129831,11,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,11008,0,0,1730349568,2104462189,-1785883243,-1919576691,-2088531061,1768515971,1768515945,1768515945,1717987689,1717986918,1717986918
    Long mem#,15036=1701143909,-2106825115,-1431660917,187331499,824576259,1215260469,-1598770027,185678960,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2048,0,0,587792384,-1821939918,-1953793169,-1953789045,-2088006773,1768515971
    Long mem#,15192=1768515945,1768515945,1768515945,1717986918,1717986918,1717986661,-1803129242,-1431660906,185757867,1835476491,-1785496966,-1213222996,1011397815,2833,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,256,0,0,50331648
    Long mem#,15348=1731405322,1869581165,1870367599,-2039510161,1768515946,1768515945,1768515945,1718184297,1717986918,1717986918,-2107218330,-1768519806,-1398101354,641233067,2053596968,-1431732870,-1397838676,-1464223572,186402465
    Long mem#,15424=3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,10752,0,0,0,672072448,1869440819,1870360459,1869574011,1768516202,1768515945,1768515945,1718184297,1717986918,1717986918,-2039912858,-1432971629,-1397838166,1078097302
    Long mem#,15580=-1787137945,-1431661163,-1347442001,-1195855953,1218554033,51062335,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,5888,0,0,0,50331648,1832069135,1869573479,1869573999,1768516206,1768515945,1768515945,1717986921,1717986918
    Long mem#,15736=1717986918,-1820628631,-1431529859,-1397772630,1887075755,-1785365135,-1431655766,-1364284758,-1347440724,-1179010383,708812980,784,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,256,0,0,0,0,672073987,1835887463,-1955631249
    Long mem#,15892=1768517230,1768515945,1768515945,1717986921,1717986918,1902732902,-1768517015,-1364546916,-1397772370,2054847893,-1431661163,-1364546390,-1364284758,-1347638610,-1212565071,2041097400,119946328,0,0,0,0,0,0,0,0
    Long mem#,15992=0,0,0,0,0,67372032,262148,0,0,0,0,10496,0,0,0,0,167968768,1734554147,1869573510,1768582766,1768515945,1718184297,1717986918,1701143910,1903257958,-1432978565,-1364283734,-1431327058,-1786931797,-1431655766,-1364283734
    Long mem#,16116=-1431655766,-1347704406,-1397114439,-1213420372,1134605495,17,0,0,0,0,0,0,0,0,0,0,0,101122816,336860180,320017175,263188,0,0,0,16384,0,0,0,0,0,841484800,1852663659,1768844910,1768515945,1718184297,1717986918,1717659238
    Long mem#,16264=2071687531,-1364558470,-1364283730,-1397772626,-1431721044,-1431524694,-1364283734,-1448432982,-1468435075,-1447773767,-1397969750,-1279805255,831,0,0,0,0,0,0,0,0,0,0,184746753,404031253,1229539914,1229539657
    Long mem#,16372=67573527,0,0,0,256,0,0,0,0,0,251854848,1835741736,1852730989,1768515945,1718183529,1701209702,677339494,-2120713360,-1364552300,-1431392594,-1397772626,-1431655252,-1431524694,-1431655766,2056623786,-1270321089
    Long mem#,16476=-1431655239,-1397773654,-1464357713,824,0,0,0,0,0,0,0,0,0,50528512,269486857,505289242,1296910922,1297043279,186272330,16779523,0,0,10496,0,0,0,0,0,0,841490954,1852665195,1768515945,1718184297,1717986662,690104415
    Long mem#,16616=-1767988929,-1431660931,-1364283730,-1397838162,-1431655252,-1431655764,-1783977302,1064336789,-1196145095,-1431655756,-1431655766,1888857260,785,0,0,0,0,0,0,0,0,16777216,269157123,471535889,1461656604,1347441751
    Long mem#,16720=1330694601,287197770,151587856,259,0,37376,0,0,0,0,0,0,571080704,1802187304,1751738475,1701209449,1583309158,672206370,-1786669754,-1364550507,-1431654742,-1431655766,-1431655766,-1431655766,2106955177,923939394
    Long mem#,16824=-1196132041,-1431393876,-1364283730,255044014,3,0,0,0,0,0,0,0,0,50397440,286329611,522853403,1515739196,-917480611,1347406280,944134475,252776760,16845066,0,256,0,0,0,0,0,0,50331648,1734486025,1701341547,1717986662
    Long mem#,16960=253910881,841355553,-1786938768,-1364552299,-1431655766,-1431655766,-1431655766,-1784042838,843217533,940248081,-1414551433,-1364546902,-1431392594,1127850,0,0,50528256,197387,0,0,0,0,0,185139969,471535888,1128016426
    Long mem#,17064=-1231005096,-883991626,-926168117,1890885707,606483014,134810127,0,10752,0,0,0,0,0,0,0,672073984,1701406562,1600545126,185475618,1731408421,-1786938767,-1364546923,-1431655766,-1431655766,-1448498518,1974048425
    Long mem#,17168=185676354,1175521031,-1414809688,-1431655767,-1397772630,206451,0,0,1058013184,288895807,771,0,0,0,0,269157121,706485008,1480342573,-524901542,-674214986,-673654568,-1263046577,674381687,151654161,1,47616,0,0
    Long mem#,17280=0,0,0,0,0,167968768,1717789224,673735009,841289487,1902602087,-1785358979,-1431655766,-1431655766,-1448498774,2108271017,1887073685,50532392,-1471803133,-1448367189,-1431655766,-1397968978,4168,0,0,2033389824
    Long mem#,17380=-1600083788,203587,0,0,0,0,269485827,706485019,1482177595,-437930336,-623422816,-656745766,-1195949112,843018423,151982374,9,256,0,0,0,0,0,0,0,33554432,1650601737,554641502,1731405834,-1787131033,-1431656023,-1431655766
    Long mem#,17504=-1448498518,-1448498775,-1785353815,288502344,775,-1212926197,-1449808980,-1431655766,-1414747478,9847,0,0,-1381941493,-1212633940,1131444,0,0,0,0,269158147,757734427,1515732027,-521936733,-606646366,-656679973
    Long mem#,17604=-1213901874,944153017,252781606,9,10496,0,0,0,0,0,0,335807488,336860180,724244247,638193186,1835493170,-1433044371,-1431524692,-1448432982,-1448498775,-1448498775,1886754217,50532657,50331648,-1263230927,-1449814613
    Long mem#,17708=-1431655766,-1347638614,51067001,0,50331648,-1196918490,-1195922260,738999,0,0,0,0,269158147,706485009,1482112060,-1092032330,-606548905,-623125541,-1197124656,1014938040,269554218,265,56832,0,0,0,0,0,0,-850441980
    Long mem#,17828=-741092397,1322374099,858990098,-1787859609,-1431656043,-1431655766,-1448498518,-1448498775,-1448498775,826834069,11,822280192,-1464552376,-1448503895,-1431656023,-1398101334,51541419,0,939720704,-1431326857,-1347638100
    Long mem#,17912=733569,184746752,198928,0,0,269158145,706485008,-1606665171,-1209670176,-606482345,-606348325,-1350677545,1015069112,269554232,9,256,0,0,0,0,0,0,-783477760,-572727853,1457315293,1835493160,-1784113811,-1431655767
    Long mem#,18024=-1431655766,-1448498774,-1448498775,2091493545,171210101,0,1208681216,1973990580,-1448510059,-1431721559,-1431655766,189180076,0,1880096768,-1431521112,2074782382,2611,1883185920,186402464,0,0,185008384,471535632
    Long mem#,18116=-1287902678,-1511725851,-606351285,-606348325,-1720626473,1066971055,152047914,1,10240,0,0,0,0,0,0,1242824704,-572730419,1541201374,1215129400,-1448433283,-1431655766,-1431655766,-1448498775,-1448498775,2088080764
    Long mem#,18216=152848501,0,-1288105984,2088544180,-1449822859,-1431721559,-1431655766,1064938668,16,-1590488832,-1431655761,847092906,151193859,-1179160536,1185003449,806,0,50528256,454037515,-1237574628,-1597708571,-606349493
    Long mem#,18304=-606348325,-1774235687,1907339183,51056923,1,56576,0,0,0,0,0,0,335675392,-590099894,1540676828,-1451394490,-1431524694,-1431655766,-1448498775,-1448498775,-1465341528,1971092648,51462472,0,-1468452597,1970633896
    Long mem#,18408=-1468695435,-1448498775,-1431655766,2007805098,785,-1348387061,-1431655241,187923882,839977474,-1347452569,-1715949649,2886,0,16777216,269486851,-531096815,1891362019,-606349368,-606348325,-1757163815,2108600220
    Long mem#,18492=16976657,0,256,0,0,0,0,0,0,167969536,-724414949,1540677084,-1432971962,-1431524180,-1448432982,-1448498775,-1465275991,2088544149,1970633852,51461960,50331648,-1283897295,2088531317,-1451459460,-1448564311,-1431655767
    Long mem#,18596=1973005482,184551217,-1213236929,-1666535762,118124669,1902588454,-1347643011,-1397772369,285938042,197393,0,184746753,-459269360,1136255972,-606348850,-606348325,-1756114726,-1768121194,66344,0,9984,0,0,0,0,0
    Long mem#,18700=0,673581568,-715705550,-707472172,-1431660425,-1431655766,-1448498518,-1448498775,-1784043352,2088533116,1970633852,735048,469958656,1954064200,2088072565,2088533116,2088072565,-1431656023,1974250666,822807359
    Long mem#,18780=-1431524231,-1448431954,671556464,2105241968,-1347441514,-1431654738,1881676657,271204215,3,50528512,-457298421,1403831268,-640034866,-656877095,1901318360,-1768121194,808,0,57856,0,0,0,0,0,50331648,1731405839
    Long mem#,18884=1483763815,1557451989,-1431661193,-1431655766,-1448498774,-1415014999,1970645160,2088533116,1970632053,793672,957284352,1954117960,2088531272,1971092597,-2140129214,-1431726699,2108336810,1998983479,-1431521364
    Long mem#,18960=2058267306,2033717810,-1766943107,-1347440722,-1783976273,-1418250128,947493017,3,16777472,-994034677,781828580,-825307825,-825372978,-1843572532,-2019910502,40,0,256,0,0,0,0,0,252248064,1835479858,2004578671
    Long mem#,19064=-1546201437,-1431661187,-1431655766,-1784043094,-1471638123,1970645160,1970632053,1215657333,67842370,1209142019,1212696648,1970632050,1098218620,-2126114799,-1449820799,1974119082,-2126102721,-1431655252,1064998314
    Long mem#,19140=-1736884430,-1667852648,-1397973330,-1667851106,-1733789840,847354283,268632839,33555216,-960609525,1891154372,777468974,792473134,1899965998,-2037408614,808,0,9728,0,0,0,0,0,822739200,1869440819,-1736600197,-1599889002
    Long mem#,19244=-1431661187,-1431655766,1974048169,2034647408,1970645160,1970632053,1215580277,269488449,1194931996,1212696648,1970620488,288650613,-2125983471,-1449820803,-1733711190,-1347717264,-1431655764,708803996,-1717993153
    Long mem#,19320=2075039404,-1716749968,-1783849831,-1416068703,271809961,-1606474997,52117360,-994158837,-1716340028,-1717659239,-1768647015,-1701538668,-2037411428,2402,0,58624,0,0,0,0,0,587399168,1869034280,-1448503947,-1516142723
    Long mem#,19420=-1431661160,-1448432982,829453717,1211705894,1970645159,1212708213,1212696648,303042871,1195194167,1212696391,1970882632,119294024,-2135674617,-1449820799,-1414747478,-1397970776,-1364284756,1882421142,-1364415327
    Long mem#,19496=1065070230,-1768390344,-1397975402,-1785153609,621818493,-1179344528,1131911341,-994140104,-1330466108,-1347440721,-1667457873,-1667457892,-2020699748,199019,0,256,0,0,0,0,0,50331648,858918659,1836083047,2071034507
    Long mem#,19596=-1449809539,-1465215339,185676666,2034634759,1971103655,1212696693,826360392,823136817,924589074,1212628537,-1602659768,470955848,-1585428425,-1449820803,-1196774742,-1431523400,-1364283730,-1214154324,-1431524168
    Long mem#,19672=1077968284,-1785091002,-1212700011,-1785091401,1881679472,-1347440771,-1733513297,-1010714719,-1347439935,-1330532690,-1365467492,-1667457892,-2003857778,205445,0,9728,0,0,0,0,0,0,50528256,640028426,858925106
    Long mem#,19772=1835886439,1736078733,199473,2034110467,1971090809,1212696693,825307444,269159206,286265360,960116498,-1281336760,-1285901389,2105652058,-1449814659,-1414026070,-1431720776,-1364283734,-1212699476,-1431392359
    Long mem#,19848=943288469,-1785095784,-1397248871,2107416233,-1787150224,-1347440724,-1397772369,-1195262793,-1919116132,-1886417519,-2020505199,-2021161081,-2071623801,614787,0,40192,0,0,0,0,0,0,0,50528256,252248841,640028945
    Long mem#,19952=287846930,3,1211894528,1970632053,893940597,305213748,50529040,184746755,943133201,-1287108556,-1263225933,2108208308,-1448503915,-1263818070,-1432966740,-1364283734,-1212696660,-1365469524,2121301657,-1431529087
    Long mem#,20032=-1397969748,2138936985,-1349085584,-1347440721,-1213485137,-1783842377,-1987672183,-2088533111,1786997353,1768515946,1770154345,52453506,0,256,0,0,0,0,0,0,0,0,50331648,50529027,198921,0,923929344,1212696629,875836488
    Long mem#,20148=640758065,777,50397184,825299472,1970554932,-1263241817,-1448367948,-1785358935,1882540181,-1434610310,-1667852626,-1767068500,-1364289898,-1716212561,-1347507047,-1716015956,-2120705895,-1347446632,-1347440721
    Long mem#,20224=-1397968977,-1784039496,-2088531571,-2088533117,1768515971,1768515945,1717987689,52584806,0,9216,0,0,0,0,0,0,0,0,0,0,0,0,268632064,825307686,825307441,153489969,259,150994944,825299468,1215449140,-1468697227,-1448498777
    Long mem#,20352=1972737429,285938023,1734816294,2105376122,2072080496,-1364289898,-1397968977,-1347440721,-1398098004,-1733514324,-1347638119,-1347440721,-1416062548,-1785353815,-2088531059,-2090237053,1768515945,1768515945,1717986921
    Long mem#,20428=157181541,1,47616,0,0,0,0,0,0,0,0,0,0,0,0,50331648,168430083,638193418,50925072,1,151191552,825307409,1967671348,1970632053,-1785358987,862944661,785,285868803,1731408422,1883186726,-1365468012,-1397772370,-1347440721
    Long mem#,20560=-1397773140,-1397246025,-1397969748,-1347440721,-1785364052,-1785358935,-2088531571,-2088533117,1768515945,1768515945,1717986921,677275238,3,256,0,0,0,0,0,0,0,0,0,0,0,0,0,16777216,50529024,16843523,0,50397184
    Long mem#,20688=875639055,1212692020,1970631541,1970640245,254293101,0,0,151652611,571147011,-1768591513,-1718248292,-1347441492,-1347440977,-1347635273,-1346848593,-1347440721,-1785358933,-1785358955,-2088137843,1768522627,1768515945
    Long mem#,20772=1768515945,1717986918,677340773,9,8704,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,50331648,824577801,875639089,1865823540,862942586,199206,0,0,0,50331648,1731339529,2003856999,-1364218712,-1347507538,-1347441489,-1346848593
    Long mem#,20924=-1347440721,-1784042324,-1785358955,-2087875179,1770226563,1768515945,1718184297,1701209702,543055718,9,55296,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,151193859,638519823,824387110,589702705,3,0,0,0,0,151191552,1881673994
    Long mem#,21084=-1347441511,-1718248276,-1365337703,-1347440721,-1347440721,-1666601812,-1821404291,-2088004717,1768522627,1768515945,1718184297,1717921382,153102431,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,196611,50922249
    Long mem#,21228=197385,0,0,0,0,0,0,2032534528,-1347440743,1064337836,-1367510721,-1347440982,-1347440720,1890234288,1835493171,-1955631249,1768516227,1768515945,1717987689,1600546405,134809888,0,8192,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,21372=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-1740240128,-1347440738,2531767,842141443,-1266848409,-1330599252,590720178,858262019,1871408487,1768516206,1768515945,1717986921,539516774,2057,0,54272,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,21548=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2101742336,-1364288362,471933,151584768,672205571,-1433046733,51000213,167968768,1835493160,1768522605,1768515945,1717921382,153102431,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,21744=0,0,0,0,0,0,0,0,0,0,1880163072,2075045499,2354,16777216,50528256,1731334403,2867,50331648,1730683401,1768516971,1768515945,1600218726,198944,0,0,7936,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,184549376
    Long mem#,21964=640902952,10,0,0,50528256,3,0,621413120,1770153778,1717922153,539516774,9,0,0,55296,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,592131,1,0,0,0,0,0,50528256,1634150432,1633772903,50945630,0,0,0,256
    Long mem#,22200=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1613040131,1583440230,198944,0,0,0,7424,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,672072448,153102433,9
    Long mem#,22536=0,0,0,56576,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,268435968,592418,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,318767104,1347439946,2890
    Long mem#,22884=0,0,0,0,5888,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,100663296,-674181815,5200,0,0,0,0,58368,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,-749713146
    Long mem#,23232=1104,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1296634624,1097,0,0,0,0,4096,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,386138112,1043
    Long mem#,23588=0,0,0,0,57856,0,0,0,0,0,0,0,0,0,0,0,0,0,68421124,67372036,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,67108864,4,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,16777216,352519939,1229592853,122243402,3,0,0,0,0,0,0,0,0,0,0
    Long mem#,23888=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,2304,0,0,0,0,0,0,0,0,0,0,0,268632832,522064139,1330534231,1246580559,50531099,3,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,56832,0,0,0,0,0,0,0,0,0,0,50331648,454037507
    Long mem#,24184=1513896988,-917135197,1464846536,287520838,778,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,50528256,471603984,-1231005636,-674454560,1473304792,944153012,199183,0,0,0,0,0,0,0,0
    Long mem#,24412=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1280,0,0,0,0,0,0,0,0,0,0,184745984,1009392657,-1061791684,-606643264,1390009051,1132570277,50991416,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,56064,0,0,0,0,0,0,0,0
    Long mem#,24696=0,0,184745984,1009392657,-1059039172,-606643266,1389878235,1890564005,51059768,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,184614912,774511632,-454731204,-606513500,-858006565,-2119192706
    Long mem#,24904=51387192,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,768,0,0,0,0,0,0,0,0,0,0,50331648,471535627,-960121284,-606382429,-841229349,-1717987002,592703,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,56064
    Long mem#,25192=0,0,0,0,0,0,0,0,0,0,0,286263041,-1044072900,-606351272,-790897701,-1768515245,2611,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,268632320,-1176379304,-639906217,-790898215,-1768129709
    Long mem#,25432=831,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,768,0,0,0,0,0,0,0,0,0,0,0,184549376,-1211776678,-859024809,-858993460,1906021451,802,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,57344,0,0,0,0,0
    Long mem#,25740=0,0,0,0,0,0,184549376,-1346390458,2122219169,1903260030,-2054712186,37,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,184549376,-1346652329,-1348554832,-1365599058,1804701338,2400
    Long mem#,25964=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,768,0,0,0,0,0,0,0,0,0,0,0,184549376,-1363626938,-1667453265,-1869177682,-2054189935,2656,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,57856,0,0,0,0,0
    Long mem#,26268=0,0,0,0,0,0,285212672,-1886552720,-2071493489,-2038142585,1770154370,204897,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,822738944,-1953793157,-2088533117,-2105375869,1718184297
    Long mem#,26488=204895,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,768,0,0,0,0,0,0,0,0,0,0,0,856359680,-1987347573,-2088533117,1768515945,1717987689,665695,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,57600,0,0
    Long mem#,26784=0,0,0,0,0,0,0,0,0,1730347008,-1955624081,1770226563,1768515945,1717986921,600159,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,671744256,-1953798297,1770226538,1768515945,1600546153
    Long mem#,27016=204894,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,512,0,0,0,0,0,0,0,0,0,0,0,50331648,1832071718,1768522605,1718184297,543057510,777,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,58624,0,0,0,0,0
    Long mem#,27324=0,0,0,0,0,0,0,856623363,1768515687,1717922153,153116257,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,167968768,1767974946,1633773158,198944,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,27608=0,0,0,0,0,0,0,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,1630015241,543056225,9,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,35072,0,0,0,0,0,0,0,0,0,0,0,0,0,672073984,50995240,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,27952=0,0,0,0,0,0,0,0,0,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,285671424,198922,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,353633280,11,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,28324=0,0,0,0,0,0,0,0,10240,0,0,0,0,0,0,0,0,0,0,0,0,0,337052672,20,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,256,0,0,0,0,0,0,0,0,0,0,0,0,0,336789504,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
    Long mem#,28696=0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,768,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,256
    assign #1,picname$
    openrw #1
    blockwrite #1,mem#,0,29068
    closerw #1
    dispose mem#

endproc