Subversion Repositories Kolibri OS

Rev

Rev 3066 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 3066 Rev 5486
Line 1... Line 1...
1
; application : View3ds ver. 0.064 - tiny .3ds files viewer.
1
; application : View3ds ver. 0.065 - tiny .3ds and .asc files viewer.
2
; compiler    : FASM
2
; compiler    : FASM
3
; system      : KolibriOS
3
; system      : KolibriOS
4
; author      : Macgub aka Maciej Guba
4
; author      : Macgub aka Maciej Guba
5
; email       : macgub3@wp.pl
5
; email       : macgub3@wp.pl
6
; web         : www.macgub.hekko.pl
6
; web         : www.macgub.hekko.pl
Line 56... Line 56...
56
	call   read_param
56
	call   read_param
57
	call   read_from_disk	 ; read, if all is ok eax = 0
57
	call   read_from_disk	 ; read, if all is ok eax = 0
58
	cmp    eax,0
58
	cmp    eax,0
59
	jne    .gen
59
	jne    .gen
60
	call   read_tp_variables ; init points and triangles count variables
60
	mov    esi,[fptr]
-
 
61
	cmp    [esi],word 4D4Dh
-
 
62
	jne    .asc
-
 
63
	call   read_tp_variables ; init points and triangles count variables
61
	cmp    eax,0
64
	cmp    eax,0
62
	je     .gen
65
	je     .gen
63
	jmp    .malloc
66
	jmp    .malloc
64
    .gen:
67
    .gen:
65
     if USE_LFN
68
     if USE_LFN
Line 68... Line 71...
68
	call   alloc_mem_for_tp
71
	call   alloc_mem_for_tp
69
     end if
72
     end if
70
	call   generate_object
73
	call   generate_object
71
	jmp    .opt
74
	jmp    .opt
72
    .malloc:
75
    .asc:
-
 
76
	mov    [triangles_count_var],10000
-
 
77
	mov    [points_count_var],10000
-
 
78
	call   alloc_mem_for_tp
-
 
79
	call   read_asc
-
 
80
	jmp    .opt
-
 
81
    .malloc:
73
     if USE_LFN
82
     if USE_LFN
74
	call   alloc_mem_for_tp
83
	call   alloc_mem_for_tp
75
     end if
84
     end if
76
	call   read_from_file
85
	call   read_from_file
77
    .opt:
86
    .opt:
Line 710... Line 719...
710
include "GRD_CAT.INC"
719
include "GRD_CAT.INC"
711
include "BUMP_TEX.INC"
720
include "BUMP_TEX.INC"
712
include "GRD_TEX.INC"
721
include "GRD_TEX.INC"
713
include "TWO_TEX.INC"
722
include "TWO_TEX.INC"
714
 
723
include "ASC.INC"
-
 
724
 
Line 715... Line 725...
715
 
725
 
716
 
726