
; Storm C Compiler
; MainCode.c
	mc68030
	mc68881
	XREF	_std__in
	XREF	_std__out
	XREF	_std__err
	XREF	_DOSBase
	XREF	_SysBase
	XREF	_UtilityBase

	SECTION ":0",CODE


	XDEF	_Makefilename
_Makefilename
L110	EQU	-$C
	link	a5,#L110
	movem.l	d2/d3/a6,-(a7)
L100
	moveq	#0,d2
	moveq	#0,d3
	move.l	_DOSBase,a6
	jsr	-$216(a6)
	move.l	d0,-$C(a5)
	move.l	#$200,d0
	move.l	_mypool,a0
	move.l	_SysBase,a6
	jsr	-$2C4(a6)
	move.l	d0,_myfilename
	move.l	#$200,d0
	move.l	_mypool,a0
	move.l	_SysBase,a6
	jsr	-$2C4(a6)
	move.l	d0,_myconfigfile
	move.l	_myfilename,a0
	cmp.w	#0,a0
	bne.b	L104
L101
	move.l	_myconfigfile,a0
	cmp.w	#0,a0
	beq.b	L109
L102
	bra.b	L104
L103
	move.l	-$C(a5),a1
	lea	0(a1,d2.l),a0
	move.b	(a0),d0
	move.l	_myfilename,a1
	lea	0(a1,d2.l),a0
	move.b	d0,(a0)
	move.l	-$C(a5),a1
	lea	0(a1,d2.l),a0
	move.b	(a0),d0
	move.l	_myconfigfile,a1
	lea	0(a1,d2.l),a0
	move.b	d0,(a0)
	addq.l	#1,d2
L104
	move.l	-$C(a5),a1
	lea	0(a1,d2.l),a0
	move.b	(a0),d0
	cmp.b	#$A,d0
	bne.b	L103
L105
	bra.b	L107
L106
	move.l	_myprefs,a1
	lea	0(a1,d3.l),a0
	move.b	(a0),d0
	move.l	_myconfigfile,a1
	lea	0(a1,d2.l),a0
	move.b	d0,(a0)
	addq.l	#1,d2
	addq.l	#1,d3
L107
	move.l	_myprefs,a1
	lea	0(a1,d3.l),a0
	move.b	(a0),d0
	bne.b	L106
L108
L109
	moveq	#0,d0
	movem.l	(a7)+,d2/d3/a6
	unlk	a5
	rts

	XDEF	_Makecopystring
_Makecopystring
L117	EQU	-4
	link	a5,#L117
	movem.l	d2/a6,-(a7)
L111
	moveq	#0,d2
	move.l	#$200,d0
	move.l	_mypool,a0
	move.l	_SysBase,a6
	jsr	-$2C4(a6)
	move.l	d0,_mycopystring
	move.l	_mycopystring,a0
	cmp.w	#0,a0
	beq.b	L116
L112
	bra.b	L114
L113
	move.l	_Emptystring,a1
	lea	0(a1,d2.l),a0
	move.b	(a0),d0
	move.l	_mycopystring,a1
	lea	0(a1,d2.l),a0
	move.b	d0,(a0)
	addq.l	#1,d2
L114
	move.l	_mycopystring,a1
	lea	0(a1,d2.l),a0
	move.b	(a0),d0
	bne.b	L113
L115
L116
	moveq	#0,d0
	movem.l	(a7)+,d2/a6
	unlk	a5
	rts

	XDEF	_checkNextwindow
_checkNextwindow
L126	EQU	-4
	link	a5,#L126
	movem.l	d2,-(a7)
L118
	moveq	#0,d0
	move.l	#1,_Ssearch
	bra.b	L123
L119
	move.l	_otherwindow,a0
	move.l	$20(a0),a0
	add.l	d0,a0
	move.b	(a0),d2
	move.l	_SearchString,a1
	lea	0(a1,d0.l),a0
	move.b	(a0),d1
	cmp.b	d1,d2
	bne.b	L121
L120
	addq.l	#1,d0
	bra.b	L123
L121
	clr.l	_Ssearch
L122
L123
	move.l	_Ssearch,d1
	cmp.l	#1,d1
	bne.b	L125
L124
	cmp.l	#7,d0
	blt.b	L119
L125
	moveq	#0,d0
	movem.l	(a7)+,d2
	unlk	a5
	rts

	XDEF	_calculate_windows
_calculate_windows
L154	EQU	-$10
	link	a5,#L154
	movem.l	d2-d5/a6,-(a7)
