M24 RELM24 ZEX M24INP ZZ0 |MATH24 DZC%&MATH24 LZB?MDOUBL24Z80OOMEVAL24 ZZ0R[MEVALB24ZZ0fMEVALD24ZZ0n MEVALH24ZZ0x oMHALVE24Z80rMZEROBUFZZ0c LS dT9U5%9BRADIXDM]@ 4W4x3@2Ӡ$D"RÕflQ : CO@1 @vjAHpc"` 1%928U#!`I=2:SSc"8Y:SRS#(I%b:QV#- YAI%9RpQUS d#DUdI%bP5bU+,H Q@#GV @h~f@%LٴF$ gq@!P@o([Y.3ƷVAS 2 $Th* q e,Ȫ)Q eF1 8QUSdUd#)@Ԑa8 ?CUu@;Z"6 0Y1@ Ȫ)FQ 8QUS dUdC)@,x  au@(F;T@f@m"[nPH #1A(㸌|>Z.a~`c$=U 1:US @iI= VpQUS dUdă)@0 _q:u0&zFh} &2 T$=U 1:US @iI= VpQP dDT$Y@8el,DOUBLERS`ddS)@8#a[,<+e,HALVE2VTРeU$%Y@, A0l6d@2*z8el,DOUBLERS`ddS)@8#a[,<+e,HA;;MASM is an alias you must create for your particular ;;assembler to create a Microsoft .REL file. ;;for z80asm the following will suffice ;;(using an ARUNZ script): ;;z80asm $:1.$d0$d0z/m MASM M24INP.Z80 MASM MEVAL24.Z80 MASM MEVALB24.Z80 MASM MEVALD24.Z80 MASM MEVALH24.Z80 MASM MDOUBL24.Z80 MASM MHALVE24.Z80 MASM MZEROBUF.Z80 LIB80 M24=M24INP MEVAL24 MEVALB24 MEVALD24 MEVALH24 MDOUBL24 MHALVE24 MZEROBUF /E M MHALVE24.Z80 MASM MZEROBUF.Z80 LIB80 M24=M24INP MEVAL24 MEVALB24 MvM24INP.Z80#  !eq@ ΆSfDf%&NF3@b0JG#$ " @* ")<,!!Qa:E+hE" XRȠUH`qT( ,vhQ, qHU-2T0D{n2,m2&1p:#~S"e9Ȅ @sMy!jSN 1ddac4tyA < @@pƛ<<%ʛ '6f=sA L&8ˌ2Nga'L ܙ0Tr^4,uh@olG'=GQwHiwy  ^ Jvdnfܧ1B:qٶ(awfbi"mQ~ ФeQvh WXqN1W(od\ 1lQflv1 xG76F dzaQZ&@f_vhh^t9( GGE1Q>FQ  Pt r20 Z%PPG|'-m&M&,:|D1p0lj1F ~ȼ!TGwVZ^L0 6JyfEYRF\)I'xXj"Fʻ^^ XHszifPaklZMjLGQQX$c`ʳV\iqck)yY2L,yHd* JĹ0cF:GFI.MDyR3 Pu,bF5fGiYTqciYwhT҅)KLebTn1]G eqallB2 2Z A3 1* nFBB3(&`ٻS@ȁ#006 ؃cX0bi %KgtadNʔ Pe:J \ /4`o A1doE`V wL^Щ0yңT%`a%A-2tCkPbrc z7'kup^LdyL8b)IvUf1 msbYSaaiexh4pVԦnoB3g5ٝLw .Fz[ևUkEf:*aN` +OtZr"0@+J'IY.Ko'1B.1@W8QKX$5kBAz_$]h5sB\!%a3B ncdٓgDr@״ݓOl\K& )o-#A|̪#c;anü8>4jaORG'8T'랹%OZauVs^o<+cR ={C[g]7V CԂT~>f:G,a=3Oo͝m۬|vYs:T(Ix~x0jH <<3l )5&Q$tD4*{ t#j0`GcR|l<.vsBBAa Cw5t;,YD#Ard Ca*o3Ku31(!SvQy\`.u LPSӜwV5hB0I@a0/?%xA:D@.B(IDQ01KF.T]C>U Sr1**H2<1)-XG!ړ3CI*q0 L"x ,0&Ҙ#Od]rYuX0x%0Y5E㌈5VA$R$&%yU9aXc9Wc9H^a!Q3i5:tJzY+fR]|o@341M24}g}VaAPW9*.[HQ%B,Q#$YD1ZCsL!I# !#`3pD )xTIv,&i_00i,CCɴAp0b#\)((MlTS/`f.bcZ"CĬ0uLEl8ZDHFF2GFn.%36I"8I553hⱒf %sAI^$SDвѢbO0 Q0Pxi'*eyej AX(BUsSM@ڪ!E ,Q ܴ.`O[XXrmVn$nBB rƖ[1Y:IF1ufv D0$(tlWL#uv ~1tL m̰p[v|$N蜰gs񑒏ZxwvV8Zs۪_RqZ/j ڰSF!rAsw([ĕjYڒü4.ISdB!H-xAVE!(KLSRԖmQH,߾.ƶLED_Sx;wrOp(@ar)DD@"aN]:a D,7 Qd쥕@ h>z3Bhu4wDڪ7DQ 0ۤNn#(RÛq&636i,2x2D\̑m"zr2ؼyOy@h"ho-P:趩v(پbUyr "UjRsD)[ in-%T"Mk7SPOqmD_U'G r` *Mh c,%ʉ\C*+" RjZ.%$֜0Q`l$Mnеc_ }LP rr|gI$6$a_zNV #S1כΓ< NЗXIrERt;IH饔VyI8]D~b>xAUg7ZARXB )BqN5ך&mqR:g , Z&j5{qonۜ 9svt2; Module MDOUBL24 ; Steven M. Cohen ; March 10, 1987 ; PUBLIC DOUBLE24 ; Doubles the 24 bit buffer pointed to by HL ; Registers affected :NONE ; Side effects: NONE ; DOUBLE24: PUSH AF ;preserve flags OR A RL (HL) ;RL= mult by 2 INC HL RL (HL) INC HL RL (HL) DEC HL DEC HL POP AF ;restore flags RET  vMEVAL24.Z8# AC4d: qe!R2A`o9E2\N 2y"U%2)@O$2A9r/ȅRafa2NC)@f#b 9GSr2ɦ 1oNScteؤA"K[+al̞nM؈E ӡ@t7 "|Wc17jsF !|i66$3$4m{'SɂAHI'e!:g Igm直e1MvWxT߷aZevnV&`d!Z LAkC${Z ZwUmjYv=F"@LOI%e@0{= PxeXWGB@ p#eЀ0֨ ~͈Y ^a"b&jxWeC%Liaar} p[ycP8dq~a ЀFW:U՚ ga΄>]. \ZHSaN=F1*9e{FZcTjHPSD+g>ZӁ'~UZa4&*SFM#6өiϚ 0KHm1'B3U-UxFcA$#`pudc pTA:>\fLMY\әkocD=.ܯw.?yU"u aQKmn (3m?K}_pYQ%ѳ_o(T~#]9Gg6~@|}<sMXOW5`y'ydqBB?E}Xhjksi_a+9[i*WOD'Tq(C=D_DP"H(z Rԃ6~vMEVALB24.Z8# AC4d: qe!RB r h7v23yY'3)@o&3A9s/Lɴb0TG#z 8LF&V$O*XఴE)ER5f F`MVr: "i7FaC$D,] 2L擥"g:l4v0X>#i9 S9:fݫs&g,%')+yq@T?T) 0ZbkrSDA$GEEj֟4*egjҷ'KH[I|-NS$tUנ! P^d=flIZD jJWQFFk4wpnwh,AY"T׭)^n1 ݮQO cdI|RuZNPka;?½MWdbw}0=3O{V$}vMEVALD24.Z8# AC4d: qe!RD r h7v23yY'3)@o&3A9s/&d ALT#z 8LF&V$O*XఴE)ER5hA! $ MHAtŎ;%g# 9FqtfJd2I$@d2& Di3N\o2Ȁ:`L`@ixLn:u9}~rdxG9ʔf H$T&"DS Ayae$w Hnqӄ ]ւ[1eGyD1|}fG&Q4~Ὓ]lH-ƀ\ZG!p"6G$ Ocw&lat dtYy!1wbđծfeAlYݐe9)R$X:VLHD! A1V{hhCFD%r]eqQtBUNSk$0 ÐT2jY |)j!T!dTi@ {(CQ KaC((1컋9. PRBvCj Iw[Y.8Zb!Ґ*,?DЊ3$R'u`]gQ()P}elqaKA^hF@$H0vGddڑC2fmAGQ,8"P5+TYjI*vMEVALH24.Z8# AC4d: qe!RH r h7v23yY'3)@o&3A9s/PIb6O4rq4xDt9Myј@A)$a2Lfi 2L擥"gm:Km ;`NX=ni9ݒS9:)T0lYJNStVH$T&"D~S ᘴyc1圖@Eϛ3$g)ɤ:$A$gNs9 fG%4tqٕo{'vZ$ͼppطvG$ OcmYaASa[^ eE!pxce}F5rdaa[vna$HEiOEQbEL A9I$ZEA$OJ] tQAUp:SLHD!eIYŤLۤTGVaefYX1Ƹ$ B9 աL(( @$A )DqT!dT,Jr:Vښf'CO1N(RXwn1' 躮˸R/+Dme/f9\0PA qup' -lO0$SD+'`R\IE!f C zEQ02S7DJE;Gp'(mƈ18v6sC4! igat1ԵL\J;^_~BjTST`Lpz{BNı _a0PI}՛\ZʍrrVk&,g-ݖ aB Wr]۴>ytϴDɸE GTbOP*y>Bg:e'HN:q側CLZ&Ju*1N|B MA;*Aߙ;!]$zK8l67D!M(I\MH@); Module MHALVE24 ; Steven M. Cohen ; March 10, 1987 ; PUBLIC HALVE24 ; Halves the 24 bit quantity pointed to by HL ; Registers affected : NONE ; Side effect: NONE HALVE24: PUSH AF ;save flags INC HL INC HL ;start with the highest byte OR A RR (HL) ;RR = divide by 2 DEC HL RR (HL) DEC HL RR (HL) POP AF ;restore flags RET  the highest bvMZEROBUF.Z8#  !TE"yFPO)2E'AE<#A  1o,CIt<Fe9 h2$$`h 3ю (P*&Q<@AFJDXY [@I'HK@D" FS9t21cə#y;&J1: )p"S$H6Ib7GgAG: G]Q( &"XXAGϥb.[w/;ɢz^o X`v@i>s\eX^{P1|'}^݅ax-營wՅ8(XPv