From f6d6f4fb3f23c1d1570005917800b05adc857afc Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Mario=20Pati=C3=B1o?= Date: Wed, 3 Jul 2013 19:02:39 +0200 Subject: [PATCH] Replaced hi-res address calculation Replaced hi-res address calculation with the optimized new Woz calculation Swapped the order of Y and X register initialisation in SAVEDST because Y is used in the Woz routine. Added the image of Jonathan Mak in the ProDOS Disk image and the samples folder. --- DISPLAY.S | 36 ++++++++++++++++-------------------- Images/VBMP.po | Bin 143360 -> 143360 bytes Samples/IMAGE.BMP | Bin 0 -> 7168 bytes 3 files changed, 16 insertions(+), 20 deletions(-) create mode 100644 Samples/IMAGE.BMP diff --git a/DISPLAY.S b/DISPLAY.S index cb0c0bc..19c74ab 100644 --- a/DISPLAY.S +++ b/DISPLAY.S @@ -24,25 +24,21 @@ SOURCE EQU $4000 JMP DEBUT CALC TXA ; CALCUL ADRESSE LIGNE (X) HIRES - AND #$C0 + ASL + TAY + AND #$F0 + BPL C1 + ORA #$05 +C1 BCC C2 + ORA #$0A +C2 ASL + ASL STA MEM - LSR - LSR - ORA MEM - STA MEM - TXA - STA MEM+1 - ASL - ASL - ASL - ROL MEM+1 - ASL - ROL MEM+1 - ASL - ROR MEM - LDA MEM+1 - AND #$1F - ORA #$20 + TYA + AND #$0E + ADC #$10 + ASL MEM + ROL STA MEM+1 RTS @@ -57,9 +53,9 @@ S1 STY SRCY STA COMPTS RTS -SAVEDST LDY DESTY - LDX DESTX +SAVEDST LDX DESTX JSR CALC + LDY DESTY LDA BUFFDST LSR ; DERNIER DECALLAGE POUR 7EMEBIT STA (MEM),Y diff --git a/Images/VBMP.po b/Images/VBMP.po index 589f1d023e699cd0f75cf4e693b17a9b44af4dde..24921383781ae0a728c0fba7ae115df348f171dc 100644 GIT binary patch delta 3173 zcmcguPiP}$6rV4dOxiR}CYy|H)3lSOZm|-|g0QERs34+rVbv86g7mcRo)sw`oM?9z z6b3Z`Bc6t}yI8#R53+iRlO`?8(sfJQ!}g#A_9$psL@IXs`QG~`-DEnoJvorP_xpz$Nx!BgcpgZqBrVltjh!BU`TX-Qy*Tm0 z`3n=T<11xfic3;PdXPSQ3JpnFdKAhjvLprhQlje@witWs9buYv>!Lsjd)Bu_P-l{Ly%k{clUp&BSR(;W~p)dVyZq@9&D|aE%cC8g@eg(8f z9U?41OfVA`8~4D;wf}CxQtXYbP0K1xXRp5>C}*eN&fK>fE1O&QE&I;qhF!0%)h&Ci zu}$Fi($~|MLggtXYfQeYej539d`As*hdvK{u$eXoum5x{gO=c=3|$&t z?N`x%bpXUO>f~?bkns-?S3WM@EV2*2yv#=Xp-Ric;)fM$J-j>;ZFKV@jl;X;SCw=m z%y(&Ma2)pNd>@BF&YLhE=qYgSz&OtN4vje|Fg7^fgK>Y90RSE(5Qu;$_)0p*kEJzm z#OD#0m>g2VUEPtMXfGK48D(t`01r#m5G#Vx*Q=9@_;U^+$fK{%F!rqm9$kX-~TD>E$4NCln~z%$XwlXGO6M5ggThmN$93BBXfP*h(Or;|(+JhlQg zJSa{nneatRRh1@{6bkzxneaG6_Z*21du^#Bq3Og^ab_5_l@F+SK(Y^4@{lb^8VX7e zwq(%_hN5zY0{Vbse6P@MDV%fU3-Ae0%@ zF;I-kvnETGs%|HFfn>tddK^3Rq^L-PHv*xI5dqP})a1vis;9lh(l`l7i^S`GH0Um; zPCHxRuRt5GbtJ*t$@cPZz>RA+6m6L%@vMhA2DeT>p>H%>{q*T4r zQgo*W6dO0zmO4pvhr9858kr8;B&NjOIE9K4lBc{&O6=~qwTdNYbaHVQZNY;ITQ7?9 zKH_k2`BFFgA2xm^q5}=n;d|P-r{}JFD?m9dck@W~jtSw5+ z`-lwQIQc9p7>^XBOp34-*Ps!&O^^@64~@z$fvgNvgeNFX@&rYMC(k)(raxg`F#57ckHaD54l;&08NSfpglw#gxr% delta 878 zcmZp8z|ru4V}mLSBkyE2mJG%zllxiJ_>>tL?nyBK!D9x2ds3SZvxqXPGPrmK2lzNf z>ILfsgQQsgF|aZ$Wd|{V;4y^S{FhaUjfwsI^pE09N}C;c_A+kbi%zdUcVxlhC5Jck zF1UQ<;DWP9&-N}jbNLdKIDZK$1ed#V;~-q+>W#e%4qiTkOk6sD24n_Y29tjYYR3_< z$*VW20kwmju<=;$0+4-+mux~f24v8sE0=qF7nLzheo(3~sUlA1=7J+fFJHL{bmEa4 zVCIe91*a}wT5$N_nZui_D$-c%eJTaIG!L}0d3mw2wX$`!vU729sj-7l8rxEKO?gg* zR`!G?Qac$OT4hgMV1B15&?2>xy;UM%iS#lV1!jSza$XbJmdbzN(~&tKz@`&&z$afo zC-lIH0~!~EPd)hmL9|UqK~(^#fEh?FU}%wE$<`{F;KL@U6L3H$=)mO4x+onDfnE)P zl?<(Ntx~Phi}tt4fYbn$v&p8(9g`3M={zP0q$~w|K2H8$_q(ZKSp#F$^rrcYVw=TE zTp0&CUbKjd7X}7K#>s(fe^~zhX8<#ZjHPO3VNgOkdKgF?I=o=u80kh#PGFM*0C^|Gng9R* diff --git a/Samples/IMAGE.BMP b/Samples/IMAGE.BMP new file mode 100644 index 0000000000000000000000000000000000000000..4b182895a7edb9802ef64869f47cb135b4153bd8 GIT binary patch literal 7168 zcmeI0!H&}~5QZIb=&@HMBz)y5HWGK9DSkAIC&?oq4yZ^KX6z=Z{rjJ0h`K9*@M<@y z{p~;FnX#Sp^Ou(ouCy2V`$>M^56(ro4)U|MuOFSuzjaF~)gS-P`xJ`br;G0XDcuIA z2h;WGR~C4e(yR)NDMcAPr}Rx_B&Kph z5)F(tv8mFrFj_V$87)9LE?X-}>HRL@Ss{fvt>fj|Yvi7m2^5laS1nS;SAD@RfngOms%j zVax;!OR9wd8JbiB11Y83)FFl>zFDQ&w}T9p1}h*7gXNQ!v!l-J5#~CETB6*0$OTI~ zGIOWm+z2`rCK_~(G86a{h^-?Gk#S&(9)!S<3UklW!DYd=-Xjbv4b-tPEQGKG=`R14 z3@lUX&jE&}9dw?>&@u#DhZ)>{SWdwfofqg>m}?})K<5(nnV$r~ll!}Y`C(va{eaJ} z%0Mm-+p_5VtIS*OKVXZl3)p*~#n3$gY*7Z!FSag_2@HaBIX;P*na-Q5_lPG!_SWTbso zVvM_d6A%-nlDNx7phP7b6P7mdw#+6Qqd@LFFTqW;;?;k9)q#O0ys