250.0falsewidthheight250615615.0154242.0false6.0534.04.0false24.0false2.0184.0193.0false22.0false2.0212.0194.0false21.0false2.0243.0196.0false24.0false3.0275.0195.0false22.0false2.0310.0196.0false27.0false3.0344.0192.0false3.0false32.0359.0174.0false2.0false28.0364.0140.0false3.0false29.0364.0102.0false3.0false31.0362.069.0false29.0false4.0346.027.0false23.0false3.0312.029.0false24.0false3.0281.029.0false21.0false2.0249.031.0false23.0false3.0218.030.0false24.0false2.0186.030.0false3.0false28.0143.070.0false2.0false27.0144.0102.0false3.0false23.0145.0134.0false3.0false28.0143.0171.0filenamepage4$0.mmldate1340137013000urlC:\Users\morrisa\Desktop\mod_diff_os\page4$0.mmlsize82033codebaseC:\Users\morrisa\Desktop\mod_diff_osdefine %inside 0;
define %outside 0;
define %currentNum 0;
define %draggingCell 0;
define %addingAtoms 0;
define %top 28;
define %bottom 199;
define %maxAtoms 300;
define %minAtoms 25;
define %rbcX 555;
define %low 25;
define %high 100;
define %startTemp 500;
beginmouse:pressed;
define %rbcTop %image[2].y*10;
define %rbcBottom %image[2].y*10+22;
if (%mouse_x >= %rbcX and %mouse_x <= %rbcX+40 and %mouse_y >= %rbcTop and %mouse_y <= %rbcBottom);
set %draggingCell 1;
select image none;
select atom none;
select textbox 0;
remove;
endif;
endmouse:pressed;
beginmouse:released;
print release;
print dragging cell;
print %draggingCell;
print adding atoms;
print %addingAtoms;
print (%draggingCell and (not %addingAtoms));
if (%draggingCell and (not %addingAtoms));
print stopping immediately;
stop immediately;
add image pleaseWait.gif (14.4,1);
set %draggingCell 0;
set %addingAtoms 1;
select image none;
select atom 0 not within(14.9,3.1,23.7,18.8);
remove;
set %currentNum 0;
define %location 0;
define %numToAdd "%maxAtoms-(%maxAtoms-%minAtoms)*(%image[2].y*10-%top)/(%bottom-%top)";
while (%currentNum < %numToAdd);
set %location int(rand()*1000);
if (%location <= 84);
//fill in top small area
add atom 0 ("rand()*23.7+14.9", "rand()*3.1");
endif;
if (%location > 84 and %location <= 168);
//fill in bottom small area
add atom 0 ("rand()*23.7+14.9","rand()*3.1+18.8+3.1");
endif;
if (%location > 168 and %location <= 584);
//fill in left side
add atom 0 ("rand()*14.9","rand()*25.0");
endif;
if (%location > 584);
//fill in right side
add atom 0 ("rand()*14.9+14.9+23.7", "rand()*25.0");
endif;
set %inside count(0,14.9,3.1,23.7,18.8);
set %currentNum %number_of_atoms-%inside;
endwhile;
minimize 1 10;
// select atom 0 not within(14.9,3.1,23.7,18.8);
define %count 0;
while (%count < %number_of_atoms);
set atom[%count].vx rand()*1000-500;
set atom[%count].vy rand()*1000-500;
set %count %count+1;
endwhile;
set temperature %startTemp;
select atom none;
select image "%number_of_images-1";
remove;
run;
set %addingAtoms 0;
endif;
set action NONE_ID;
select image none;
endmouse:released;
beginmouse:dragged;
if (%draggingCell and (not %addingAtoms));
if (%mouse_y-11 >%top and %mouse_y-11 < %bottom);
set image[2].y (%mouse_y-11)/10;
else;
if (%mouse_y-11 < %top);
set image[2].y %top/10;
endif;
if (%mouse_y-11 > %bottom);
set image[2].y %bottom/10;
endif;
endif;
endif;
endmouse:dragged;
run;
set action NONE_ID;
send data to graphs50update graphsset %inside count(0,14.9,3.1,23.7,18.8);
set %outside %number_of_atoms - %inside;
store 0 %inside;
store 1 %outside;1.0226245255255None-256-60664572550255255oxygenGradient.png139.0-457.0oxygenGradient.pngfalse11535.00.0rbc.png12555.0143.0rbcNoPores.pngfalse13131.017.0rbcBkg.giffalse24138.018.0-6548500255255falsefalse4.306400959805028191.445839354556140.04212540654687704-0.0174022206980184133.011421264931855163.96167700008980.024649506035277952-0.05357748529923057386.02481622373161.31126835683278-0.06338961673755389-0.01772644118392176366.859966442875140.75202937891632-0.00681006601028581-0.03885503815758591399.316732157924754.400449046795990.006522654950688331-0.06846832049307655144.0414374914158261.78597930557394-0.06991636388721342-0.04056443182646601478.5173566093607154.81312790022240.049509425201484490.031225134804360934179.10164859368163142.53106946359125-0.031812213733007626-0.052649862842314966320.31252641083666.0700809799812125-0.0202906623483754370.05267009129460592587.8490455252937144.475317393870630.060094767524769050.047037604070261245277.2069681092530758.1314792742437660.044664717156532630.0015267847302467374131.66079478569114184.086116631551140.03907996902269853-0.07609932194268776272.109726681255714.8615090393382050.03699101826420705-0.0018577065324318497163.40452675754247211.41729829111844-0.0169696971575259250.0257834998975048665.3301833502993411.8911484115939460.0035613766967261840.07660663153601371126.7148059099818238.40522125749064-0.013005783715749931-0.008637226282643308217.38541110965681228.9688953943827-0.02322920991832883-0.0011663144057221177181.722824760315422.7670819859683-0.0057358018936652230.01509705519701807133.6345306343076142.67350251171396-0.04007188754829229-0.010264811257080213206.81724808791588.579055388863939-0.0195396489880423180.04447839049101602638.7226455140372982.62952829196665-0.0497599083058744560.03252824260005177440.70554458466995113.551288888892810.063351419712412980.011862376461632015414.3946837396991211.16466280787301-0.004060071150273565-0.05225880247120523584.70342876052122245.52765351095270.041609157220842570.059335000840397494133.892738548145987.43202775657950.014459938190681233-0.08418778068686242179.0185363962961101.940531736186440.029964802905821986-0.02546649099738723161.5580979804161159.674535828348520.02703023081636887-0.01549276302624760838.29195290216105156.8705142998935-0.00899818758747541-0.05837313904912757455.2639896994782166.860246323683780.0106804423476552850.033356239588438266375.23562050677003187.84633801457122-1.8490085301455414E-4-0.01632398484879596290.14304281971545232.05280066997710.009448934952942332-0.09741173355411387450.7424546042367145.46168512539444-0.043521130275310974-0.097707489939604299.31544786607971103.72821165616436-0.0456738458295834340.0185370160949174189.4055936502893157.69468249808870.0076204220363905310.02415574005812128405.8549766453967147.5454668127378-0.03817072897752457-0.08944708265042774461.820814448829727.4617661938182030.010141128602015544-0.014248416639071596419.746330770293167.883901322685660.0535961999790272-0.03766108933789336307.2760937419504230.287592560307560.037196079927130060.035717556756622186526.9051721474906158.340430115955120.009960776036917019-0.035814900355406944.38001878434698101.15898226764736-0.06442425125958794-0.03211538362809901141.69716448134514127.150886200567210.02682589586796585-0.03697603552092799334.5439794115546352.28867913314944-0.03138005621172784-0.001029561960812928376.241744828262597.086909251457710.036666467784939955-0.07263409778668962429.592730921014896.3313260545013-0.0383377170500802460.011600255047822014245.47995107408656220.90109325366913-0.022908838897606653-0.008319036117295679254.8305124764965512.397031111301319-0.047398659493979714-0.009674008705788396288.70056160026963.605816685429816-0.05748824706326920.02991469565452455483.30440783368834183.286206061168030.079958371440663590.0238634433901765429.1746936288904227.613558096019430.0400025785414214250.02486792206484464132.3119448126410660.145003018341960.038847783577696075-0.057199068971390314293.599290746077242.078321334803520.030683187954135847-0.10279975200958849249.16442650124645134.3186515123896-0.01174438109095993-0.0023056497235975663412.655455250762157.762401836501940.07979649839364301-0.02766702114106870261.1976001050231484.99644981945717-0.0236589468124005150.014133374983036172400.8213297846017184.35587970859552-0.082465338377591070.01946335439086143526.9946488174741132.089095887592350.0529307405434966960.0026483095786372073451.31070180910604153.5042026633395-7.996775886829623E-50.115505579736586123.75087393927933123.359294023382260.016230324654398498-0.047391033896863166327.9119981167778530.601267630569488-0.005888622210639459-0.013292542938602677375.6994097116819225.47913596112804-0.0389224740574465250.06656106086067133418.90817829267394232.9671892913597-0.035870706679639326-0.044475232322910334293.697047592700174.550766975786-0.00142119675964462150.04133357795370679417.5572181228448641.039052982378855-0.028558843306185796-0.11239642193020437293.4059375982274216.740200031105560.033289891454182050.017905389897957164130.54611949348805149.35245908475420.053002319169095265-0.02678911827862118272.60220400811222162.558536988069080.06440625690725711-0.05074465688616922417.30506900518145165.79753500208298-0.00253786259136393060.045376475698559314426.225330062112856.2975254211414620.0013224791127625425-0.014911067642640928357.0649272360791168.74512673196335-0.03482180813967477-0.03422368486198416151.3457429587255732.455319307572240.03457813401610302-0.05796927385735434196.05808618813938135.97327735506454-0.08178389919466118-0.032555270735301504377.5334112964748154.766443741046660.013803534449197337-0.03610362994316791274.32656219774503166.070594483367440.034482666541483230.00966524725752598495.4480934891849205.290071847936-0.0286670369697897830.00421353615301274137.27889618834908177.756971260773440.03678829167968669-0.06287636271918626.509252579458206143.816422715103580.05008416562830589-0.002874075559661351292.82857637054997103.70172258037793-0.0306345802750147830.03945919883457438140.48591370200026165.92084686555663-0.001696735048360107-0.105727110688186115.009054789264423232.231018824221620.0575984156418940450.11018017870785216318.3521362925795222.0773175437670.0496368760826369350.1026737715423261733.9182358439302291.70563789722786-0.0325944019700152-0.05710599656934875493.6056862435526239.36746386550830.06727180541139927-0.00897561071622845389.7134045844280875.82899106842932-0.0173150214923135820.017794778031555786269.82234275662347152.656252255159560.082982593696848020.0278174056689380691.6453199105810813.161890593036851-0.024765706873826062-0.05135938889181681458.64491779930296187.24798531457603-0.050910473464791856-0.034798293258904434135.1693040907802243.98149024140903-0.0435835629070345160.05283743018690618110.77890252457898116.201589897053440.0099661095360168240.03633061647718400453.35090067017246414.135563865394847-0.08978168551817435-0.06170287663598221234.819025807002217.38148807295102-0.040098112132458030.06039599615779143114.08157270071962124.471624581897790.013440266853455025-0.022932940223831653291.94765092045543114.113015045423940.03876225649252191-0.0149783448566352293.629211473406467.165165061352819-0.004933880069486375-0.018667809208959107155.2863687953915108.651304958677950.01546610544692257-0.05239372748847665253.9410481094804188.853145319174980.027703375887312230.0645368925100369656.56917420816962181.002810698777580.0086502582657812070.047337527806824854217.520542324185283.36044975573203-0.0017794118222207796-0.03298697848280379295.603713824518120.8772357856503670.032723966330960.0431697252425092232.9746199823676795.19584680497577-0.03129327571181557-0.012393785056925533191.5957722862130281.48513017987881-0.07296346488493173-0.10004212239960553327.408179593201144.87385401826530.030564750370263922-0.06069921678544268418.1475775654948118.943994805567480.01677785407411241-0.005936940027510557523.9819358440625122.45755745809434-0.011549664397939358-0.024225204664791354439.26879866865573238.08066439269692-0.043650482926566106-0.05122139634382755194.2814201250399149.6319713083348-0.02576434738129649-0.006205904796645707344.5144847076348478.344507621318440.024250609997820187-0.06986962117862526482.7456744899232623.0871520655644030.0385336942707607750.023803830041007484157.8451812634021410.53587612408117-0.042398692511707340.014884918898467563353.365792748355151.845635713094140.05254450851149906-0.031981893997490386508.734892080842948.762610538888640.0367279490087741440.06966661478517587251.1608673189123590.2574985887675-8.75154533200767E-4-0.03382497004013209572.6041928373376930.07703187463998-0.101243593507469810.040765632433217965450.00296183127745233.8532742604184-0.08922621961135337-0.041602976548172216210.159941853932127.488445635162837-0.045638068615885430.01792159721415173446.598729128529172.97877225025977-0.03871822730010167-0.015266557087947113510.3011603307413191.016390656598330.0263423859301350070.07611784494078105113.9106950605027533.951468342559814-0.0247733867435310820.10472819094694044157.3437482376131764.0050535542375-0.028169344089776397-0.04281439691224791429.51047976511566573.355451101828980.04926778595485150.0641997917410563210.277545372880082239.95888118716323-0.060014941372983950.05010370661765711148.1923671565478213.71372805350228-0.003430321974150012-0.04457616562592411289.5111719346461480.981696068471050.0526175745202523-0.01702026164172091473.21379214098645.887543445567826-0.015756617464371986-0.03720670022150751472.240023955363233.72387912685757-0.018146662403422404-0.015108873735538802334.6550216087766242.0098303339603-0.024587334849214052-0.04227613711630396568.5012979317365621.287801637699240.03698535620387384-0.02680321202895652551.3285579532671129.741866548446904-0.03566648631240118-0.06428788045744774507.146150861174114.8241400504530.022184361040402473-0.010731920365282088504.774170348600417.259651116575643-0.05213235637083295-0.0321510703989571853.40181665936033207.195665571047210.0469962060183306760.052020853996301464442.7727285367772713.898922461536616-0.051564004912421610.023797298143726355206.3202476799733649.631253858190090.03185661428116690.0254986084886397653.12786025240675195.93128234643490.06835795104056272-0.03987397535081941178.9954141750449159.645191816752880.0200071607621691540.05366644339868576213.6675008127197774.800339989933460.015606919681034996-0.0751877297890906564.52686306621176244.282415988785660.026909564526836176-0.019527101159008676445.7714660618405654.3977494559141-0.03249500309742915-0.01431535291087661763.1688641293089636.07242094721193-0.0219916444680367080.00429797080895927389.70582544112376128.342860457549250.0030362753155040753-0.02675349722113953178.26195666684603118.88450973703117-0.0208026934823402340.041387001053853276100.82576291974269134.2902422348030.0040850589854704620.0749905829888103856.224738220913174240.6619594307080.09653345311528948-0.02793843068757872298.9339030287253536.249504773806805-0.02558723197321440.01704165983116817170.879518677873960.816707271460665-0.0400431506718422550.05008963742404697407.510628867729915.41718333034581-0.0050218587245748220.06283076334680425350.0694488334401183.84163611171886-0.020705426211468786-0.041022363651043885368.75648569318486148.680551808361680.08287286195134744-0.019600713749931168259.4896466067091134.4836982992527-0.09528156398816282-0.07111444439520713501.941978037660725.92755187506580.03452413034160005-0.029595007072584605215.24117101413253132.7707836306964-0.0579658939578571940.053845758033878861.27348681608053163.38266956363714-0.014063734393931224-0.04095217364726797103.55726148079526207.19664461331465-0.0470222157581821340.0366659333969145110.21827015844279524.25266033615728-0.030540991474341545-0.026280677832492064308.1827294554467169.616409988276640.038465161143755160.016400750194045164