English Amiga Board


Go Back   English Amiga Board > Coders > Coders. Language > Coders. AMOS

 
 
Thread Tools
Old 23 June 2015, 22:44   #1
Schlachtwerk
68k RULEZ
Schlachtwerk's Avatar
 
Join Date: Jul 2010
Location: Germany
Posts: 199
Stos 2 amos

If Exits a Converter from STOS 2 AMOS or a Converter for the Sprite Banks ?

it is great shit to capture Sprite by Sprite and save a Screenshot .
Schlachtwerk is offline  
Old 24 June 2015, 04:16   #2
emufan
Registered User
 
Join Date: Feb 2012
Location: #DrainTheSwamp
Posts: 4,546
a user called Nyh at atari-forum wrote some routines to extract/convert a lot of atari stuff, including MBK data files:
Code:
Formats I can convert to BMP:
...
* STOS memory bank: .MBK (blocks, missinglink map, compressed picture, missinglink
map blocks, STOS spritebank, STOS icons, missinglink bobs, crackart, IMAG, tiny
and memorybanks packed with most popular ST packers)
...
in the last posting in this thread he attached sources and compiled tool. but you have to register to download.

edit: files are still there, included is compiled atari and win32 command line tool. and it does work.
just extracted a charset from such a mbk file - it made a bmp from it.

so register to the forum and add a message to his posting

Last edited by emufan; 24 June 2015 at 04:30.
emufan is offline  
Old 24 June 2015, 12:46   #3
Schlachtwerk
68k RULEZ
Schlachtwerk's Avatar
 
Join Date: Jul 2010
Location: Germany
Posts: 199
Thats only 32bit Photoshop PlugIns, thats will not work with Photoshop CC x64
Schlachtwerk is offline  
Old 24 June 2015, 17:33   #4
emufan
Registered User
 
Join Date: Feb 2012
Location: #DrainTheSwamp
Posts: 4,546
not the photoshop plugin, look again, the _last_ posting, by user Nyh.
as guest you see: "You do not have the required permissions to view the files attached to this post."
so register and you can download the tools incl source.
since noone gave a comment since 2010, i thought it is a good idea, you would register,
and give a comment if you really use the tools
emufan is offline  
Old 24 June 2015, 18:53   #5
Schlachtwerk
68k RULEZ
Schlachtwerk's Avatar
 
Join Date: Jul 2010
Location: Germany
Posts: 199
Okay i will register me show

Last edited by Schlachtwerk; 24 June 2015 at 19:07.
Schlachtwerk is offline  
Old 24 June 2015, 19:06   #6
Schlachtwerk
68k RULEZ
Schlachtwerk's Avatar
 
Join Date: Jul 2010
Location: Germany
Posts: 199
Nice st2bmp.exe will work well with the MBK file, thx for the Tip
Schlachtwerk is offline  
Old 24 June 2015, 20:36   #7
emufan
Registered User
 
Join Date: Feb 2012
Location: #DrainTheSwamp
Posts: 4,546
Quote:
Originally Posted by Schlachtwerk View Post
Nice st2bmp.exe will work well with the MBK file, thx for the Tip
cool, np
emufan is offline  
Old 25 June 2015, 01:11   #8
Schlachtwerk
68k RULEZ
Schlachtwerk's Avatar
 
Join Date: Jul 2010
Location: Germany
Posts: 199
Here a simple STOS 2 AMOS Sprite Converter in AMOS.
You can load a STOS MBK File and Save then a AMOS APK File, direct Convert.

Have Fun.

Repeat
Erase 6
NEW:
F$=Fsel$("*.MBK","","Please select the","STOS sprite bank to convert")
If F$=""
Default
End
End If
Open In 1,F$
L=Lof(1)
Close 1
If Instr(F$,".MBK")=0
Goto NEW
End If
Reserve As Work 6,L
Bload F$,Start(6)
ST=Start(6)+18
F$=F$-".MBK"
If Leek(ST)<>$19861987
Boom
Goto NEW
End If
Erase 10
Reserve As Work 10,L
Fill Start(10) To Start(10)+Length(10),0
AD=Start(10)
A$="AmSp"
Gosub BB
AB=ST+4+Leek(ST+4)
NB=Deek(ST+16)
Doke AD,NB
AD=AD+2
A=AB
For NN=0 To NB-1
Locate 0,10
Centre "Sprite"+Str$(NN+1)
SA=AB+NN*8
TX=Peek(SA+4)
TY=Peek(SA+5)
NP=4
Doke AD,TX
Doke AD+2,TY
Doke AD+4,NP
Doke AD+6,Peek(SA+6)
Doke AD+8,Peek(SA+7)
AD=AD+10
SA=AB+Leek(AB+NN*8)+TX*TY*2
For N=0 To NP-1
A=SA+N*2
For Y=0 To TY-1
AA=A+Y*TX*8
For X=0 To TX-1
Doke AD,Deek(AA+X*8)
AD=AD+2
Next X
Next Y
Next N
Next NN
APAL=Hunt(ST To ST+L,"PALT")+4
If APAL=4
End
End If
For X=0 To 15
Doke AD,Deek(APAL+X*2)*2
AD=AD+2
Next
For X=0 To 15
Doke AD,Deek(APAL+X*2)*2
AD=AD+2
Next
Locate 0,14
F$=Fsel$("*.ABK","","Please type the name","of the AMOS bank to save")
If Instr(Upper$(F$),".ABK")=0
F$=F$+".ABK"
End If
Centre "Saving "+F$
Bsave F$,Start(10) To AD
Clw
Until False
BB:
Loke AD,Leek(Varptr(A$))
AD=AD+4
Return
Loke AD,A
AD=AD+4
Return
Schlachtwerk is offline  
Old 25 June 2015, 13:54   #9
Schlachtwerk
68k RULEZ
Schlachtwerk's Avatar
 
Join Date: Jul 2010
Location: Germany
Posts: 199
Anyone have experience with the command STOS Collide how to implement it in with AMOS with Bob, I have not much idea BUMP. I have the test program as far as first converted the were changed to Bob the Sprites and I got it up and running, albeit with errors and with no collision, since I have not yet figured out how this is feasible. If it was grateful for tips.

Sorry for my English, Google make it Possible ^^
Schlachtwerk is offline  
 


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools

Similar Threads
Thread Thread Starter Forum Replies Last Post
How to use AMOS 3D with AMOS PRO? viddi Coders. AMOS 6 25 October 2012 23:11
f/s Amiga Amos Programming books / Disks / Easy Amos & other Books *mega collection!* fitzsteve MarketPlace 4 23 May 2012 04:35
Amos LaundroMat request.Apps 7 06 April 2002 04:26
Where's the amos.library on the 3-disk AMOS set? andreas support.Apps 0 15 November 2001 16:04
Amos Djay request.Apps 2 07 October 2001 01:10

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump


All times are GMT +2. The time now is 23:36.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, vBulletin Solutions Inc.
Page generated in 0.07355 seconds with 13 queries