Author Topic: Phactory problem  (Read 5154 times)

0 Members and 1 Guest are viewing this topic.

Online ervin

  • Supporter
  • 6128 Plus
  • *
  • Posts: 1.353
  • Country: au
    • index.php?action=treasury
  • Liked: 1014
  • Likes Given: 1195
Phactory problem
« on: 01:34, 04 November 11 »
Hi all.
 
I've downloaded norecess' Phactory, and from what I've seen so far, it is really good!
Could really help productivity.
 
However, I've hit a problem right at the start.
 
I've created a little asm program as per norecess' instructions. It looks like this:
 
Code: [Select]
org &4000
 
ld a,65
call &bb5a
 
ld a,66
call &bb5a
 
ld a,67
call &bb5a
 
ret

When I build it, Phactory opens winape and runs the program.
As expected, it prints "ABC" on the screen.
 
However, it performs a cls first, which I didn't want, and it resets winape after printing ABC.
 
Does anyone know what might be wrong?
Has anyone else had a go with Phactory?
 
My (cancelled) entry for the CPCRetroDev 2017 Competition http://www.cpcwiki.eu/forum/programming/my-cpcretrodev-2017-entry/
FAST line drawing in CPCtelera http://www.cpcwiki.eu/forum/programming/drawing-lines-with-cpctelera-sdcc/
RUNCPC My entry for the CPCRetroDev 2015 Competition http://www.cpc-power.com/index.php?page=detail&num=12494

Offline SuTeKH/Epyteor

  • 6128 Plus
  • ******
  • Posts: 1.378
  • Country: 00
  • Liked: 1286
  • Likes Given: 2030
Re: Phactory problem
« Reply #1 on: 09:23, 04 November 11 »
When I build it, Phactory opens winape and runs the program.
As expected, it prints "ABC" on the screen.
 
However, it performs a cls first, which I didn't want, and it resets winape after printing ABC.
 
Does anyone know what might be wrong?
Has anyone else had a go with Phactory?
This isn't PHACTORY's fault. Try creating an executable file with your 'ABC' program, you'll see that it does exactly the same.
I've attached a little .dsk to show you.
 
RUN"ABC.BAS" acts as if you've assembled the data in ASSEM, then CALLed as normal.
RUN"ABC.BIN" runs an executable M/C file, which is what PHACTORY is doing. (tested on JavaCPC and WinAPE)
 
EDIT: Executable BINARY files do not resolve to BASIC. If you want it to work in your projects and resolve back to a BASIC prompt, you will need to create a BASIC loader program first... or there's probably some code you need to add to do so; someone more knowledgable will be able to provide sources.
« Last Edit: 10:08, 04 November 11 by tastefulmrship »

Online ervin

  • Supporter
  • 6128 Plus
  • *
  • Posts: 1.353
  • Country: au
    • index.php?action=treasury
  • Liked: 1014
  • Likes Given: 1195
Re: Phactory problem
« Reply #2 on: 11:54, 04 November 11 »
Good lord, I am such a dumba$$.

That's exactly what I've been doing to run my Chunky Pixel Collision code that I've been writing using ccz80.
Why on earth I didn't realise that I'd need a BASIC loaded program is beyond me... geez.

Thanks for your quick reply - I can now get back to trying out Phactory.
If I don't have too much trouble learning C, I might convert chunky pixel collision to it as a test.

My (cancelled) entry for the CPCRetroDev 2017 Competition http://www.cpcwiki.eu/forum/programming/my-cpcretrodev-2017-entry/
FAST line drawing in CPCtelera http://www.cpcwiki.eu/forum/programming/drawing-lines-with-cpctelera-sdcc/
RUNCPC My entry for the CPCRetroDev 2015 Competition http://www.cpc-power.com/index.php?page=detail&num=12494

Offline SuTeKH/Epyteor

  • 6128 Plus
  • ******
  • Posts: 1.378
  • Country: 00
  • Liked: 1286
  • Likes Given: 2030
Re: Phactory problem
« Reply #3 on: 12:06, 04 November 11 »
Good lord, I am such a dumba$$.
Not really; sometimes a genius mind will overlook the easy things while trying to solve the hardest of problems.

