NextBuild v7
v7 is now on github https://github.com/em00k/NextBuild
Sinclair ZX Spectrum Next Build Suite
v7 is now on github https://github.com/em00k/NextBuild
1.3 Fixed downloading issues. Files are now downloaded from github for hdfmonkey.Added right click context menu on right explorer It is still no possible to
Sorry for that. A few days ago a post on by Carlo Santagostino Spectrum For Everyone explained how he wanted to simulate the C64 PETSCII display
Little example of Plotting to Layer 2 using an adaption of the Rosetta Code sphere, John Metcalf’s improve SQR and a nice palette.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 |
rem rotating cube - '#!v '!bin "h:\test.bin" -a pause 0 #INCLUDE <nextlib.bas> #INCLUDE <memcopy.bas> NextReg(8,$fe) ' no contention NextReg(7,2) ' 14mhz NextReg($14,$0) ' Global transparency bits 7-0 = Transparency color value (0xE3 after a reset) NextReg($40,0) ' 16 = paper 0 on L2 palette index NextReg($41,$0) ' Palette Value NextReg($15,%00001011) NextReg($4A,0) ' Trasnparent Fallback NextReg($12,9) ' layer2 rams 16kb banks NextReg($13,12) ' layer2 shadow NextReg($13,12) ' layer2 shadow NextReg($43,%00010001 ) ' layer2 shadow PalUpload(@rainbow, 0,0) paper 0 : ink 6: border 0 : cls CLS256(0) : ShowLayer2(1) Dim R, R2, X, Y, C, D2, XA, YA, YT as integer dim Color as ubyte R = 100 : R2 = R * R : YA = 180 / 2 : XA = 256 / 2 For Y = -R To R ' for all the coordinates near the circle YT = Y * Y For X = -R To R ' which is under the sphere D2 = X * X + YT If D2 <= R2 Then ' coordinate is inside circle under sphere ' height of point on surface of sphere above X,Y C =(R2 - D2) ' color is proportional; offset X and Y, and asm ; use John Metcalfs fast sqr ; http://www.retroprogramming.com/2017/07/a-fast-z80-integer-square-root.html ld a,h : ld de,0B0C0h : add a,e : jr c,sq7 ld a,h : ld d,0F0h sq7: add a,d : jr nc,sq6 : res 5,d : db 254 sq6: sub d : sra d : set 2,d : add a,d : jr nc,sq5 res 3,d : db 254 sq5: sub d : sra d : inc d : add a,d : jr nc,sq4 res 1,d : db 254 sq4: sub d : sra d : ld h,a : add hl,de jr nc,sq3 : ld e,040h : db 210 sq3: sbc hl,de : sra d : ld a,e : rra or 010h : ld e,a : add hl,de : jr nc,sq2 and 0DFh : db 218 sq2: sbc hl,de : sra d : rra : or 04h : ld e,a add hl,de : jr nc,sq1 : and 0F7h : db 218 sq1: sbc hl,de : sra d : rra : inc a : ld e,a : add hl,de jr nc,sq0 : and 0FDh sq0: sra d : rra : cpl : ld hl,0 : ADD_HL_A ld (._C),a END ASM C = C - (( X + Y) / 2) + 100 Color = cast(ubyte,(C ) ) '>>1 ' = color RGB(0, C, C) PlotL2(X+XA,Y+YA,Color) End If Next Next Print at 23,0;"hit any key to end program" pause 0 End rainbow: asm incbin "rainbow.pal" end asm |
Yes I have been working on and with NextBuild pretty much non stop since the last update. This weekend I am locking down the features/improvements
Just a quick update to ensure I or the project inst dead already 🙂 http://zxbasic.uk/nextbuild/support-forum/topic/up-and-coming-updates/
There is no excerpt because this is a protected post.
In this article we will take a closer look at one of the included sources examples and examine what it does. Open the source folders
At the heart of NextBuild is the library that is included called nextlib.bas. This is what makes Boriel’s ZXB so flexible, being able to extend