Affine Geometry`Ôø¹`Ôè»`ÿÿÿÿlÔ0sx:=Input("date of first point [ mmddyyyy ]",1,12350000,1032000); sxt:=Input("intraday time of first point[ 24 hour - hhmm ]",0,2460,0); ex:=Input("date of second point [ mmddyyyy ]",1,12350000,1032001); ext:=Input("intraday time of second point[ 24 hour - hhmm ]",0,2460,0); prs:=Input("scaling factor for slope calculation",1,100000,1); ops:=Input("shift value for affine display",0,100000,0); sdt:= (Month()=Int(sx/1000000)) AND (DayOfMonth()=Rnd(Frac(Int(sx/10000)/100)*100)) AND (Year()=Rnd(Frac(sx/10000)*10000)) AND (Hour()= Int(sxt/100)) AND (Minute()=Rnd(Frac(sxt/100)*100)); edt:=Month()=Int(ex/1000000) AND DayOfMonth()=Rnd(Frac(Int(ex/10000)/100)*100) AND Year()=Rnd(Frac(ex/10000)*10000) AND (Hour()= Int(ext/100)) AND (Minute()=Rnd(Frac(ext/100)*100)); rise:=LastValue((ValueWhen(1,edt,C)-ValueWhen(1,sdt,C))*prs); run:=LastValue(ValueWhen(1,edt,Cum(1))-ValueWhen(1,sdt,Cum(1))); sl:=rise/run; tr:=((C-LastValue(ValueWhen(1,sdt,C)))-(Cum(1)-LastValue(ValueWhen(1,sdt ,Cum(1))))*sl); tr+opsÞë¾GYáv ‹Ù ‹Ù þÿÿÿøÄâ<ÆprÿvŒ– ÈþÿÿÿVývHzrD0Zzr`ÅÝÈÿ¾`Å*Ÿzr ‹Ù þou ‹Ù ¨Å›zr ‹Ù èÆè™zr$Æ©´|rv =Èÿ¾ÔÅúbuv èÆè™zrÍ«ºÜè™zräÅÆ0–u LÆ‘muQmuwÉÿ¾v $ØÜp'#çÿÿÿÿÿélu‘mu©´|rðÅ©ù˜Æ¶¦•ucbhËþÿÿÿQmuèmuè™zrv èÆJúómu“Éÿ¾×d uœÆtÆàǧÉÿ¾ ǵw´ÆàÇ€µwh`+ðIú è™zrr&·w+¹ru«éuv „ɧÿÿ´„ÉH° @Ç:…u§ÿÿv „Éô0¬„ÇH…·w8¬ð0HÝÊ 6frô0¬¬ÇH…·w8¬ÄÇòUýv¬VývØÜë¾GYávHÝÊ HÝÊ ”ÇòUývØÈprÿvŒ– ÈþÿÿÿVývHzrô0ZzrüÇqÊÿ¾üÇ*ŸzrHÝÊ þouHÝÊ DÈ›zrHÝÊ „Éè™zrÀȬÉlÑÅÿ¾pÈúbul „Éè™zrÍ«ºÜè™zr€ÈœÈ0–u èÈ‘muQmuÓÇÿ¾l¨‰$ØÜp'#çÿÿÿÿÿélu‘muŒÈp4ɶ¦•ucbhËþÿÿÿQmuèmuè™zrl „ÉXÏúómuÆÿ¾ Ù¨‰4É0¨Aɨ‰˜Ù¶¦•uÃbhËþÿÿÿómuH u0Ïúúøµwd ulÉ 0Ïú$úøµw„ÉAffine Geometry¬ÉAffine GeometryInput("intraday time of first point[ 24 hour - hhmm ]",0,2460,0); ex:=Input("date of second point [ mmddyyyy ]",1,12350000,1032001); ext:=Input("intraday time of second point[ 24 hour - hhmm ]",0,2460,0); prs:=Input("scaling factor for sÿ_»yó €?0r(„ÇÆˆÿ ª®ª‡ ª®ª†>ÇÆ‰ÿˆ‰ÆŠÿ®ª†CÇ>C ª ª®ª†Ç>(Š>Æ‹ÿ‹…ÿÿÿd2ÿÿÿÿyðÓxÔµw0ÔðïAffine GeometryÐÛtrXÔò³erìÛ