L127
	moveq	#0,d3
	moveq	#0,d2
	moveq	#0,d0
	moveq	#0,d1
	move.l	_otherwindow,a0
	move.w	$8(a0),d0
	ext.l	d0
	move.l	d0,d3
	move.l	_otherwindow,a0
	move.w	$A(a0),d0
	ext.l	d0
	move.l	d0,d2
	move.l	_otherwindow,a0
	move.w	4(a0),d0
	ext.l	d0
	move.l	_otherwindow,a0
	move.w	6(a0),d1
	ext.l	d1
	move.l	_installerpos,d4
	cmp.l	#1,d4
	bne.b	L129
L128
	move.l	_myscreenX,d4
	divsl.l	#4,d4
	divsl.l	#2,d3
	sub.l	d3,d4
	sub.l	d0,d4
	move.l	d4,d0
	move.l	_myscreenY,d3
	divsl.l	#4,d3
	divsl.l	#2,d2
	sub.l	d2,d3
	sub.l	d1,d3
	move.l	d3,d1
	bra	L153
L129
	move.l	_installerpos,d4
	cmp.l	#2,d4
	bne.b	L131
L130
	move.l	_myscreenX,d4
	divsl.l	#2,d4
	divsl.l	#2,d3
	sub.l	d3,d4
	sub.l	d0,d4
	move.l	d4,d0
	move.l	_myscreenY,d3
	divsl.l	#4,d3
	divsl.l	#2,d2
	sub.l	d2,d3
	sub.l	d1,d3
	move.l	d3,d1
	bra	L153
L131
	move.l	_installerpos,d4
	cmp.l	#3,d4
	bne.b	L133
L132
	move.l	_myscreenX,d4
	divsl.l	#4,d4
	muls.l	#3,d4
	divsl.l	#2,d3
	sub.l	d3,d4
	sub.l	d0,d4
	move.l	d4,d0
	move.l	_myscreenY,d3
	divsl.l	#4,d3
	divsl.l	#2,d2
	sub.l	d2,d3
	sub.l	d1,d3
	move.l	d3,d1
	bra	L153
L133
	move.l	_installerpos,d4
	cmp.l	#4,d4
	bne.b	L135
L134
	move.l	_myscreenX,d4
	divsl.l	#4,d4
	divsl.l	#2,d3
	sub.l	d3,d4
	sub.l	d0,d4
	move.l	d4,d0
	move.l	_myscreenY,d3
	divsl.l	#2,d3
	divsl.l	#2,d2
	sub.l	d2,d3
	sub.l	d1,d3
	move.l	d3,d1
	bra	L153
L135
	move.l	_installerpos,d4
	cmp.l	#5,d4
	bne.b	L137
L136
	moveq	#0,d0
	moveq	#0,d1
	bra	L153
L137
	move.l	_installerpos,d4
	cmp.l	#6,d4
	bne.b	L139
L138
	move.l	_myscreenX,d4
	divsl.l	#4,d4
	muls.l	#3,d4
	divsl.l	#2,d3
	sub.l	d3,d4
	sub.l	d0,d4
	move.l	d4,d0
	move.l	_myscreenY,d3
	divsl.l	#2,d3
	divsl.l	#2,d2
	sub.l	d2,d3
	sub.l	d1,d3
	move.l	d3,d1
	bra	L153
L139
	move.l	_installerpos,d4
	cmp.l	#7,d4
	bne.b	L141
L140
	move.l	_myscreenX,d4
	divsl.l	#4,d4
	divsl.l	#2,d3
	sub.l	d3,d4
	sub.l	d0,d4
	move.l	d4,d0
	move.l	_myscreenY,d3
	divsl.l	#4,d3
	muls.l	#3,d3
	divsl.l	#2,d2
	sub.l	d2,d3
	sub.l	d1,d3
	move.l	d3,d1
	bra	L153
L141
	move.l	_installerpos,d4
	cmp.l	#$8,d4
	bne.b	L143
L142
	move.l	_myscreenX,d4
	divsl.l	#2,d4
	divsl.l	#2,d3
	sub.l	d3,d4
	sub.l	d0,d4
	move.l	d4,d0
	move.l	_myscreenY,d3
	divsl.l	#4,d3
	muls.l	#3,d3
	divsl.l	#2,d2
	sub.l	d2,d3
	sub.l	d1,d3
	move.l	d3,d1
	bra.b	L153
L143
	move.l	_installerpos,d4
	cmp.l	#$9,d4
	bne.b	L153