Online ervin

  • Supporter
  • 6128 Plus
  • *
  • Posts: 1.353
  • Country: au
    • index.php?action=treasury
  • Liked: 1014
  • Likes Given: 1195
Re: Phactory problem
« Reply #4 on: 12:29, 04 November 11 »
Yeah, I'll go with that!  :D
My (cancelled) entry for the CPCRetroDev 2017 Competition http://www.cpcwiki.eu/forum/programming/my-cpcretrodev-2017-entry/
FAST line drawing in CPCtelera http://www.cpcwiki.eu/forum/programming/drawing-lines-with-cpctelera-sdcc/
RUNCPC My entry for the CPCRetroDev 2015 Competition http://www.cpc-power.com/index.php?page=detail&num=12494

Offline AMSDOS

  • Supporter
  • 6128 Plus
  • *
  • Posts: 3.893
  • Country: au
    • index.php?action=treasury
    • Programs for Turbo Pascal 3
  • Liked: 1104
  • Likes Given: 1869
Re: Phactory problem
« Reply #5 on: 13:26, 04 November 11 »
If you wanted to go all fancy you could make one of those BASIC stub files which call's the routine in question followed by END to return to BASIC. The routine that could be called could be something which shifts the relevant program to the right spot in memory and then called, followed by a RET after that which returns you to the END bit!  :laugh:  Saves having the extra loader file. On the later Covertapes, AA used these for their Menu's which was quite clever!  :)
* Using the old Amstrad Languages :D   * with the Firmware :P
* I also like to problem solve code in BASIC :)   * And type-in Type-Ins! :D

Home Computing Weekly Programs
Popular Computing Weekly Programs
Your Computer Programs
Updated Other Program Links on Profile Page (Update April 16/15 phew!)
Programs for Turbo Pascal 3

Online ervin

  • Supporter
  • 6128 Plus
  • *
  • Posts: 1.353
  • Country: au
    • index.php?action=treasury
  • Liked: 1014
  • Likes Given: 1195
Re: Phactory problem
« Reply #6 on: 13:34, 04 November 11 »
Interesting idea... might have to consider that one.
My (cancelled) entry for the CPCRetroDev 2017 Competition http://www.cpcwiki.eu/forum/programming/my-cpcretrodev-2017-entry/
FAST line drawing in CPCtelera http://www.cpcwiki.eu/forum/programming/drawing-lines-with-cpctelera-sdcc/
RUNCPC My entry for the CPCRetroDev 2015 Competition http://www.cpc-power.com/index.php?page=detail&num=12494

Offline TFM

  • Visit the mysteries of the CPC at www.futureos.de
  • Supporter
  • 6128 Plus
  • *
  • Posts: 9.899
  • Country: aq
  • Space Chicken for FutureOS is free!
    • index.php?action=treasury
    • FutureOS - The revolution on CPC!
  • Liked: 1981
  • Likes Given: 4650
Re: Phactory problem
« Reply #7 on: 21:37, 04 November 11 »
I'm just glad, that I don't have that kind of problems any longer. I start binaries directly the way I like it :laugh:
TFM of FutureSoft
Also visit the CPC and Plus users favorite OS: FutureOS - The Revolution on CPC6128 and 6128Plus

Offline AMSDOS

  • Supporter
  • 6128 Plus
  • *
  • Posts: 3.893
  • Country: au
    • index.php?action=treasury
    • Programs for Turbo Pascal 3
  • Liked: 1104
  • Likes Given: 1869
Re: Phactory problem
« Reply #8 on: 00:56, 05 November 11 »
Interesting idea... might have to consider that one.

There's a small article about it here. I think the other advantage of it is how it adds to the presentation of your program, though it works best once you've added the final touches to your program.
 
Disadvantages: I did this whole menu thing with graphics, colourful mode 1 text, threw on top of that a game of Harrier Attack so it was built-into that program, saved it (using a routine Firmware saving routine which saves as a BASIC file, with the set start address & length), which all worked out wonderful, except one problem. I forgot to put a MODE 1 at the start of my program!! I was horrified and I couldn't do anything about it, couldn't add MODE 1 to that program and couldn't add it in my routines!  :o  Though I've still got the file and I think I've got it on one of my Disk Images!  :laugh:
* Using the old Amstrad Languages :D   * with the Firmware :P
* I also like to problem solve code in BASIC :)   * And type-in Type-Ins! :D

