[Diablo] Drawing Static Text and Windows (v1.09b)

[Perma]

Yeah, so I was bored and decided to do some Starspeak-like work with the original Diablo. Here are my results, maybe someone can learn something from them.

PrintXY with Color Selection (Available colors: 0-white, 1-blue, 2-red, 3-gold)

D1_StaticText proc     xinfo:DWORD, yinfo:DWORD, colorinfo:DWORD, textinfo:DWORD

        pushad
        push colorinfo
        push textinfo
        mov ecx, xinfo
        mov edx, yinfo
        call 00405681h
        popad
        ret

D1_StaticText endp

Printing Gold Client-Sided Text

D1_PrintText proc       textaddr:DWORD

        pushad
        push textaddr
        call 0043D97Dh
        add esp, 04h
        popad
        ret

D1_PrintText endp

As a note for the above, Diablo has a built-in delay for displaying the gold client-sided text. Zynastor developed a fix for this but seeing as it isn't mine I will let him post it if he is interested.


Box Drawing Function

D1_DrawBox proc         xstart:DWORD, xend:DWORD, ystart:DWORD, yend:DWORD, col:DWORD

        push ecx
        mov ecx, xstart
        .while ecx <= xend
               invoke D1_StaticText, ecx, ystart, col, CTEXT(".")
               invoke D1_StaticText, ecx, yend, col, CTEXT(".")
               inc ecx
        .endw
        mov ecx, ystart
        .while ecx <= yend
               invoke D1_StaticText, xstart, ecx, col, CTEXT(".")
               invoke D1_StaticText, xend, ecx, col, CTEXT(".")
               inc ecx
        .endw
        pop ecx
        ret

D1_DrawBox endp

You can see that at this point I started to become lazy. Rather than search for a true drawing function, I created my own box drawing function using a method that would produce an array of periods in whatever size I wanted. This gave the illusion that the box was made up of solid lines. Aren't I clever? The same colors available for the PrintXY function are available for the above function as well.

[Mr.Lampy]

Hmm I might have to find my diablo1 cd and try learning masm again

[Hell-Lord]

Very nice job Perma :D

[John]

Looking good perma. you da man!

[Hell-Lord]

Perma what assembly language program do you use?

[LCSBSSRHXXX]

I use MASM and RadASM for IDE and I belive perma uses the same, maybe a different IDE though.

[Hell-Lord]

Thanks LCSBSSRHXXX
is the most current version 9.0 of MASM that is?

[Perma]

Yes, I use MASM 9.0 and the FASM IDE.

[Hell-Lord]

kk thanks

[Jiggie=#1]

If the addresses were converted, any chance that would work for starcraft?

[Perma]

Starcraft has different drawing functions with different parameters. But this same idea could easily be implemented on any game if you found the correct functions (like Starspeak, for example).

[Rufus]

winasm ide 4tw