 |
| Register | Login | |||||
 |
Main
| Memberlist
| Active users
| ACS
| Commons
| Calendar
| Online users Ranks | FAQ | Color Chart | Photo album | IRC Chat |
|
| | ||
|
| Register | Login | |||||
|
Main
| Memberlist
| Active users
| ACS
| Commons
| Calendar
| Online users Ranks | FAQ | Color Chart | Photo album | IRC Chat |
|
| | ||
| Acmlm's Board - I2 Archive - - Posts by elixirnova |
| Pages: 1 2 3 4 5 6 7 8 9 |
| User | Post | ||
elixirnova Red Paratroopa Level: 22  Posts: 81/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| sure thing plus i now have somewhat an idea how to do it but a bit of a delima here it is: hrm its a bit big but ah well Public Sub CreateMetaTable(ByVal sFile As String, ByVal lOffset As Long, ByVal lNoTiles As Long) ' Temporary buffer for the 4BPP tiles Dim bTiles() As Byte, i As Long, cBitMask As Byte, ixMT As Integer, ixTile As Integer, mVal As Byte ' Indexed pixels (speed! speed!) Dim ix_1 As Long, ix_2 As Long, ix_3 As Long, ix_4 As Long ' Verify file If Dir$(sFile) = "" Then MsgBox("File not found [" & sFile & "]", vbCritical + vbOKOnly, "cls4BPP Class") Exit Sub End If ' Allocate memory for tiles If lNoTiles > 0 Then ReDim MetaTable((lNoTiles * 64) - 1) ReDim bTiles((lNoTiles * 32) - 1) Else MsgBox("Can't rip 0 tiles.", vbCritical + vbOKOnly, "cls4BPP Class") Exit Sub End If ' Get tiles FileOpen(FileNumber, sFile, OpenMode.Binary, OpenAccess.Read) FileGet(FileNumber, bTiles, lOffset + 1) FileClose(FileNumber) ' Create Meta Table For i = 0 To (lNoTiles - 1) For ixTile = 0 To 7 ' Reset bitmask cBitMask = 128 ix_1 = (i * 32) + (ixTile * 2) : ix_2 = (i * 32) + (ixTile * 2) + 1 ix_3 = (i * 32) + (ixTile * 2) + 16 : ix_4 = (i * 32) + (ixTile * 2) + 17 ' Coded in "loopless" form to gain some speed. MetaTable(i * 64 + ixTile * 8 + 0) = ((bTiles(ix_1) And cBitMask) / cBitMask) Or (((bTiles(ix_2) And cBitMask) / cBitMask) * 2) Or (((bTiles(ix_3) And cBitMask) / cBitMask) * 4) Or (((bTiles(ix_4) And cBitMask) / cBitMask) * 8) : cBitMask = RShift(cBitMask, 1) MetaTable(i * 64 + ixTile * 8 + 1) = ((bTiles(ix_1) And cBitMask) / cBitMask) Or (((bTiles(ix_2) And cBitMask) / cBitMask) * 2) Or (((bTiles(ix_3) And cBitMask) / cBitMask) * 4) Or (((bTiles(ix_4) And cBitMask) / cBitMask) * 8) : cBitMask = RShift(cBitMask, 1) MetaTable(i * 64 + ixTile * 8 + 2) = ((bTiles(ix_1) And cBitMask) / cBitMask) Or (((bTiles(ix_2) And cBitMask) / cBitMask) * 2) Or (((bTiles(ix_3) And cBitMask) / cBitMask) * 4) Or (((bTiles(ix_4) And cBitMask) / cBitMask) * 8) : cBitMask = RShift(cBitMask, 1) MetaTable(i * 64 + ixTile * 8 + 3) = ((bTiles(ix_1) And cBitMask) / cBitMask) Or (((bTiles(ix_2) And cBitMask) / cBitMask) * 2) Or (((bTiles(ix_3) And cBitMask) / cBitMask) * 4) Or (((bTiles(ix_4) And cBitMask) / cBitMask) * 8) : cBitMask = RShift(cBitMask, 1) MetaTable(i * 64 + ixTile * 8 + 4) = ((bTiles(ix_1) And cBitMask) / cBitMask) Or (((bTiles(ix_2) And cBitMask) / cBitMask) * 2) Or (((bTiles(ix_3) And cBitMask) / cBitMask) * 4) Or (((bTiles(ix_4) And cBitMask) / cBitMask) * 8) : cBitMask = RShift(cBitMask, 1) MetaTable(i * 64 + ixTile * 8 + 5) = ((bTiles(ix_1) And cBitMask) / cBitMask) Or (((bTiles(ix_2) And cBitMask) / cBitMask) * 2) Or (((bTiles(ix_3) And cBitMask) / cBitMask) * 4) Or (((bTiles(ix_4) And cBitMask) / cBitMask) * 8) : cBitMask = RShift(cBitMask, 1) MetaTable(i * 64 + ixTile * 8 + 6) = ((bTiles(ix_1) And cBitMask) / cBitMask) Or (((bTiles(ix_2) And cBitMask) / cBitMask) * 2) Or (((bTiles(ix_3) And cBitMask) / cBitMask) * 4) Or (((bTiles(ix_4) And cBitMask) / cBitMask) * 8) : cBitMask = RShift(cBitMask, 1) MetaTable(i * 64 + ixTile * 8 + 7) = ((bTiles(ix_1) And cBitMask) / cBitMask) Or (((bTiles(ix_2) And cBitMask) / cBitMask) * 2) Or (((bTiles(ix_3) And cBitMask) / cBitMask) * 4) Or (((bTiles(ix_4) And cBitMask) / cBitMask) * 8) : cBitMask = RShift(cBitMask, 1) Next ixTile Next i ' Wipe out bTiles Erase bTiles End Sub Private Function LShift(ByVal pnValue As Long, ByVal pnShift As Long) LShift = CByte((pnValue * (2 ^ pnShift)) And 255) End Function Private Function RShift(ByVal pnValue As Long, ByVal pnShift As Long) RShift = CByte((pnValue \ (2 ^ pnShift)) And 255) End Function ------------------------------------------------------ what all that does is takes two bytes and splits them up into a 4bpp pixels so metatable(0) would be a palette color 0-15 (16color palette) lets say metatable(0) = 1 and metatable(1) = 11 so now in binary i have 0000 0001 and 0000 1011 so now somehow ive got to convert each of these bytes in metatable back into this format saying a=metatable(0) b=metatable(1) c=metatable(2) d=metatable(3) ------------------ w=metatable(4) x=metatable(5) y=metatable(6) z=metatable(7) ------------------- so now lets make another graphic the binary equivalent a) xxxx nxxx and take the n bit from each of the letters a-d and rearrange them into a byte like this 'byte1 = aN bN cN dN 0000' and that being a binary value of the byte... ah and then somehow ive got to take wxyz in the previous example using the method 1 and placing their n bits like so 'byte2 =0000 wN xN yN zN' and then do (hexbyte1 being the first of the 2 bytes that make up one tile in an snes rom) hexbyte1 = byte1 + byte2 'which is now aN bN cN dN wN xN yN zN ---and then do the same with 8-15 and arrange them to = hexbyte2 and then simply save hexbyte1 , hexbyte2 to the rom... in that order... hrm though im gonna play around with it some more tomorrow SM gave me this algorythm that supposedly takes abcd's n value and puts it into the order aN bN cN dN 0000 here it is: byte1 = (a And &H80 + (b And &H80) / 2 + (c And &H80) / 4 + (d And &H80) / 8) i know thats alota stuff but maybe someone will be able to use it for somthing else. Anyhow i think i might be able to get it now. I'll post what I come up with tomorrow durring keyboarding. Maybe i'll come up with somthing that works  . |
|||
|
elixirnova Red Paratroopa Level: 22 Posts: 82/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| Welcome Holy Dragon! happy hacking... and posting crazy stuff! | |||
|
elixirnova Red Paratroopa Level: 22 Posts: 83/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| ah i use wmp for videos ... it works better than winamp... and my winamp3 is pretty slow so im thinking of either going to 5 or trying 2 again.... since i dont use the fancy features anyhow... | |||
|
elixirnova Red Paratroopa Level: 22 Posts: 84/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| very.. .interesting... lts all go **** apples now! | |||
|
elixirnova Red Paratroopa Level: 22 Posts: 85/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| i like your sprites O_o i wish i could do all that maybe im just too lazy... but the levels are very vivid and colorful except for a few little glitches... which can easily be fixed looks promising keep up the good work! ill look at them in more detail tomorrow +_+ im tired now :-P |
|||
|
elixirnova Red Paratroopa Level: 22 Posts: 86/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
Originally posted by MajinBlueDragon i am now 100% more confused than what i started as when i read this thread... seams to me like a little confusion those sprites are just credit images in that game... and offtopic but since green was big in japan i bet they didnt bother converting their green into a blue again like before so they just released it as leafgreen and firered (which is a followup to their old red and green) so it really should have been oceanblue and firered for us(which SHOULD be followups to red and blue versions US)... |
|||
|
elixirnova Red Paratroopa Level: 22 Posts: 87/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
ill have to look into it tomorrow...but i used to use zfe or somthing for zsnes roms i would imagine it would be best if you just had a seperate frontend for each system... and just have folder with shortcuts to each frontend in it  works for me. heheedit* wow that rhymed... (edited by elixirnova on 10-13-04 11:48 PM) |
|||
|
elixirnova Red Paratroopa Level: 22 Posts: 88/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| yeah i kinda grew up with sma... so i really liked its gfx and all i think it best suits the game... though most nes games are better with snes graphics. Except battletoads which on nes had some amazing graphics! | |||
|
elixirnova Red Paratroopa Level: 22 Posts: 89/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| ah i think this can be a legitit thread except it would be more proper to ask the official name of the rom... which could help you in finding it...*google hint hint* mine's filename is Legend_of_Zelda,_The_-_Ocarina_of_Time_(U)_(V1.0)_[!].v64 or try Legend of Zelda, The - Ocarina of Time (U) (V1.0) [!].v64 or you can always type in "important part of title" .v64 which in this case would be "Zelda" .v64 heh hope this helps but no asking for people to send you a rom or asking for a link*which you did not do, good job :-P* but that info should help you find one somewhere  |
|||
|
elixirnova Red Paratroopa Level: 22 Posts: 90/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| eh go get a hex editor namely FRHED search for it on google just select the first 0-200bytes and delete them from a copy of the rom keep a backup mind you and there ya go |
|||
|
elixirnova Red Paratroopa Level: 22 Posts: 91/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| thats not what squash told me I hear theres a secret feature if you fetch enough badgers O_o! | |||
|
elixirnova Red Paratroopa Level: 22 Posts: 92/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| Step 1: Get new Brain (yours doesnt seam to be functioning) Step 2: Decompress the GFX into ALLGFX.BIN Step 2.5: Load the AllGfx.Bin into a graphic editor Step 3: Use the adress given to locate the water graphic Step 4: Take a Nap... you probably need one after all the stress..... Step 5: Edit the graphic to whatever your heart can desire (runs and hides) Step 6: Save the graphic in your graphic editor. Step 7: Re-insert AllGfx.Bin into the rom using LM Step 8: Make a hack Step 9: Release the Hack Step 10(final) : Become famous.... THE END |
|||
|
elixirnova Red Paratroopa Level: 22 Posts: 93/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| bah gavin once again your link is wrong ya gotta have the http://www. or it will act like its a link off of board.acmlm.org/...................... | |||
|
elixirnova Red Paratroopa Level: 22 Posts: 94/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| once again ill post this since nobody helped the other time. I progressed a bit......................But i figured out how to take the bytes from my palette value and somehow i have to store the first byte as 49 but stored in my 2 vars is temp1 = 4 temp2 = 9 i used the following code to do this a b c d w x y z are vars holding pixel colors 0 - 7 respectively temp1 = ((a And &H8) Or ((b And &H8) / 2) Or ((c And &H8) / 4) Or ((d And &H8) / 8)) * &H10 temp2 = (w And &H8) Or ((x And &H8) / 2) Or ((y And &H8) / 4) Or ((z And &H8) / 8) So mainly my question is how do i take two numbers 0-F and make them one btw: 49 in binary = 0011 0001 ---4 in binary = 0100-----9 in binary = 1001 |
|||
|
elixirnova Red Paratroopa Level: 22 Posts: 95/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
That fix for the flicker glitch makes me tempted to go try this again  I never played thorugh the entire game though ive had it for quite some time maybe ill take a look |
|||
|
elixirnova Red Paratroopa Level: 22 Posts: 96/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| bah humbug ive got a few ill go see what ive got chksum64.exe n64.exe n64gfx.exe extend.exe n64gfxfrontend.exe and some demo? not much but i dont even know what they do :-P maybe ill check | |||
|
elixirnova Red Paratroopa Level: 22 Posts: 97/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
yea remember he has the other layers disabled  pretty nifty it looks like though |
|||
|
elixirnova Red Paratroopa Level: 22 Posts: 98/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| yes Gavin and TFG's site are great resources for gfx and vb stuff ill go find the link to tfg's site | |||
|
elixirnova Red Paratroopa Level: 22 Posts: 99/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| Hey wonderin what you guys think weather i should upgrade or get a new computer? im running an old HP computer its got 1.1ghz pentium 3, i think and around 400mb ram, pci 128mb ati radeon xxxx,cable internet connection,30gb hard drive brb gotta go class is over! | |||
|
elixirnova Red Paratroopa Level: 22 Posts: 100/177 EXP: 56507 For next: 1843 Since: 04-05-04 From: Midgar Since last post: 1 day Last activity: 1 day |
| ||
| Ah my problem is i need more hard drive space which can easily be upgraded though i also dont know if i need a new processor or more ram or maybe my video card isnt enough because i like to run newer games and emulate playstation and nintendo 64 roms which is a bit slowed down sometimes to where it crashes my computer so just wondering if its worth upgrading some games id like to run are: Doom 3 and Need for Speed underground 2, HALO 2, and other games around that level what kinda upgrades would i need or is it more worth it to just build a new system? |
| Pages: 1 2 3 4 5 6 7 8 9 |
| Acmlm's Board - I2 Archive - - Posts by elixirnova |