Home Computing Weekly Programs
Popular Computing Weekly Programs
Your Computer Programs
Updated Other Program Links on Profile Page (Update April 16/15 phew!)
Programs for Turbo Pascal 3

Offline SuTeKH/Epyteor

  • 6128 Plus
  • ******
  • Posts: 1.378
  • Country: 00
  • Liked: 1286
  • Likes Given: 2030
Re: Phactory problem
« Reply #9 on: 09:21, 05 November 11 »
Disadvantages: I did this whole menu thing with graphics, colourful mode 1 text, threw on top of that a game of Harrier Attack so it was built-into that program, saved it (using a routine Firmware saving routine which saves as a BASIC file, with the set start address & length), which all worked out wonderful, except one problem. I forgot to put a MODE 1 at the start of my program!! I was horrified and I couldn't do anything about it, couldn't add MODE 1 to that program and couldn't add it in my routines!  :o  Though I've still got the file and I think I've got it on one of my Disk Images!  :laugh:
That article says that you can start your M/C program as low as &17C, but I'd recommend starting at &180. This is so you can add any 'emergency' commands to your BASIC 'loader'.
 
I came up with this while messing around with Devilmarkus's overscanned pictures via JavaCPC a while back;
Code: [Select]

0170 0E 00 0A 00 AD 20 0F 01
0178 83 20 1C 80 01 00 00 00
0180 --> Your program here!

The above code is BASICally; (see what I did there?)
Code: [Select]

10 MODE 1:CALL &180

0F at address &0176 denotes the MODE number; in this example MODE 1. For MODE 0, change it to 0E and for MODE 2 change it to 10.
 
@CPM/User
Where does your code start for this menu program? If it's beyond &17D, then it could be possible to insert the MODE 1 command before the CALL... and, from experience, all you would need to do is a basic SAVE command to save all changes. (ie without all that messy fiddling with BC7A and all in MAXAM)

Offline AMSDOS

  • Supporter
  • 6128 Plus
  • *
  • Posts: 3.893
  • Country: au
    • index.php?action=treasury
    • Programs for Turbo Pascal 3
  • Liked: 1104
  • Likes Given: 1869
Re: Phactory problem
« Reply #10 on: 11:10, 05 November 11 »
That article says that you can start your M/C program as low as &17C, but I'd recommend starting at &180. This is so you can add any 'emergency' commands to your BASIC 'loader'.
 
I came up with this while messing around with Devilmarkus's overscanned pictures via JavaCPC a while back;
Code: [Select]

0170 0E 00 0A 00 AD 20 0F 01
0178 83 20 1C 80 01 00 00 00
0180 --> Your program here!

The above code is BASICally; (see what I did there?)
Code: [Select]

10 MODE 1:CALL &180

0F at address &0176 denotes the MODE number; in this example MODE 1. For MODE 0, change it to 0E and for MODE 2 change it to 10.
 
@CPM/User
Where does your code start for this menu program? If it's beyond &17D, then it could be possible to insert the MODE 1 command before the CALL... and, from experience, all you would need to do is a basic SAVE command to save all changes. (ie without all that messy fiddling with BC7A and all in MAXAM)

This particular menu program I came up at the time is a combination of BASIC menu, selection and execution of program along with a compressed screen (which is displayed as soon as the Menu is running). Fortunately there is one line which could be used for the MODE 1, I just need to make sure it is equal length to the original line, otherwise everything else moves in the code, I think I can resolve this with some &20s which should be space.
* Using the old Amstrad Languages :D   * with the Firmware :P
* I also like to problem solve code in BASIC :)   * And type-in Type-Ins! :D

Home Computing Weekly Programs
Popular Computing Weekly Programs
Your Computer Programs
Updated Other Program Links on Profile Page (Update April 16/15 phew!)
Programs for Turbo Pascal 3

Offline SuTeKH/Epyteor

  • 6128 Plus
  • ******
  • Posts: 1.378
  • Country: 00
  • Liked: 1286
  • Likes Given: 2030