L144
	move.l	_myscreenX,d4
	divsl.l	#4,d4
	muls.l	#3,d4
	divsl.l	#2,d3
	sub.l	d3,d4
	sub.l	d0,d4
	move.l	d4,d0
	move.l	_myscreenY,d3
	divsl.l	#4,d3
	muls.l	#3,d3
	divsl.l	#2,d2
	sub.l	d2,d3
	sub.l	d1,d3
	move.l	d3,d1
L145
L146
L147
L148
L149
L150
L151
L152
L153
	move.l	_otherwindow,a0
	move.l	_IntuitionBase,a6
	jsr	-$A8(a6)
	moveq	#0,d0
	movem.l	(a7)+,d2-d5/a6
	unlk	a5
	rts

	XDEF	_moveInstaller
_moveInstaller
L165	EQU	0
	link	a5,#L165
	movem.l	a6,-(a7)
L156
	lea	L155(pc),a0
	move.l	_IntuitionBase,a6
	jsr	-$1FE(a6)
	move.l	d0,_mylockscreen
	move.l	_mylockscreen,a0
	move.w	$C(a0),d0
	ext.l	d0
	move.l	d0,_myscreenX
	move.l	_mylockscreen,a0
	move.w	$E(a0),d0
	ext.l	d0
	move.l	d0,_myscreenY
	move.l	_mylockscreen,a0
	move.l	4(a0),a0
	move.l	a0,_otherwindow
	bra.b	L162
L157
	move.l	_otherwindow,a0
	move.l	$20(a0),a0
	cmp.w	#0,a0
	beq.b	L161
L158
	jsr	_checkNextwindow
	tst.l	_Ssearch
	beq.b	L161
L159
	jsr	_calculate_windows
	bra.b	L164
L160
L161
	move.l	_otherwindow,a0
	move.l	(a0),a0
	move.l	a0,_otherwindow
L162
	tst.l	_otherwindow
	bne.b	L157
L163
L164
	sub.l	a0,a0
	move.l	_mylockscreen,a1
	move.l	_IntuitionBase,a6
	jsr	-$204(a6)
	moveq	#0,d0
	movem.l	(a7)+,a6
	unlk	a5
	rts

	XDEF	_readfileSimple
_readfileSimple
L183	EQU	-$8
	link	a5,#L183
	movem.l	d2/d3/a6,-(a7)
L166
	moveq	#$A,d3
	moveq	#0,d0
	clr.l	_myallocmem
	clr.l	_myopenfile
	move.l	d3,d0
	move.l	_mypool,a0
	move.l	_SysBase,a6
	jsr	-$2C4(a6)
	move.l	d0,_myallocmem
	move.l	_myallocmem,a0
	cmp.w	#0,a0
	beq	L182
L167
	move.l	_myconfigfile,d1
	move.l	#$3ED,d2
	move.l	_DOSBase,a6
	jsr	-$1E(a6)
	move.l	d0,_myopenfile
	tst.l	_myopenfile
	beq	L181
L168
	move.l	_myopenfile,d1
	move.l	_myallocmem,d2
	move.l	_DOSBase,a6
	jsr	-$2A(a6)
	move.l	_myallocmem,a1
	lea	(a1),a0
	move.b	(a0),d0
	extb.l	d0
	sub.l	#$30,d0
	move.l	d0,_inputpos
	move.l	_inputpos,d0
	cmp.l	#$9,d0
	bgt.b	L170
L169
	move.l	_inputpos,d0
	cmp.l	#1,d0
	bge.b	L171
L170
	move.l	#1,_inputpos
L171
	move.l	_myallocmem,a1
	lea	1(a1),a0
	move.b	(a0),d0
	extb.l	d0
	sub.l	#$30,d0
	move.l	d0,_myborderless
	move.l	_myborderless,d0
	cmp.l	#1,d0
	bgt.b	L173
L172
	tst.l	_myborderless
	bpl.b	L174
L173
	clr.l	_myborderless
L174
	move.l	_myallocmem,a1
	lea	2(a1),a0
	move.b	(a0),d0
	extb.l	d0
	sub.l	#$30,d0
	move.l	d0,_mybackdrop
	move.l	_mybackdrop,d0
	cmp.l	#1,d0
	bgt.b	L176
L175
	tst.l	_mybackdrop
	bpl.b	L177
L176
	clr.l	_mybackdrop
L177
	move.l	_myallocmem,a1
	lea	3(a1),a0
	move.b	(a0),d0
	extb.l	d0
	sub.l	#$30,d0
	move.l	d0,_installerpos
	move.l	_installerpos,d0
	cmp.l	#$9,d0
	bgt.b	L179
