Compare commits

..

5 Commits

15 changed files with 76 additions and 45 deletions

6
.gitignore vendored
View File

@ -1,4 +1,8 @@
images/*
.DS_Store
build/gui
build/function_imaging
build/multibrot_imaging
*.o
*.ppu

View File

@ -8,4 +8,15 @@ Build project with **build.bat** then navigate to **build** folder and execute *
#### Troubleshooting
- If gui does not accept mouse clicks - disable "Quick Edit Mode" in command line properties (right click on cmd window header)
#### Results
![mandelbrot.png](./images/mandelbrot.png)
![multibrot.png](./images/multibrot.png)
![plots1.png](./images/plots1.png)
![plots2.png](./images/plots2.png)
![plots3.png](./images/plots3.png)
#### GUI (FreeVision)
![gui1.png](./images/gui1.png)
![gui2.png](./images/gui2.png)
by Artem K.

17
build.mac.sh Executable file
View File

@ -0,0 +1,17 @@
rm ./build/multibrot_imaging
rm ./build/function_imaging
rm ./build/gui
cd ./src
fpc multibrot_imaging.pas
mv multibrot_imaging ../build/
fpc function_imaging.pas
mv function_imaging ../build/
rm *.o
rm *.ppu
cd ./gui
fpc gui.pas -Fu/usr/local/Cellar/fpc/3.0.4_1/lib/fpc/3.0.4/units/x86_64-darwin/fv
mv gui ../../build/
rm *.o
rm *.ppu

View File

@ -1 +0,0 @@
fpc gui.pas -Fu/usr/local/Cellar/fpc/3.0.4_1/lib/fpc/3.0.4/units/x86_64-darwin/fv

View File

@ -1 +0,0 @@
./main 13 -100 1800

BIN
images/gui1.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 15 KiB

BIN
images/gui2.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 18 KiB

BIN
images/mandelbrot.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 54 KiB

BIN
images/multibrot.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 40 KiB

BIN
images/plots1.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 36 KiB

BIN
images/plots2.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 32 KiB

BIN
images/plots3.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 16 KiB

View File

@ -315,10 +315,11 @@ begin
r.a.y := r.b.y - 1;
New(StatusLine, Init(r,
NewStatusDef(0, $EFFF,
NewStatusKey('~Alt+X~ Exit', kbAltX, cmQuit,
NewStatusKey('~F3~ New', kbF3, cmMbNew,
NewStatusKey('~F2~ Exit', kbF2, cmQuit,
NewStatusKey('~F3~ New Mb', kbF3, cmMbNew,
NewStatusKey('~F4~ New Fn', kbF4, cmFnNew,
nil
)), nil)
))), nil)
));
end;

Binary file not shown.