• R/O
  • SSH
  • HTTPS

oricsdk: Commit


Commit MetaInfo

Revision1575 (tree)
Time2022-01-16 18:22:41
Authordbug

Log Message

Added the BASIC version of Geoff Phillips PAINT subroutine in the sample folder.

From the book "Oric Atmos and Oric 1 Graphics and Machine code techniques" available on the Oric library at https://library.defence-force.org/index.php?content=any&page=books&sort_by=name&freesearch=007084743

It is very slow, but it's an interesting example of how to use POINT, CURSET and manually do stack operations in BASIC.
Hopefully I'll managed to get the assembler version to run as well so we can compare the speed.

Change Summary

Incremental Difference

--- public/pc/tools/osdk/main/Osdk/_final_/sample/basic/paint/osdk_build.bat (nonexistent)
+++ public/pc/tools/osdk/main/Osdk/_final_/sample/basic/paint/osdk_build.bat (revision 1575)
@@ -0,0 +1,35 @@
1+@ECHO OFF
2+
3+
4+::
5+:: Initial check.
6+:: Verify if the SDK is correctly configurated
7+::
8+IF "%OSDK%"=="" GOTO ErCfg
9+
10+
11+::
12+:: Set the build paremeters
13+::
14+CALL osdk_config.bat
15+
16+
17+::
18+:: Launch the compilation of files
19+::
20+CALL %OSDK%\bin\make.bat %OSDKFILE%
21+GOTO End
22+
23+
24+::
25+:: Outputs an error message
26+::
27+:ErCfg
28+ECHO == ERROR ==
29+ECHO The Oric SDK was not configured properly
30+ECHO You should have a OSDK environment variable setted to the location of the SDK
31+IF "%OSDKBRIEF%"=="" PAUSE
32+GOTO End
33+
34+
35+:End
--- public/pc/tools/osdk/main/Osdk/_final_/sample/basic/paint/osdk_config.bat (nonexistent)
+++ public/pc/tools/osdk/main/Osdk/_final_/sample/basic/paint/osdk_config.bat (revision 1575)
@@ -0,0 +1,7 @@
1+@ECHO OFF
2+
3+::
4+:: Set the build paremeters
5+::
6+SET OSDKNAME=PAINT
7+SET OSDKFILE=main
--- public/pc/tools/osdk/main/Osdk/_final_/sample/basic/paint/osdk_execute.bat (nonexistent)
+++ public/pc/tools/osdk/main/Osdk/_final_/sample/basic/paint/osdk_execute.bat (revision 1575)
@@ -0,0 +1,31 @@
1+@ECHO OFF
2+
3+::
4+:: Initial check.
5+:: Verify if the SDK is correctly configurated,
6+::
7+IF "%OSDK%"=="" GOTO ErCfg
8+
9+::
10+:: Set the build paremeters
11+::
12+CALL osdk_config.bat
13+
14+::
15+:: Run the emulator using the common batch
16+::
17+CALL %OSDK%\bin\execute.bat
18+GOTO End
19+
20+::
21+:: Outputs an error message about configuration
22+::
23+:ErCfg
24+ECHO == ERROR ==
25+ECHO The Oric SDK was not configured properly
26+ECHO You should have a OSDK environment variable setted to the location of the SDK
27+ECHO ===========
28+IF "%OSDKBRIEF%"=="" PAUSE
29+GOTO End
30+
31+:End
Show on old repository browser