L178
	move.l	_installerpos,d0
	cmp.l	#1,d0
	bge.b	L180
L179
	move.l	#$9,_installerpos
L180
	move.l	_myopenfile,d1
	move.l	_DOSBase,a6
	jsr	-$24(a6)
L181
	move.l	d3,d0
	move.l	_mypool,a0
	move.l	_myallocmem,a1
	move.l	_SysBase,a6
	jsr	-$2CA(a6)
L182
	moveq	#0,d0
	movem.l	(a7)+,d2/d3/a6
	unlk	a5
	rts

	XDEF	_mycopyfile
_mycopyfile
L185	EQU	0
	link	a5,#L185
	movem.l	d2/d3/a6,-(a7)
L184
	move.l	_mycopystring,d1
	moveq	#0,d2
	moveq	#0,d3
	move.l	_DOSBase,a6
	jsr	-$DE(a6)
	moveq	#0,d0
	movem.l	(a7)+,d2/d3/a6
	unlk	a5
	rts

	XDEF	_mydeletefile
_mydeletefile
L187	EQU	0
	link	a5,#L187
	movem.l	d2/d3/a6,-(a7)
L186
	move.l	_mydeletestring,d1
	moveq	#0,d2
	moveq	#0,d3
	move.l	_DOSBase,a6
	jsr	-$DE(a6)
	moveq	#0,d0
	movem.l	(a7)+,d2/d3/a6
	unlk	a5
	rts

	XDEF	_notify
_notify
L189	EQU	-$30
	link	a5,#L189
	movem.l	a2/a6,-(a7)
	move.l	$8(a5),a1
L188
	lea	-$30(a5),a0
	clr.l	(a0)+
	moveq	#$A,d0
L190
	clr.l	(a0)+
	dbra	d0,L190
	move.l	#2,-$24(a5)
	move.l	_mytask,-$20(a5)
	move.b	_mysignal+3,d0
	move.b	d0,-$1C(a5)
	move.l	a1,-$30(a5)
	lea	-$30(a5),a0
	move.l	a0,d1
	move.l	_DOSBase,a6
	jsr	-$378(a6)
	moveq	#1,d0
	move.l	_mysignal,d1
	asl.l	d1,d0
	move.l	_SysBase,a6
	jsr	-$13E(a6)
	lea	-$30(a5),a0
	move.l	a0,d1
	move.l	_DOSBase,a6
	jsr	-$37E(a6)
	moveq	#0,d0
	movem.l	(a7)+,a2/a6
	unlk	a5
	rts

	XDEF	_wait_for_datatype
_wait_for_datatype
L218	EQU	-$22
	link	a5,#L218
	movem.l	d2/a2/a3/a6,-(a7)
L191
	moveq	#1,d2
	bra	L216
L192
	move.l	_Mywindow,a0
	move.l	$56(a0),a0
	move.b	$F(a0),d0
	and.l	#$FF,d0
	moveq	#1,d1
	asl.l	d0,d1
	move.l	d1,d0
	or.l	#$1000,d0
	move.l	_SysBase,a6
	jsr	-$13E(a6)
	and.l	#$1000,d0
	beq	L214
L193
	moveq	#0,d2
L194
	bra	L214
L195
	move.l	-$A(a5),a0
	move.l	$14(a0),d0
	cmp.l	#$200000,d0
	beq.b	L197
	bgt.b	L219
	cmp.l	#$200,d0
	beq.b	L196
	bra	L213
L219
	cmp.l	#$800000,d0
	beq.b	L200
	bra	L213
L196
	moveq	#0,d2
	bra	L213
L197
	move.l	-$A(a5),a0
	move.w	$18(a0),d0
	cmp.w	#$51,d0
	beq.b	L198
	bgt.b	L220
	cmp.w	#$1B,d0
	beq.b	L198
	bra	L213
L220
	cmp.w	#$71,d0
	beq.b	L198
	bra	L213
L198
	moveq	#0,d2
L199
	bra	L213
L200
	move.l	-$A(a5),a0
	move.l	$1C(a0),a0
	move.l	a0,-$16(a5)
	move.l	-$16(a5),-$E(a5)
	bra	L211
L201
	move.l	4(a0),d0
	move.l	d0,d1
	move.l	(a0),d0
	cmp.l	#$8000101D,d0
	beq	L209
	bgt.b	L221
	cmp.l	#$8000101C,d0
	beq.b	L202
	bra	L211
L221
	cmp.l	#$80001020,d0
	beq	L206
	bra	L211