Re: Phactory problem
« Reply #11 on: 11:23, 05 November 11 »
I just need to make sure it is equal length to the original line, otherwise everything else moves in the code, I think I can resolve this with some &20s which should be space.
I don't believe changing BASIC 'code' will be as easy as adding spaces to lines and may need a lot of experimentation (but don't quote me). I would suggest adding NOPs (&00) to the very end of the BASIC 'code' instead (ie, before the z80 code kicks in) or possibly trying to stream-line your BASIC in some way; using single character variables instead of long words, removing duplicate routines and calling a single routine via GOSUB/RETURN, removing any REMs or unwanted commands, etc.
 
I'd be interested to see this menu system and your results once completed; if you would wish to share it with us. I always like to see people using BASIC instead of all this messy assembler nonsense; it's far overrated in my view*.
 
 
(* But that's possibly because I can't program in assember, but that's a different story)

Offline AMSDOS

  • Supporter
  • 6128 Plus
  • *
  • Posts: 3.893
  • Country: au
    • index.php?action=treasury
    • Programs for Turbo Pascal 3
  • Liked: 1104
  • Likes Given: 1869
Re: Phactory problem
« Reply #12 on: 12:36, 05 November 11 »
I don't believe changing BASIC 'code' will be as easy as adding spaces to lines and may need a lot of experimentation (but don't quote me). I would suggest adding NOPs (&00) to the very end of the BASIC 'code' instead (ie, before the z80 code kicks in) or possibly trying to stream-line your BASIC in some way; using single character variables instead of long words, removing duplicate routines and calling a single routine via GOSUB/RETURN, removing any REMs or unwanted commands, etc.
 
I'd be interested to see this menu system and your results once completed; if you would wish to share it with us. I always like to see people using BASIC instead of all this messy assembler nonsense; it's far overrated in my view*.
 
 
(* But that's possibly because I can't program in assember, but that's a different story)

And I thought Assembly was all you knew or did!  :o
 
I found some extra bytes which allowed me to slip in some M/C to Setup the Screen Mode, I've attached the Off-Topic Profanity with the Menu (isn't all that earth shattering)!
* Using the old Amstrad Languages :D   * with the Firmware :P
* I also like to problem solve code in BASIC :)   * And type-in Type-Ins! :D

Home Computing Weekly Programs
Popular Computing Weekly Programs
Your Computer Programs
Updated Other Program Links on Profile Page (Update April 16/15 phew!)
Programs for Turbo Pascal 3

Offline SuTeKH/Epyteor

  • 6128 Plus
  • ******
  • Posts: 1.378
  • Country: 00
  • Liked: 1286
  • Likes Given: 2030
Re: Phactory problem
« Reply #13 on: 13:28, 05 November 11 »
And I thought Assembly was all you knew or did!  :o
God, no! Just ask any of the assembler Gods here!
I love BASIC and FIRMWARE!
 
I found some extra bytes which allowed me to slip in some M/C to Setup the Screen Mode, I've attached the Off-Topic Profanity with the Menu (isn't all that earth shattering)!
It looks like you've got another 20 bytes spare before your LD A,1/CALL &BC0E to add any required code to.
 
I have one question, though; what does the FOR red = 0 TO 0 loop do at the beginning of the code? It seems redundant to me, but I may be missing something technical.
 
If you exomized these AMSOFT games, you could get a (or THE) whole collection singled-filed. Change to z80 code for the menu and have a bunch of packed game-files in succession. LDIR the required pack file to C000-FFFF, then de-exo to the required address and JP to the start of the game.
You could tag it to a &170 BASIC loader or executable BINARY file from &100 onwards. I reckon you might be looking at 20-25 games per 44k file! Easy! And 4 of these files per .dsk! Maybe 100 games on one AMSDOS disk! Wow!
 

Offline AMSDOS

  • Supporter
  • 6128 Plus
  • *
  • Posts: 3.893
  • Country: au
    • index.php?action=treasury
    • Programs for Turbo Pascal 3
  • Liked: 1104
  • Likes Given: 1869
Re: Phactory problem
« Reply #14 on: 14:24, 05 November 11 »
It looks like you've got another 20 bytes spare before your LD A,1/CALL &BC0E to add any required code to.

Heh yeah, to me I played it safe and had like 16 bytes free between one bit of code to another, it was pretty much moved into that place.
 
