1 /******************************************************************************
2 *
3 * Copyright (C) 2009, The Gentee Group. All rights reserved.
4 * This file is part of the Gentee open source project - http://www.gentee.com.
5 *
6 * THIS FILE IS PROVIDED UNDER THE TERMS OF THE GENTEE LICENSE ("AGREEMENT").
7 * ANY USE, REPRODUCTION OR DISTRIBUTION OF THIS FILE CONSTITUTES RECIPIENTS
8 * ACCEPTANCE OF THE AGREEMENT.
9 *
10 * Author: Alexey Krivonogov ( gentee )
11 *
12 ******************************************************************************/
13
14 include
15 {
16 $"..\gea\gea.g"
17 }
18
19 func makebin<main>
20 {
21 lzge lz
22 str input
23 buf out in
24
25 out.expand( 420000 )
26 in.read( "..\\..\\exe\\res\\linker\\genteert.dll" )
27 lz.order = 10
28 out.use = lzge_encode( in.ptr(), *in, out.ptr() + 4, lz ) + 4
29 out.ptr()->uint = *in
30 print("Dll name: genteert.dll\nDLL size: \(*in)\nBIN size: \( *out )\n")
31 out.write( "..\\..\\exe\\res\\linker\\genteert.bin" )
32
33 congetch( "Press any key..." )
34 }
35