L202
	tst.l	d1
	beq.b	L204
L203
	clr.l	-(a7)
	pea	1.w
	move.l	#$80000098,-(a7)
	move.l	_Mywindow,a0
	move.l	a7,a1
	move.l	_IntuitionBase,a6
	jsr	-$330(a6)
	add.w	#$C,a7
	bra	L211
L204
	clr.l	-(a7)
	clr.l	-(a7)
	move.l	#$80000097,-(a7)
	move.l	_Mywindow,a0
	move.l	a7,a1
	move.l	_IntuitionBase,a6
	jsr	-$330(a6)
	add.w	#$C,a7
L205
	bra.b	L211
L206
	tst.l	d1
	beq.b	L211
L207
	move.l	#$80001021,d0
	moveq	#0,d1
	move.l	-$16(a5),a0
	move.l	_UtilityBase,a6
	jsr	-$24(a6)
L208
	bra.b	L211
L209
	clr.l	-(a7)
	move.l	_mydataobject,a0
	move.l	_Mywindow,a1
	sub.l	a2,a2
	move.l	a7,a3
	move.l	_DataTypesBase,a6
	jsr	-$4E(a6)
	addq.w	#4,a7
	moveq	#0,d2
L210
L211
	lea	-$E(a5),a0
	move.l	_UtilityBase,a6
	jsr	-$30(a6)
	move.l	d0,a0
	cmp.w	#0,a0
	bne	L201
L212
L213
	move.l	-$A(a5),a1
	move.l	_SysBase,a6
	jsr	-$17A(a6)
L214
	move.l	_Mywindow,a0
	move.l	$56(a0),a0
	move.l	_SysBase,a6
	jsr	-$174(a6)
	move.l	d0,-$A(a5)
	tst.l	-$A(a5)
	bne	L195
L215
L216
	tst.w	d2
	bne	L192
L217
	moveq	#0,d0
	movem.l	(a7)+,d2/a2/a3/a6
	unlk	a5
	rts

	XDEF	_get_screen_information
_get_screen_information
L225	EQU	0
	link	a5,#L225
	movem.l	a6,-(a7)
L222
	lea	L155(pc),a0
	move.l	_IntuitionBase,a6
	jsr	-$1FE(a6)
	move.l	d0,_mylockscreen
	move.l	_mylockscreen,a0
	move.w	$C(a0),d0
	ext.l	d0
	move.l	d0,_myscreenX
	move.l	_mylockscreen,a0
	move.w	$E(a0),d0
	ext.l	d0
	move.l	d0,_myscreenY
	tst.l	_myborderless
	bne.b	L224
L223
	move.l	_mylockscreen,a0
	move.b	$23(a0),d0
	extb.l	d0
	move.l	d0,_winbordertop
	move.l	_mylockscreen,a0
	move.b	$24(a0),d0
	extb.l	d0
	move.l	d0,_winborderleft
L224
	sub.l	a0,a0
	move.l	_mylockscreen,a1
	move.l	_IntuitionBase,a6
	jsr	-$204(a6)
	moveq	#0,d0
	movem.l	(a7)+,a6
	unlk	a5
	rts

	XDEF	_calculate_window
_calculate_window
L253	EQU	0
	link	a5,#L253
	movem.l	d2/a2/a6,-(a7)
L226
	clr.l	-(a7)
	lea	_mybmhd,a0
	move.l	a0,-(a7)
	move.l	#$800010C9,-(a7)
	move.l	_mydataobject,a0
	move.l	a7,a2
	move.l	_DataTypesBase,a6
	jsr	-$42(a6)
	add.w	#$C,a7
	move.l	_mybmhd,a0
	move.w	(a0),d0
	and.l	#$FFFF,d0
	move.l	d0,_mywindowX
	move.l	_mybmhd,a0
	move.w	2(a0),d0
	and.l	#$FFFF,d0
	move.l	d0,_mywindowY
	move.l	_inputpos,d0
	cmp.l	#1,d0
	bne	L228
L227
	move.l	_myscreenX,d0
	divsl.l	#4,d0
	move.l	_mywindowX,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterX
	move.l	_myscreenY,d0
	divsl.l	#4,d0
	move.l	_mywindowY,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterY
	bra	L252
L228
	move.l	_inputpos,d0
	cmp.l	#2,d0
	bne	L230
L229
	move.l	_myscreenX,d0
	divsl.l	#2,d0
	move.l	_mywindowX,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterX
	move.l	_myscreenY,d0
	divsl.l	#4,d0
	move.l	_mywindowY,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterY
	bra	L252