Quote
I have one question, though; what does the FOR red = 0 TO 0 loop do at the beginning of the code? It seems redundant to me, but I may be missing something technical.

Yeah, don't expect meaningful code from me from back in them days  :laugh:  I was still busy being a punk teenager hacking games and writing Menu's for them, they worked and then I'd move onto more games and more Menu's instead of acting like a normal teenager would!  :laugh: 
Though from that I can pretty much tell that I would of copied that bit of code from somewhere else (from a magazine), though it's funny cause I cannot seem to find the program in question (possibly from AA). That FOR loop specifically would have come into play if there was more DATA lines to be POKEd in. There isn't so yes that particular loop isn't required!  ;D  Beyond that it reads the contents of the DATA into a$ which is all of that M/C routine, the second FOR loops that DATA in until the length of a$ has been reached.
 
Quote
If you exomized these AMSOFT games, you could get a (or THE) whole collection singled-filed. Change to z80 code for the menu and have a bunch of packed game-files in succession. LDIR the required pack file to C000-FFFF, then de-exo to the required address and JP to the start of the game.
You could tag it to a &170 BASIC loader or executable BINARY file from &100 onwards. I reckon you might be looking at 20-25 games per 44k file! Easy! And 4 of these files per .dsk! Maybe 100 games on one AMSDOS disk! Wow!

You mean Compress into main memory, uncompress to screen and then move that code to where it goes into memory. I did have an idea like that at one stage and that maybe the reason why there's a few AMSOFT games on that Disk Image. Some AMSOFT games are too big in some sense to do that, though your smaller games 16k and under would certainally work!  ;D  Unfortunately I've sort of moved on a little bit from them days trying to make bigger things!  :(  Though they were fun to make your own little Menu's up, these days I'd probably resort to using my own little drawing routines which would produce screens like what you'd have on the Menu screen which might perhaps cut the length of it slightly, though them compressed screens were fairly well compressed!  :D
* Using the old Amstrad Languages :D   * with the Firmware :P
* I also like to problem solve code in BASIC :)   * And type-in Type-Ins! :D

Home Computing Weekly Programs
Popular Computing Weekly Programs
Your Computer Programs
Updated Other Program Links on Profile Page (Update April 16/15 phew!)
Programs for Turbo Pascal 3

Offline SuTeKH/Epyteor

  • 6128 Plus
  • ******
  • Posts: 1.378
  • Country: 00
  • Liked: 1286
  • Likes Given: 2030
Re: Phactory problem
« Reply #15 on: 14:47, 05 November 11 »
You mean Compress into main memory, uncompress to screen and then move that code to where it goes into memory. I did have an idea like that at one stage and that maybe the reason why there's a few AMSOFT games on that Disk Image. Some AMSOFT games are too big in some sense to do that, though your smaller games 16k and under would certainally work!
Not quite. I mean have a stack of packed data from, I dunno, &0500-&A500. Let the user pick a game, then LDIR whichever packed data-chunk is meant for that game to &C000 (the screen, which will need to be blanked first) and then decompress from &C000 to whatever address the game starts at. Finally, JP to the game's start address.
 
For example, the three games on that disc (ASTRO.BIN, BACK1.BIN, HAUNTED.BIN) take up just under 40k of space (3E80, 3A98, 2B18 bytes respectively), yet when compressed they only take up around 16k (15D1, 14B0, 13D1). So, it would be easy to have 7 or 8 games 'stacked up' per 40k file.

Offline AMSDOS

  • Supporter
  • 6128 Plus
  • *
  • Posts: 3.893
  • Country: au
    • index.php?action=treasury
    • Programs for Turbo Pascal 3
  • Liked: 1104
  • Likes Given: 1869
Re: Phactory problem
« Reply #16 on: 01:40, 06 November 11 »
Not quite. I mean have a stack of packed data from, I dunno, &0500-&A500. Let the user pick a game, then LDIR whichever packed data-chunk is meant for that game to &C000 (the screen, which will need to be blanked first) and then decompress from &C000 to whatever address the game starts at. Finally, JP to the game's start address.
 
