flat assembler
> Examples and Tutorials > micro3dGoto page 1, 2 Next |
| Author |
|
|
download link is always same
approximate scripting frequency fletcher dunn, ian parberry - 3d math primer for graphics and game development, 2nd ed - 2011
Last edited by idle on 22 Nov 2017, 21:00; edited 41 times in total |
|||||||||||
11 May 2014, 08:49 |
|
|
Such a sweet cube deserves at least a positive comment. Thanks for the source code idle.
|
|||
|
24 May 2014, 06:20 |
|
|
Hi.
It seems scripting basis complete. It demonstrates general (fasm) idea (i'd like some were present in fasm), not yet connected to anything. Changed files: script.inc test\test script.exe test\test script.asm test\.txt test\dbug.txt Thanx. |
|||
|
07 Oct 2014, 10:03 |
|
|
hi
previous post deleted due to incompatibility changes rb, threads sync - bugs fixed if, hints, label naming (equ-s not used) - improved call, ret, while, bitmaps, drawing - experimental sse - not sure if needed, none hence todo 3d understanding: macgub: http://board.flatassembler.net/topic.php?t=15011 tthsqe: http://board.flatassembler.net/topic.php?t=14015 todo DrawAsCleverLines when shaded not drawn todo DrawAsPoligons smth like walls, colored closed buildings todo point_in_camera? new(quicker) formula, btw new modular drawing negated the problem Code:
incomp code - deleted
 Last edited by idle on 07 Jul 2015, 18:53; edited 1 time in total |
|||
|
26 Oct 2014, 03:15 |
|
|
Чётко. Thanks for sharing.
|
|||
|
26 Oct 2014, 03:43 |
|
|
Info, gui, script improvements.
Drawing left same :(due to life stalls):  |
|||
|
07 Nov 2014, 22:40 |
|
|
include once so-so works
new float-integer unification interface - 11 numeric datatypes supported info updated |
|||
|
18 Nov 2014, 16:22 |
|
|
Code:
Hi the board!
Happy to post an update, hope the last regarding syntax.
I persistently fly about drawing model - incomplete nor included.
P.S. l_inc: tnx for the rb-info from previous topics, do not be boring my silence
P.S. matrix: in that case i use mspaint |
|||
|
04 Jan 2015, 11:25 |
|
|
Code:
Hi.
Glad to see you again.
There'd been several improvements in syntax.
- use var= to set var both pre- and in- runtime
- use var== to set var in runtime only
- moded MessageBoxA,GetTickCount
- added InputBoxA,get_float,cdA,ReadFileA,GetFileSizeA
- added dangerous SetEndOfFileA,WriteFileA
- added constants dataseg,szFullNameBuf
- added ub - ui08 synonym
- added fustp_eax,fustp_ebxeax <- not used yet
- added more examples
eg Code:
;read file1 text
ioResult==ReadFileA(buffer file1 offset count)
;end text with null
ub[buffer+ioResult]=0
;cypher text
call cypher
goto cypher.
cypher:
c==ioResult
while c
ub[buffer+c-1]=ub[buffer+c-1] xor 'x'
c==c-1
end while
ret
.:
;store cyphered text to file2
ioResult==WriteFileA(buffer file2 offset ioResult)
;uncypher back and display
call cypher
MessageBoxA(buffer file1 0)
offset=0
count=65'535
buffer: rb count
file1: ub '../tst/file access, cypher.txt',0 && .:
file2: ub '../tst/cypher-ed.txt',0 && .:
eg Code:
szBuffer=512
buffer: rb szBuffer
intro: ub 'what is your age ?..',0 && .:
memcpy buffer intro (intro.-intro)
InputBoxA buffer szBuffer
age==get_float buffer
MinTeenAge==13
MaxTeenAge==19
if age isin 0 (MinTeenAge-1)
pause 'Hello boy/girl!'
elsif age isin MinTeenAge MaxTeenAge
pause 'Hello teen!'
else
pause 'Hello mr/s!'
endif
|
|||
|
14 Jun 2015, 08:26 |
|
|
hi
there'd been couple of improvements details inside see links from post #1 |
|||
|
07 Jul 2015, 19:10 |
|
|
hi
this version shipped with fedit control does any one know why WM_KEYUP not caught? ... nor accelerators (deleted entries currently) can? ... nor fedit catches menu hot keys, including enter |
|||
|
12 Jul 2015, 16:22 |
|
|
Good day!
I've just completed integration of fedit, hot keys and align. No further improvements expected until "real 3d" implemented. |
|||
|
19 Jul 2015, 09:55 |
|
|
Hi the board!
I've prepared a bunch of opengl essentials to this project and could not stay... see post #1 for the links. There is no opengl connected yet and i'd call this release preliminary one, my envision of what it should be. Good luck! |
|||
|
04 Jan 2016, 23:38 |
|
|
hi
i forgot to fix one of hard-coded displacements and = acted abnormally by default calculations done left-to-right (what i thought about :?) added extended slash \ comment paused/stopped ogl activity with this project, i think native is much better imho i hope some day macgub's ideas will get scripted :) maybe smth else ... download link always same |
|||
|
25 Feb 2016, 15:16 |
|
|
corrected \, added posboss, cmpsz
Code:
;incompatible code deleted
Last edited by idle on 29 Mar 2016, 12:28; edited 1 time in total |
|||
|
28 Feb 2016, 18:34 |
|
|
hi, see post #1 for the changes
|
|||
|
29 Mar 2016, 12:27 |
|
|
hi guys, could you please help me with macgub.txt attached at post #1
there are many people im inspired with, sorry whenever not mentioned tnx |
|||
|
14 Aug 2016, 19:51 |
|
|
Quote: .2a: ;can we avoid that ? Shl and sar instructions are caused by fixed point arthmetics. It was faster than floats in former times. Nowdays we have SSE and AVX. But I dont know if it are faster. I took effory in optimization, but I dont know it was sucessful. Modern CPUs are so fast and runs smooth all the code without fear.  |
|||
|
16 Aug 2016, 07:00 |
|
|
Code:
hi, here is one more update
see also 'inc\fonts\bmp32 fonts creator\' lazarus projects
source, examples included
;2016.08.27: added bmp32.pqFlipY gizmo ; added bmp32.pqFont.WidthGet, bmp32.pqFont.HeightGet, bmp32.pqFont.SetColor, bmp32.pqFont.TextOut gizmo
;2016.08.23: added bmp32.pqCopy gizmo
;2016.08.22: moded GetTickCount into a "constant" gizmo, see also: time. gizmos ; added ClockArrowSinCos math operator
;2016.08.20: added time.[year|month|DayOfWeek|day|hour|minute|second|millisecond] "constants" gizmo ; moded (esp tnx to Christian Ghisler - author of Total Commander) GetFileSizeA gizmo so that info of locked files like c:\pagefile.sys can be read
|
|||
|
27 Aug 2016, 16:31 |
|
|
hi, i slightly improved fonts, here is an example
Smth is wrong with my android text editor, in case the copy_pasta example does not work i beg your pardon. Code:
;reserve space for bmp template and write it
bmpTime: rb bmp32.szStruc + width*height*4 && bmp32 bmpTime width height
;11x22 bitmap font
bmpFont: rb bmp32.szStruc + 11*256 *22 *4
.file: ub '../inc\fonts\font11x22X256.win1251.bmp',0
ReadFileA(bmpFont .file 0 ($-bmpFont))
bmp32.pqFlipY(bmpFont)
;formating, see later
format: ub '%u',0
buffer: rb 128
align 4
argptr: rb 4
;bitmap center and Hour,Minute,Second arrows
centerX==width/2
centerY==height/2
if centerX<centerY
radius==centerX
else
radius==centerY
end if
radiusS==radius
radiusM==radius *75/100
radiusH==radius *50/100
loop:
bmp32.flush bmpTime 0x00'00'1e
;second arrow
x==radiusS*ClockArrowSinCos('cos' time.second) +centerX
y==radiusS*ClockArrowSinCos('sin' time.second) +centerY
bmp32.pqLineTo 0x00'00'ff bmpTime centerX centerY x y
ui32[argptr]=time.second && printfA(buffer 128 format argptr)
bmp32.pqFont.TextOut(bmpTime x y bmpFont 0x'00'00'ff buffer 2)
;minute arrow
x==radiusM*ClockArrowSinCos('cos' time.minute) +centerX
y==radiusM*ClockArrowSinCos('sin' time.minute) +centerY
bmp32.pqLineTo 0x00'ff'00 bmpTime centerX centerY x y
bmp32.pqLineTo 0x00'ee'00 bmpTime (centerX+1) (centerY+1) x y
ui32[argptr]=time.minute && printfA(buffer 128 format argptr)
bmp32.pqFont.TextOut(bmpTime x y bmpFont 0x00'ff'00 buffer 2)
;hour arrow
x==radiusH*ClockArrowSinCos('cos' (time.hour mod 12 * 5)) +centerX
y==radiusH*ClockArrowSinCos('sin' (time.hour mod 12 * 5)) +centerY
bmp32.pqLineTo 0x'ee'00'00 bmpTime (centerX-2) (centerY-2) x y
bmp32.pqLineTo 0x'ff'00'00 bmpTime centerX centerY x y
bmp32.pqLineTo 0x'ee'00'00 bmpTime (centerX+2) (centerY+2) x y
ui32[argptr]=time.hour && printfA(buffer 128 format argptr)
bmp32.pqFont.TextOut(bmpTime x y bmpFont 0x'ff'00'00 buffer 2)
bmp32.screen bmpTime
sleep 1000
goto loop
|
|||
|
28 Aug 2016, 11:05 |
|
| Goto page 1, 2 Next < Last Thread | Next Thread > |
Forum Rules:
|