L230
	move.l	_inputpos,d0
	cmp.l	#3,d0
	bne	L232
L231
	move.l	_myscreenX,d0
	divsl.l	#4,d0
	muls.l	#3,d0
	move.l	_mywindowX,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterX
	move.l	_myscreenY,d0
	divsl.l	#4,d0
	move.l	_mywindowY,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterY
	bra	L252
L232
	move.l	_inputpos,d0
	cmp.l	#4,d0
	bne	L234
L233
	move.l	_myscreenX,d0
	divsl.l	#4,d0
	move.l	_mywindowX,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterX
	move.l	_myscreenY,d0
	divsl.l	#2,d0
	move.l	_mywindowY,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterY
	bra	L252
L234
	move.l	_inputpos,d0
	cmp.l	#5,d0
	bne	L236
L235
	move.l	_myscreenX,d0
	divsl.l	#2,d0
	move.l	_mywindowX,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterX
	move.l	_myscreenY,d0
	divsl.l	#2,d0
	move.l	_mywindowY,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterY
	bra	L252
L236
	move.l	_inputpos,d0
	cmp.l	#6,d0
	bne	L238
L237
	move.l	_myscreenX,d0
	divsl.l	#4,d0
	muls.l	#3,d0
	move.l	_mywindowX,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterX
	move.l	_myscreenY,d0
	divsl.l	#2,d0
	move.l	_mywindowY,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterY
	bra	L252
L238
	move.l	_inputpos,d0
	cmp.l	#7,d0
	bne	L240
L239
	move.l	_myscreenX,d0
	divsl.l	#4,d0
	move.l	_mywindowX,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterX
	move.l	_myscreenY,d0
	divsl.l	#4,d0
	muls.l	#3,d0
	move.l	_mywindowY,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterY
	bra	L252
L240
	move.l	_inputpos,d0
	cmp.l	#$8,d0
	bne	L242
L241
	move.l	_myscreenX,d0
	divsl.l	#2,d0
	move.l	_mywindowX,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterX
	move.l	_myscreenY,d0
	divsl.l	#4,d0
	muls.l	#3,d0
	move.l	_mywindowY,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterY
	bra	L252
L242
	move.l	_inputpos,d0
	cmp.l	#$9,d0
	bne	L252
L243
	move.l	_myscreenX,d0
	divsl.l	#4,d0
	muls.l	#3,d0
	move.l	_mywindowX,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterX
	move.l	_myscreenY,d0
	divsl.l	#4,d0
	muls.l	#3,d0
	move.l	_mywindowY,d1
	divsl.l	#2,d1
	sub.l	d1,d0
	move.l	d0,_mycenterY
L244
L245
L246
L247
L248
L249
L250
L251
L252
	moveq	#0,d0
	movem.l	(a7)+,d2/a2/a6
	unlk	a5
	rts

	XDEF	_process_picture
_process_picture
L259	EQU	-$10
	link	a5,#L259
	movem.l	a2/a3/a6,-(a7)
L254
	move.l	#1,_quit
	jsr	_get_screen_information
	clr.l	-(a7)
	move.l	#-1,-(a7)
	move.l	#$80030007,-(a7)
	move.l	#-1,-(a7)
	move.l	#$80030005,-(a7)
	move.l	_winborderleft,-(a7)
	move.l	#$80030001,-(a7)
	move.l	_winbordertop,-(a7)
	move.l	#$80030003,-(a7)
	pea	1.w
	pea	6.w
	pea	1.w
	move.l	#$800010D3,-(a7)
	move.l	#$70696374,-(a7)
	move.l	#$8000101F,-(a7)
	pea	1.w
	move.l	#$800010FB,-(a7)
	pea	2.w
	move.l	#$80001065,-(a7)
	move.l	_myshowfilename,d0
	move.l	a7,a0
	move.l	_DataTypesBase,a6
	jsr	-$30(a6)
	add.w	#$4C,a7
	move.l	d0,_mydataobject
	move.l	_mydataobject,a0
	cmp.w	#0,a0
	beq	L258