For example, the three games on that disc (ASTRO.BIN, BACK1.BIN, HAUNTED.BIN) take up just under 40k of space (3E80, 3A98, 2B18 bytes respectively), yet when compressed they only take up around 16k (15D1, 14B0, 13D1). So, it would be easy to have 7 or 8 games 'stacked up' per 40k file.

Don't know about 7 or 8 games, depends on how good the compression is I suppose. The program I had in mind (SQ), is essentually a screen compressor so decompresses to screen and from there the program can be moved into it's proper place!  :)  The big plus with that program though is the compressed information can literally be called from anywhere in main memory (my menu is calling that screen from around &0400, though I think you can go even down to &0180 and possibly lower if you doing it in M/C, unsure though).
Other compressors probably do have some benefits compared with Screen Compressors though, I'm not sure though. Screen Compressors tend to look into patterns and re-occurring values though, so may have disadvantages over a Binary Compressor.
* Using the old Amstrad Languages :D   * with the Firmware :P
* I also like to problem solve code in BASIC :)   * And type-in Type-Ins! :D

Home Computing Weekly Programs
Popular Computing Weekly Programs
Your Computer Programs
Updated Other Program Links on Profile Page (Update April 16/15 phew!)
Programs for Turbo Pascal 3

Offline SuTeKH/Epyteor

  • 6128 Plus
  • ******
  • Posts: 1.378
  • Country: 00
  • Liked: 1286
  • Likes Given: 2030
Re: Phactory problem
« Reply #17 on: 10:01, 06 November 11 »
Don't know about 7 or 8 games, depends on how good the compression is I suppose. The program I had in mind (SQ), is essentually a screen compressor so decompresses to screen and from there the program can be moved into it's proper place!  :)  The big plus with that program though is the compressed information can literally be called from anywhere in main memory (my menu is calling that screen from around &0400, though I think you can go even down to &0180 and possibly lower if you doing it in M/C, unsure though).
Other compressors probably do have some benefits compared with Screen Compressors though, I'm not sure though. Screen Compressors tend to look into patterns and re-occurring values though, so may have disadvantages over a Binary Compressor.
I used exomizer on PC to compress the three games and WinAPE to transfer files between PC and CPC environments. The Z80 decompressor source code is supplied on the exomizer .dsk and will only require a few LDIR commands to move each 'pack' in memory. Due to their size, maybe using VRAM is a little over-enthusiastic and they could very well be happy enough sitting from &0080 onwards!

Offline TotO

  • 6128 Plus
  • ******
  • Posts: 3.755
  • Country: fr
    • ?area=showdonations;u=4
  • Liked: 2882
  • Likes Given: 1732
Re: Phactory problem
« Reply #18 on: 23:22, 11 November 11 »

I'm trying Phactory with C language, but I got this error:

Quote
------ Build started: Test2 ------

Compiling...
main.c
Compilation failed with 'main.asm'..
Log output:
ERROR on line 44 of file C:\Documents and Settings\Administrateur\Bureau\Test2\Resources\main.asm
ERROR: Symbol '_printf' is undefined
Build failed !


Here my simple "C code" test:

Code: [Select]
#include <stdio.h>


void main()
{
   unsigned int i;


   for(i=0;i<65535;i++)
   {
      printf("hello world!\n");
   }
}


If you can help me ? (stdio.h exist in the SDCC include directory)
Thank you. :)
« Last Edit: 23:25, 11 November 11 by TotO »
"You make one mistake in your life and the internet will never let you live it down" (Keith Goodyer)

Offline TFM

  • Visit the mysteries of the CPC at www.futureos.de
  • Supporter
  • 6128 Plus
  • *
  • Posts: 9.899
  • Country: aq
  • Space Chicken for FutureOS is free!
    • index.php?action=treasury
    • FutureOS - The revolution on CPC!
  • Liked: 1981
  • Likes Given: 4650
Re: Phactory problem
« Reply #19 on: 00:42, 12 November 11 »
Try SDCC alone, do you get the same error?
 
TFM of FutureSoft
Also visit the CPC and Plus users favorite OS: FutureOS - The Revolution on CPC6128 and 6128Plus

Online ervin

  • Supporter
  • 6128 Plus
  • *
  • Posts: 1.353
  • Country: au
    • index.php?action=treasury
  • Liked: 1014
  • Likes Given: 1195
