Mirage Source http://web.miragesource.net/forums/ |
|
32x64 spites http://web.miragesource.net/forums/viewtopic.php?f=201&t=4001 |
Page 1 of 1 |
Author: | Shadow Dragon [ Thu Jul 17, 2008 8:50 pm ] |
Post subject: | 32x64 spites |
Code: ' Blit out players mid For i = 1 To MAX_PLAYERS If IsPlaying(i) And GetPlayerMap(i) = GetPlayerMap(MyIndex) Then Call BltPlayermid(i) End If Next i ' Blit out players top For i = 1 To MAX_PLAYERS If IsPlaying(i) And GetPlayerMap(i) = GetPlayerMap(MyIndex) Then Call BltPlayerTop(i) End If Next i Code: bltplayermid Y = y – 32 If y <0 and y> -32 then With rec .top = .top – y Y = 0 End with End if bltplayertop y = y - 64 If y < 0 And y > -64 Then With Rec .top = .top - y y = 0 End With End If Code: .Top = GetPlayerSprite(Index) * PIC_Y + PIC_Y + pic_Y I am not sure if this will work but I can't get it to work any idea's? |
Page 1 of 1 | All times are UTC |
Powered by phpBB® Forum Software © phpBB Group https://www.phpbb.com/ |