L255
	jsr	_calculate_window
	clr.l	-(a7)
	move.l	#$A00210,-(a7)
	move.l	#$8000006A,-(a7)
	move.l	_myborderless,-(a7)
	move.l	#$80000088,-(a7)
	move.l	_mywindowY,-(a7)
	move.l	#$80000077,-(a7)
	move.l	_mywindowX,-(a7)
	move.l	#$80000076,-(a7)
	move.l	_mycenterY,-(a7)
	move.l	#$80000065,-(a7)
	move.l	_mycenterX,-(a7)
	move.l	#$80000064,-(a7)
	move.l	_mybackdrop,-(a7)
	move.l	#$80000085,-(a7)
	sub.l	a0,a0
	move.l	a7,a1
	move.l	_IntuitionBase,a6
	jsr	-$25E(a6)
	add.w	#$3C,a7
	move.l	d0,_Mywindow
	move.l	_Mywindow,a0
	cmp.w	#0,a0
	beq	L258
L256
	move.l	#1,_mywindowopen
	move.l	_Mywindow,a0
	move.l	$32(a0),a0
	move.l	_Mywindow,a0
	move.l	$2E(a0),a0
	add.w	#$2C,a0
	move.l	4(a0),a0
	clr.l	-(a7)
	move.l	#-1,-(a7)
	move.l	#$80040001,-(a7)
	move.l	_mydataobject,a0
	sub.l	a1,a1
	sub.l	a2,a2
	move.l	a7,a3
	move.l	_DataTypesBase,a6
	jsr	-$3C(a6)
	add.w	#$C,a7
	moveq	#-1,d0
	move.l	_Mywindow,a0
	sub.l	a1,a1
	move.l	_mydataobject,a2
	move.l	_DataTypesBase,a6
	jsr	-$48(a6)
	move.l	_mydataobject,a0
	move.l	_Mywindow,a1
	sub.l	a2,a2
	sub.l	a3,a3
	move.l	_DataTypesBase,a6
	jsr	-$4E(a6)
	jsr	_wait_for_datatype
	clr.l	_quit
L257
L258
	moveq	#0,d0
	movem.l	(a7)+,a2/a3/a6
	unlk	a5
	rts

	XDEF	_wait_for_picture
_wait_for_picture
L264	EQU	0
	link	a5,#L264
	movem.l	a6,-(a7)
L260
	move.l	_mywindowopen,d0
	cmp.l	#1,d0
	bne	L262
L261
	move.l	_myfilename,-(a7)
	jsr	_notify
	addq.w	#4,a7
	move.l	_Mywindow,a0
	move.l	_IntuitionBase,a6
	jsr	-$48(a6)
	move.l	_Mywindow,a0
	move.l	_mydataobject,a1
	move.l	_DataTypesBase,a6
	jsr	-$60(a6)
	move.l	_mydataobject,a0
	move.l	_DataTypesBase,a6
	jsr	-$36(a6)
	clr.l	_mywindowopen
	jsr	_mydeletefile
	bra.b	L263
L262
	jsr	_mycopyfile
	jsr	_readfileSimple
	jsr	_moveInstaller
	jsr	_process_picture
L263
	moveq	#0,d0
	movem.l	(a7)+,a6
	unlk	a5
	rts

	XDEF	_main
_main
L282	EQU	0
	link	a5,#L282
	movem.l	d2/a6,-(a7)
L268
	sub.l	a1,a1
	move.l	_SysBase,a6
	jsr	-$126(a6)
	move.l	d0,_mytask
	moveq	#-1,d0
	move.l	_SysBase,a6
	jsr	-$14A(a6)
	extb.l	d0
	move.l	d0,_mysignal
	move.l	_mysignal,d0
	cmp.l	#-1,d0
	beq	L281
L269
	moveq	#$27,d0
	lea	L265(pc),a1
	move.l	_SysBase,a6
	jsr	-$228(a6)
	move.l	d0,_IntuitionBase
	move.l	_IntuitionBase,a0
	cmp.w	#0,a0
	beq	L280
L270
	moveq	#$27,d0
	lea	L266(pc),a1
	move.l	_SysBase,a6
	jsr	-$228(a6)
	move.l	d0,_DataTypesBase
	move.l	_DataTypesBase,a0
	cmp.w	#0,a0
	beq	L279
L271
	moveq	#$27,d0
	lea	L267(pc),a1
	move.l	_SysBase,a6
	jsr	-$228(a6)
	move.l	d0,_GfxBase
	move.l	_GfxBase,a0
	cmp.w	#0,a0
	beq	L278
L272
	move.l	#$10001,d0
	move.l	#$200,d1
	move.l	#$200,d2
	move.l	_SysBase,a6
	jsr	-$2B8(a6)
	move.l	d0,_mypool
	move.l	_mypool,a0
	cmp.w	#0,a0
	beq.b	L278
L273
	jsr	_Makefilename
	jsr	_get_screen_information
	bra.b	L275