Re: Phactory problem
« Reply #20 on: 03:39, 29 November 11 »
Hi all.
 
Alrighty, I give up.
I just can't figure out how to put a BASIC stub into a BIN file, and I have no idea how to get an actual BAS file into Phactory.
 
Can anyone help me?
I'm at wits end with this.
 
All I want to do is run this simple code correctly.
 
Code: [Select]

org &0200
ld a,65
call &bb5a
ld a,66
call &bb5a
ld a,67
call &bb5a
ld a,68
call &bb5a
ret
My (cancelled) entry for the CPCRetroDev 2017 Competition http://www.cpcwiki.eu/forum/programming/my-cpcretrodev-2017-entry/
FAST line drawing in CPCtelera http://www.cpcwiki.eu/forum/programming/drawing-lines-with-cpctelera-sdcc/
RUNCPC My entry for the CPCRetroDev 2015 Competition http://www.cpc-power.com/index.php?page=detail&num=12494

Offline AMSDOS

  • Supporter
  • 6128 Plus
  • *
  • Posts: 3.893
  • Country: au
    • index.php?action=treasury
    • Programs for Turbo Pascal 3
  • Liked: 1104
  • Likes Given: 1869
Re: Phactory problem
« Reply #21 on: 10:03, 29 November 11 »
Hi all.
 
Alrighty, I give up.
I just can't figure out how to put a BASIC stub into a BIN file, and I have no idea how to get an actual BAS file into Phactory.
 
Can anyone help me?
I'm at wits end with this.
 
All I want to do is run this simple code correctly.
 
Code: [Select]

org &0200
ld a,65
call &bb5a
ld a,66
call &bb5a
ld a,67
call &bb5a
ld a,68
call &bb5a
ret

I use a Monitor program, one that can Dissassemble, Memory Edit (with Hexidecimal and ASCII Input). From that I write a small routine to save the stub file:



From that moving down that small routine the 'B' register holds the length of the Filename (which must include the ".BAS" extension, so upto 12 characters), HL points to the start address of the filename, DE which I've put &170 in it is a Buffer which probably should be anywhere else (as long as 2k is allowed!  ;D ), &BC8C which opens up an output file. Following that HL is where the program begins, &170 being BASIC, the Length which goes into DE, I use a Monitor program to get the end address and subtract &170 from that to get the length, A holds the type of file it is, 0 for BASIC, &BC98 writes the file to Tape or Disc and &BC8F closes the output file, no entry conditions required for &BC8F.
 
I've attached this image to show how the M/C would come up with the stub file in the Memory Lister, as you can see there's a bit of room between where the BASIC stub file begins and ends and the M/C.


 
I think to get a Phactory program working from a BASIC stub file, you would setup a BASIC file:
 
Code: [Select]
10 call &200 ' or whatever
20 end

At &200 or instance you may have this:
 
Code: [Select]

ld hl, <where the phactory program is>
ld de,<where the phactory program needs to go>
ld bc,<size of it>
ldir
jp <where the phactory program is>
ret

So if you have a Binary file done in Phactory, a really good Monitor program like Lara can load it in place tell you the information like where it begins the length of it and an execution address which goes into that routine above which your BASIC stub bit is calling!  :)
« Last Edit: 10:06, 29 November 11 by CP/M User »
* Using the old Amstrad Languages :D   * with the Firmware :P
* I also like to problem solve code in BASIC :)   * And type-in Type-Ins! :D

Home Computing Weekly Programs
Popular Computing Weekly Programs
Your Computer Programs
Updated Other Program Links on Profile Page (Update April 16/15 phew!)
Programs for Turbo Pascal 3

Offline SuTeKH/Epyteor

  • 6128 Plus
  • ******
  • Posts: 1.378
  • Country: 00
  • Liked: 1286
  • Likes Given: 2030
Re: Phactory problem
« Reply #22 on: 11:18, 29 November 11 »
@ervin
Here's a little M/C routine that you can use to inject your M/Code into BASIC. It calculates everything for you.
All you need to do is stick the M/Code routine where shown and then CALL &A000. The .BAS file is created for you.

Code: [Select]

ORG &170
 