L274
	jsr	_wait_for_picture
L275
	tst.l	_quit
	beq.b	L274
L276
	move.l	_mypool,a0
	move.l	_SysBase,a6
	jsr	-$2BE(a6)
L277
L278
	move.l	_GfxBase,a1
	move.l	_SysBase,a6
	jsr	-$19E(a6)
L279
	move.l	_DataTypesBase,a1
	move.l	_SysBase,a6
	jsr	-$19E(a6)
L280
	move.l	_IntuitionBase,a1
	move.l	_SysBase,a6
	jsr	-$19E(a6)
L281
	move.l	_mysignal,d0
	move.l	_SysBase,a6
	jsr	-$150(a6)
	movem.l	(a7)+,d2/a6
	unlk	a5
	moveq	#0,d0
	rts

L96
	dc.b	'$VER: Installer Addon 0.5 (2.5.97)',0
L91
	dc.b	'.prefs',0
L97
	dc.b	'Install ',0
L155
	dc.b	'Workbench',0
L94
	dc.b	'copy >nil: <nil: ',0
L93
	dc.b	'copy >nil: <nil: ram:test to t:ia_use',0
L266
	dc.b	'datatypes.library',0
L95
	dc.b	'delete >nil: <nil: t:ia_use',0
L267
	dc.b	'graphics.library',0
L265
	dc.b	'intuition.library',0
L92
	dc.b	't:ia_use',0

	SECTION ":1",DATA

	XDEF	_IntuitionBase
_IntuitionBase
	dc.l	0
	XDEF	_GfxBase
_GfxBase
	dc.l	0
	XDEF	_CybergraphicsBase
_CybergraphicsBase
	dc.l	0
	XDEF	_DataTypesBase
_DataTypesBase
	dc.l	0
	XDEF	_mybmhd
_mybmhd
	dc.l	0
	XDEF	_mywindowX
_mywindowX
	dc.l	0
	XDEF	_mywindowY
_mywindowY
	dc.l	0
	XDEF	_quit
_quit
	dc.l	0
	XDEF	_myborderless
_myborderless
	dc.l	0
	XDEF	_mybackdrop
_mybackdrop
	dc.l	0
	XDEF	_inputpos
_inputpos
	dc.l	1
	XDEF	_winbordertop
_winbordertop
	dc.l	1
	XDEF	_winborderleft
_winborderleft
	dc.l	1
	XDEF	_installerpos
_installerpos
	dc.l	$9
	XDEF	_mywindowopen
_mywindowopen
	dc.l	0
	XDEF	_myallocmem
_myallocmem
	dc.l	0
	XDEF	_myopenfile
_myopenfile
	dc.l	0
	XDEF	_foundwindow
_foundwindow
	dc.l	0
	XDEF	_Cwindowx
_Cwindowx
	dc.l	0
	XDEF	_Cwindowy
_Cwindowy
	dc.l	0
	XDEF	_myprefs
_myprefs
	dc.l	L91
	XDEF	_myshowfilename
_myshowfilename
	dc.l	L92
	XDEF	_mycopystring
_mycopystring
	dc.l	L93
	XDEF	_Emptystring
_Emptystring
	dc.l	L94
	XDEF	_mydeletestring
_mydeletestring
	dc.l	L95
	XDEF	_Version
_Version
	dc.l	L96
	XDEF	_SearchString
_SearchString
	dc.l	L97
	XDEF	_otherwindow
_otherwindow
	dc.l	0
	XDEF	_mywintitle
_mywintitle
	dc.b	0
	CNOP	0,4
	XDEF	_Ssearch
_Ssearch
	dc.l	1
	XDEF	_mypool
_mypool
	dc.l	0
	XDEF	_myfilename
_myfilename
	dc.l	0
	XDEF	_myconfigfile
_myconfigfile
	dc.l	0

	SECTION ":2",BSS

	XDEF	_mytask
_mytask
	ds.l	1
	XDEF	_Mywindow
_Mywindow
	ds.l	1
	XDEF	_mydataobject
_mydataobject
	ds.l	1
	XDEF	_mysignal
_mysignal
	ds.l	1
	XDEF	_mycenterX
_mycenterX
	ds.l	1
	XDEF	_mycenterY
_mycenterY
	ds.l	1
	XDEF	_myscreenX
_myscreenX
	ds.l	1
	XDEF	_myscreenY
_myscreenY
	ds.l	1
	XDEF	_mylockscreen
_mylockscreen
	ds.l	1
	XDEF	_argallocmem
_argallocmem
	ds.l	1

	END