.BASIC_Start
DEFB &0A,&00,&0A,&00,&83,&20,&1C,&00 ; 10 CALL &200
DEFB &02,&00,&00,&00,&00,&00,&00,&00
 
; Insert M/Code routine or Phactory code here!
; For now, here's your ABCD example
ORG &0200
LD A,65
CALL &BB5A
LD A,66
CALL &BB5A
LD A,67
CALL &BB5A
LD A,68
CALL &BB5A
RET

; This line needs to be left in!
.BASIC_End
 
; This calculates the overall size of the 'BASIC' file (ie, BASIC & M/C together)
.BASIC_Length equ BASIC_End-BASIC_Start

; BASIC file SAVE routine
ORG &A000
LD B,Filename_Length
LD HL,Filename_Start
LD DE,&0000
CALL &BC8C
LD HL,&0170
LD DE,BASIC_Length
LD BC,&0000
LD A,0
CALL &BC98
CALL &BC8F
RET

; Filename can be anything you want! The code auto calculates filename length.
.Filename_Start
defm "BASIC.BAS"
.Filename_End
 
.Filename_Length equ Filename_End-Filename_Start

NOTE: Do not edit the BASIC 'listing' (ie, 10 CALL &200) as it will shift the M/Code routine up a number of memory locations! This could be fatal if you're CALLing or JPing to specific locations!
Also, If you want to CALL another location (rather than &200) then change the last byte of the first line and the first byte of the second line of 'BASIC' data!
« Last Edit: 11:33, 29 November 11 by tastefulmrship »

Offline Devilmarkus

  • Vivid source of indefiniteness
  • 6128 Plus
  • ******
  • Posts: 4.035
  • Country: de
  • WebCPC / JavaCPC developer
    • index.php?action=treasury
    • CPC-Live website
  • Liked: 1016
  • Likes Given: 926
Re: Phactory problem
« Reply #23 on: 11:31, 29 November 11 »
@ervin
Here's a little M/C routine that you can use to inject your M/Code into BASIC. It calculates everything for you.
All you need to do is stick the M/Code routine where shown and then CALL &A000. The .BAS file is created for you.

Code: [Select]

ORG &170
 
.BASIC_Start
DEFB &0A,&00,&0A,&00,&83,&20,&1C,&00 ; 10 CALL &200
DEFB &02,&00,&00,&00,&00,&00,&00,&00
 

Don't forget to manipulate the AMSDOS header later, when the file is saved, otherwise it will not start!
Change it from binary to basic.
It's located at offset 18 in the file.
    type:
     * 0 = BASIC
     * 1 = BASIC (prot.)
     * 2 = BINARY
     * 3 = BINARY (prot.)
     * 4 = IMAGE
     * 5 = IMAGE (prot.)
     * 6 = ASCII
     * 7 = ASCII (prot.)

(JavaCPC automatically writes the BASIC flag, when you store it with fileextension .bas, e.g.: write "DISK.BAS" )
When you put your ear on a hot stove, you can smell how stupid you are ...

Amstrad CPC games in your webbrowser

JavaCPC Desktop Full Release

Offline SuTeKH/Epyteor

  • 6128 Plus
  • ******
  • Posts: 1.378
  • Country: 00
  • Liked: 1286
  • Likes Given: 2030
Re: Phactory problem
« Reply #24 on: 11:35, 29 November 11 »
Don't forget to manipulate the AMSDOS header later, when the file is saved, otherwise it will not start!
Change it from binary to basic.
It's located at offset 18 in the file.
    type:
     * 0 = BASIC
     * 1 = BASIC (prot.)
     * 2 = BINARY
     * 3 = BINARY (prot.)
     * 4 = IMAGE
     * 5 = IMAGE (prot.)
     * 6 = ASCII
     * 7 = ASCII (prot.)

Do you mean this part of the program?
Code: [Select]

LD HL,&0170
LD DE,BASIC_Length
LD BC,&0000
LD A,0            <----- AMSDOS file type 0 - BASIC
CALL &BC98
CALL &BC8F

 
EDIT: Damn it! Why didn't I use XOR A instead of LD A,0? Ah well, doesn't matter in such a small program, I guess.
« Last Edit: 11:38, 29 November 11 by tastefulmrship »