This commit is contained in:
Frater 2017-09-24 01:45:36 +02:00
commit 43352ff262
1291 changed files with 220976 additions and 0 deletions

567
LENS/ASM.ASM Normal file
View file

@ -0,0 +1,567 @@
code SEGMENT para public 'CODE'
ASSUME cs:code
.386
LOCALS
PUBLIC _back
_back dw 0,0
PUBLIC _rotpic
_rotpic dw 0,0
PUBLIC _rotpic90
_rotpic90 dw 0,0
DOWORD MACRO diadd,siadd
mov bx,ds:[si+(siadd)] ;4
mov al,fs:[bx+di] ;3
mov bx,ds:[si+(siadd)+2] ;4
mov ah,fs:[bx+di] ;3
or ax,dx ;2
mov es:[bp+(diadd)],ax ;5
ENDM ;=21
PUBLIC _dorow
_dorow PROC FAR
push bp
mov bp,sp
push si
push di
push ds
mov fs,cs:_back[2]
mov ax,0a000h
mov es,ax
mov ds,[bp+8]
mov dx,[bp+14]
mov dh,dl
mov di,[bp+10]
mov si,[bp+12]
shl si,2
mov cx,ds:[si+2]
mov si,ds:[si]
cmp cx,4
jge @@2
jmp @@0
@@2: add di,ds:[si]
mov bp,di
add si,2
test bp,1
jz @@1
mov bx,ds:[si]
add si,2
mov al,fs:[bx+di]
or ax,dx
mov es:[bp],al
inc bp
dec cx
@@1: push cx
shr cx,1
sub si,320
sub bp,320
mov ax,cx ;*1
shl cx,2
add ax,cx ;*4
shl cx,2
add ax,cx ;*16
neg ax
;bx=-count*21
add ax,OFFSET @@l
jmp ax
zzz=64
REPT 64
zzz=zzz-1
DOWORD 320+zzz*2,320+zzz*4
ENDM
@@l: pop cx
test cx,1
jz @@0
and cx,not 1
add bp,cx
add cx,cx
add si,cx
mov bx,ds:[si+320]
mov al,fs:[bx+di]
or ax,dx
mov es:[bp+320],al
@@0: pop ds
pop di
pop si
pop bp
ret
_dorow ENDP
PUBLIC _dorow2
_dorow2 PROC FAR
push bp
mov bp,sp
push si
push di
push ds
mov fs,[bp+8]
mov si,[bp+12]
shl si,2
mov cx,fs:[si+2]
mov si,fs:[si]
or cx,cx
jcxz @@0
mov ds,cs:_back[2]
mov ax,0a000h
mov es,ax
mov dx,[bp+14]
mov dh,dl
mov di,[bp+10]
add di,fs:[si]
mov ax,di
lea bp,[si+2]
mov si,ax
@@3: mov bx,fs:[bp+2]
mov al,ds:[bx+di]
or al,dl
mov bx,fs:[bp]
add bp,4
mov es:[bx+si],al
dec cx
jnz @@3
@@0: pop ds
pop di
pop si
pop bp
ret
_dorow2 ENDP
PUBLIC _dorow3
_dorow3 PROC FAR
push bp
mov bp,sp
push si
push di
push ds
mov fs,[bp+8]
mov si,[bp+12]
shl si,2
mov cx,fs:[si+2]
mov si,fs:[si]
or cx,cx
jcxz @@0
mov ds,cs:_back[2]
mov ax,0a000h
mov es,ax
mov di,[bp+10]
add di,fs:[si]
add si,2
@@3: mov bx,fs:[si]
add si,2
mov al,ds:[bx+di]
mov es:[bx+di],al
dec cx
jnz @@3
@@0: pop ds
pop di
pop si
pop bp
ret
_dorow3 ENDP
PUBLIC _setborder
_setborder PROC FAR
push bp
mov bp,sp
mov dx,3dah
in al,dx
mov dx,3c0h
mov al,11h+32
out dx,al
mov al,[bp+6]
out dx,al
pop bp
ret
_setborder ENDP
PUBLIC _inittwk
_inittwk PROC FAR
push bp
mov bp,sp
push si
push di
push ds
;clear palette
mov dx,3c8h
xor al,al
out dx,al
inc dx
mov cx,768
@@1: out dx,al
loop @@1
;400 rows
mov dx,3d4h
mov ax,00009h
out dx,ax
;tweak
mov ax,00014h
out dx,ax
mov ax,0e317h
out dx,ax
mov dx,3c4h
mov ax,0604h
out dx,ax
;
mov dx,3c4h
mov ax,0f02h
out dx,ax
mov ax,0a000h
mov es,ax
xor di,di
mov cx,32768
xor ax,ax
rep stosw
;
;set 4 x vertical
mov dx,3d4h
mov al,9
out dx,al
inc dx
in al,dx
and al,not 31
or al,3
out dx,al
;
pop ds
pop di
pop si
pop bp
ret
_inittwk ENDP
PUBLIC _setpalarea
_setpalarea PROC FAR
push bp
mov bp,sp
push si
push di
push ds
lds si,[bp+6]
mov ax,[bp+10]
mov dx,3c8h
out dx,al
mov cx,[bp+12]
mov ax,cx
shl cx,1
add cx,ax
inc dx
rep outsb
sti
pop ds
pop di
pop si
pop bp
ret
_setpalarea ENDP
ALIGN 16
xpos dd 0
ypos dd 0
xadd dd 0
yadd dd 0
ZOOMXW equ 160
ZOOMYW equ 100
PUBLIC _rotate
_rotate PROC FAR
push bp
mov bp,sp
push si
push di
push ds
mov ax,[bp+6]
shl eax,16
mov cs:xpos,eax
mov ax,[bp+8]
shl eax,16
mov cs:ypos,eax
mov ax,[bp+12]
cwde
shl eax,6
mov ebx,eax
mov ax,[bp+10]
cwde
shl eax,6
mov ecx,eax
mov edx,ebx
mov ds,cs:_rotpic[2]
cmp ecx,0
jge @@s1
neg ecx
@@s1: cmp edx,0
jge @@s2
neg edx
@@s2: cmp ecx,edx
jle @@s3
mov ds,cs:_rotpic90[2]
xchg eax,ebx
neg eax
mov ecx,cs:xpos
mov edx,cs:ypos
xchg ecx,edx
neg ecx
mov cs:xpos,ecx
mov cs:ypos,edx
@@s3: mov cs:xadd,eax
mov cs:yadd,ebx
xor ax,ax
mov cx,word ptr cs:yadd[0]
mov dx,word ptr cs:xadd[0]
mov bl,byte ptr cs:yadd[2]
mov bh,byte ptr cs:xadd[2]
neg bh
neg dx
sbb bh,0
xor si,si
xor di,di
;si=lowx,di=lowy,ax=y/x
;cx=addx,dx=addy,bx=yah/xah
zzz=0
REPT ZOOMXW/4
add si,cx
adc al,bl
add di,dx
adc ah,bh
mov word ptr cs:[OFFSET @@moda+zzz+2],ax
add si,cx
adc al,bl
add di,dx
adc ah,bh
mov word ptr cs:[OFFSET @@modb+zzz+2],ax
add si,cx
adc al,bl
add di,dx
adc ah,bh
mov word ptr cs:[OFFSET @@moda+zzz+6],ax
add si,cx
adc al,bl
add di,dx
adc ah,bh
mov word ptr cs:[OFFSET @@modb+zzz+6],ax
zzz=zzz+13
ENDM
;aspect ratio
mov eax,307
mul dword ptr cs:xadd
sar eax,8
mov cs:xadd,eax
mov eax,307
mul dword ptr cs:yadd
sar eax,8
mov cs:yadd,eax
mov ax,0a000h
mov es,ax
mov di,-1000h
mov cx,ZOOMYW
@@2: mov ebx,cs:ypos
add ebx,cs:yadd
mov cs:ypos,ebx
shr ebx,8
mov eax,cs:xpos
add eax,cs:xadd
mov cs:xpos,eax
shr eax,16
mov bl,al
mov si,bx
;
mov dx,3c4h
mov ax,0302h
out dx,ax
@@moda: zzz=1000h
REPT ZOOMXW/4
mov al,ds:[si+1234h] ;4
mov ah,ds:[si+1234h] ;4
mov es:[di+zzz],ax ;5
zzz=zzz+2
ENDM
mov dx,3c4h
mov ax,0c02h
out dx,ax
@@modb: zzz=1000h
REPT ZOOMXW/4
mov al,ds:[si+1234h] ;4
mov ah,ds:[si+1234h] ;4
mov es:[di+zzz],ax ;5
zzz=zzz+2
ENDM
;
add di,80
dec cx
jz @@1
jmp @@2
@@1:
pop ds
pop di
pop si
pop bp
ret
_rotate ENDP
PUBLIC _rotatez
_rotatez PROC FAR
push bp
mov bp,sp
push si
push di
push ds
mov ax,[bp+6]
shl eax,16
mov cs:xpos,eax
mov ax,[bp+8]
shl eax,16
mov cs:ypos,eax
mov ax,[bp+12]
cwde
shl eax,6
mov ebx,eax
mov ax,[bp+10]
cwde
shl eax,6
mov ecx,eax
mov edx,ebx
mov ds,cs:_rotpic[2]
cmp ecx,0
jge @@s1
neg ecx
@@s1: cmp edx,0
jge @@s2
neg edx
@@s2: cmp ecx,edx
jle @@s3
mov ds,cs:_rotpic90[2]
xchg eax,ebx
neg eax
mov ecx,cs:xpos
mov edx,cs:ypos
xchg ecx,edx
neg ecx
mov cs:xpos,ecx
mov cs:ypos,edx
@@s3: mov cs:xadd,eax
mov cs:yadd,ebx
xor ax,ax
mov cx,word ptr cs:yadd[0]
mov dx,word ptr cs:xadd[0]
mov bl,byte ptr cs:yadd[2]
mov bh,byte ptr cs:xadd[2]
neg bh
neg dx
sbb bh,0
xor si,si
xor di,di
;si=lowx,di=lowy,ax=y/x
;cx=addx,dx=addy,bx=yah/xah
zzz=0
REPT ZOOMXW/4
add si,cx
adc al,bl
add di,dx
adc ah,bh
mov word ptr cs:[OFFSET @@moda+zzz+2],ax
add si,cx
adc al,bl
add di,dx
adc ah,bh
mov word ptr cs:[OFFSET @@modb+zzz+2],ax
add si,cx
adc al,bl
add di,dx
adc ah,bh
mov word ptr cs:[OFFSET @@moda+zzz+6],ax
add si,cx
adc al,bl
add di,dx
adc ah,bh
mov word ptr cs:[OFFSET @@modb+zzz+6],ax
zzz=zzz+13
ENDM
;aspect ratio
mov eax,307
mul dword ptr cs:xadd
sar eax,8
mov cs:xadd,eax
mov eax,307
mul dword ptr cs:yadd
sar eax,8
mov cs:yadd,eax
mov ax,0a000h
mov es,ax
mov di,-1000h
mov cx,ZOOMYW
@@2: mov ebx,cs:ypos
add ebx,cs:yadd
mov cs:ypos,ebx
shr ebx,8
mov eax,cs:xpos
add eax,cs:xadd
mov cs:xpos,eax
add cs:xadd,256
sub cs:yadd,256
shr eax,16
mov bl,al
mov si,bx
;
mov dx,3c4h
mov ax,0302h
out dx,ax
@@moda: zzz=1000h
REPT ZOOMXW/4
mov al,ds:[si+1234h] ;4
mov ah,ds:[si+1234h] ;4
mov es:[di+zzz],ax ;5
zzz=zzz+2
ENDM
mov dx,3c4h
mov ax,0c02h
out dx,ax
@@modb: zzz=1000h
REPT ZOOMXW/4
mov al,ds:[si+1234h] ;4
mov ah,ds:[si+1234h] ;4
mov es:[di+zzz],ax ;5
zzz=zzz+2
ENDM
;
add di,80
dec cx
jz @@1
jmp @@2
@@1:
pop ds
pop di
pop si
pop bp
ret
_rotatez ENDP
code ENDS
END

BIN
LENS/ASM.EXE Normal file

Binary file not shown.

1290
LENS/ASM.LST Normal file

File diff suppressed because it is too large Load diff

8
LENS/ASM.MAP Normal file
View file

@ -0,0 +1,8 @@
Start Stop Length Name Class
00000H 004B7H 004B8H CODE CODE
Program entry point at 0000:0000
Warning: No stack

BIN
LENS/ASM.OBJ Normal file

Binary file not shown.

172
LENS/CALC.C Normal file
View file

@ -0,0 +1,172 @@
#include <stdio.h>
#include <math.h>
char buf[64000];
char *vram=(char *)0xA0000000L;
void setrgb(int c,int r,int g,int b)
{
outp(0x3c8,c);
outp(0x3c9,r);
outp(0x3c9,g);
outp(0x3c9,b);
}
int cx=76,cy=58,ymax=120,xmax=150;
double full;
void lenscalc(int x,int y,int *px,int *py)
{
double now,new,fx,fy;
now=full-(double)(x*x+(y*9/8)*(y*9/8));
if(now<1.0) now=1.0;
new=250.0/pow(now,0.69);
fx=(double)(rand()-16384)/30000.0;
fy=(double)(rand()-16384)/30000.0;
*px=(int)(((double)x+fx)*new);
*py=(int)(((double)y+fy)*new);
}
void squeeze(int factor)
{
int a,x,y,x1,y1,x2,y2;
for(y=ymax-1;y>=0;y--) for(x=0;x<xmax;x++)
{
x1=x-cx; y1=y-ymax;
x2=x1*factor/256+cx; y2=y1*256/factor+ymax;
vram[x+y*320]=buf[x2+y2*320];
}
}
int rowbeg[128];
int rowcnt[128];
int rd[32767];
int rdp;
main()
{
int a,x,y,x1,y1,x2,y2,bx,by;
int col,z=0,c;
FILE *f1;
char tmp[40];
_asm mov ax,13h
_asm int 10h
setrgb(0,0,0,0);
setrgb(1,10,20,30);
setrgb(2,20,30,40);
setrgb(3,30,40,50);
for(a=16;a<250;a++)
{
setrgb(a,a/2,a,a/2);
}
bx=by=0;
for(col=1;col<=4;col++)
{
f1=fopen("lens.u","rb");
fread(buf,1,64000,f1);
memcpy(vram,buf,64000,f1);
fclose(f1);
//squeeze(250);
//getch();
rdp=0;
full=59*59+50*50;
for(y=0;y<ymax;y++)
{
for(x=0;x<xmax;x++)
{
a=((x-cx)&15)+((y-cy)&15)+16;
vram[(xmax+x)+(y)*320]=a;
}
}
for(y=0;y<ymax;y++)
{
z=-1;
rowbeg[y]=rdp;
for(x=0;x<xmax;x++)
{
if(vram[x+y*320])
{
if(x>bx) bx=x;
if(y>by) by=y;
}
if(col==1)
{
if(vram[x+y*320] && vram[x+y*320]!=4)
{
if(z==-1)
{
rd[rdp++]=x;
z=x+y*320;
}
x1=x-cx;
y1=y-cy;
lenscalc(x1,y1,&x2,&y2);
a=(x2&15)+(y2&15)+16;
vram[(xmax+cx+x1)+(cy+y1)*320]=a;
vram[(xmax+cx+x2)+(160+y2)*320]=y+16;
rd[rdp++]=(cx+x2)+(cy+y2)*320-z;
}
}
else if(col==4)
{
if(vram[x+y*320]==4)
{
if(z==-1)
{
rd[rdp++]=0;
z=x+y*320;
}
rd[rdp++]=x;
vram[(xmax+x)+(y)*320]=0;
}
}
else
{
if(vram[x+y*320]==col)
{
if(z==-1)
{
rd[rdp++]=x;
z=x+y*320;
}
x1=x-cx;
y1=y-cy;
lenscalc(x1,y1,&x2,&y2);
a=(x2&15)+(y2&15)+16;
vram[(xmax+cx+x1)+(cy+y1)*320]=a;
vram[(xmax+cx+x2)+(160+y2)*320]=y+16;
rd[rdp++]=x+y*320-z;
rd[rdp++]=(cx+x2)+(cy+y2)*320-z;
}
}
}
c=rdp-rowbeg[y]-1;
if(c<0) c=0;
if(col==1 || col==4) rowcnt[y]=c;
else rowcnt[y]=c/2;
}
sprintf(tmp,"lens.ex%i",col);
f1=fopen(tmp,"wb");
for(a=0;a<ymax;a++)
{
putw(rowbeg[a]*2+ymax*4,f1);
putw(rowcnt[a],f1);
}
for(a=0;a<rdp;a++)
{
putw(rd[a],f1);
}
fclose(f1);
}
f1=fopen("lens.ex0","wb");
putw(2*cx,f1); putw(by,f1);
putc(0,f1); putc(5,f1); putc(15,f1);
putc(0,f1); putc(7,f1); putc(26,f1);
putc(0,f1); putc(9,f1); putc(37,f1);
fprintf(f1,"...By decrypting the following coded message, you can learn secrets you never new existed.\n");
for(a=0;a<111;a++) putc(rand()^rand(),f1);
fclose(f1);
_asm mov ax,3
_asm int 10h
}

BIN
LENS/CALC.EXE Normal file

Binary file not shown.

BIN
LENS/CALC.OBJ Normal file

Binary file not shown.

11
LENS/DOOBJS.BAT Normal file
View file

@ -0,0 +1,11 @@
@echo off
glvp lenspic.lbm -xv!
del lens.exb
ren lenspic.uh lens.exb
doobj lens.ex0 _lensex0 _lensex0.obk
doobj lens.ex1 _lensex1 _lensex1.obk
doobj lens.ex2 _lensex2 _lensex2.obk
doobj lens.ex3 _lensex3 _lensex3.obk
doobj lens.ex4 _lensex4 _lensex4.obk
doobj lens.exb _lensexb _lensexb.obk
doobj lens.exp _lensexp _lensexp.obk

16
LENS/DOSIN.C Normal file
View file

@ -0,0 +1,16 @@
#include <stdio.h>
#include <math.h>
main()
{
int a,b;
double d;
for(a=0;a<4096;a++)
{
d=3.14159265358979*2.0*(double)a/4096.0;
b=(int)(sin(d)*16384.0);
if(!(a&7)) printf("\ndw %6i",b);
else printf(",%6i",b);
}
printf("\n");
}

BIN
LENS/DOSIN.EXE Normal file

Binary file not shown.

BIN
LENS/DOSIN.OBJ Normal file

Binary file not shown.

BIN
LENS/DP_PREFS Normal file

Binary file not shown.

64
LENS/FILLER Normal file
View file

@ -0,0 +1,64 @@
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
----------------------------------------------------------------
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
----------------------------------------------------------------
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
----------------------------------------------------------------
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
----------------------------------------------------------------

BIN
LENS/G2.UH Normal file

Binary file not shown.

1
LENS/L.BAT Normal file
View file

@ -0,0 +1 @@
lens

BIN
LENS/LENS.DAT Normal file

Binary file not shown.

BIN
LENS/LENS.EX0 Normal file

Binary file not shown.

BIN
LENS/LENS.EX1 Normal file

Binary file not shown.

BIN
LENS/LENS.EX2 Normal file

Binary file not shown.

BIN
LENS/LENS.EX3 Normal file

Binary file not shown.

BIN
LENS/LENS.EX4 Normal file

Binary file not shown.

BIN
LENS/LENS.EXB Normal file

Binary file not shown.

BIN
LENS/LENS.EXE Normal file

Binary file not shown.

BIN
LENS/LENS.EXP Normal file

Binary file not shown.

BIN
LENS/LENS.LBM Normal file

Binary file not shown.

54
LENS/LENS.MAP Normal file
View file

@ -0,0 +1,54 @@
Start Stop Length Name Class
00000H 00A4FH 00A50H MAIN_TEXT CODE
00A50H 02AD3H 02084H CODE CODE
02AE0H 02BB3H 000D4H text_disc CODE
02BB4H 05167H 025B4H _TEXT CODE
05170H 0785FH 026F0H EMULATOR_TEXT CODE
07860H 07860H 00000H C_ETEXT ENDCODE
07860H 1756FH 0FD10H DATA__lensexb FARDATA
17570H 185EFH 01080H DATA__filler FARDATA
185F0H 1D273H 04C84H DATA__lensex1 FARDATA
1D280H 1D356H 000D7H DATA__lensex0 FARDATA
1D360H 1EE2BH 01ACCH DATA__lensex2 FARDATA
1EE30H 1F431H 00602H DATA__lensex3 FARDATA
1F440H 20CABH 0186CH DATA__lensex4 FARDATA
20CB0H 2565FH 049B0H DATA__lensexp FARDATA
25660H 257CFH 00170H EMULATOR_DATA FAR_DATA
257D0H 293FFH 03C30H FAR_BSS FAR_BSS
29400H 29441H 00042H NULL BEGDATA
29442H 296D7H 00296H _DATA DATA
296D8H 296D9H 00002H XIQC DATA
296DAH 296E7H 0000EH DBDATA DATA
296E8H 296F5H 0000EH CDATA DATA
296F6H 296F6H 00000H XIFB DATA
296F6H 296F6H 00000H XIF DATA
296F6H 296F6H 00000H XIFE DATA
296F6H 296F6H 00000H XIB DATA
296F6H 296F9H 00004H XI DATA
296FAH 296FAH 00000H XIE DATA
296FAH 296FAH 00000H XPB DATA
296FAH 296FAH 00000H XP DATA
296FAH 296FAH 00000H XPE DATA
296FAH 296FAH 00000H XCB DATA
296FAH 296FAH 00000H XC DATA
296FAH 296FAH 00000H XCE DATA
296FAH 296FAH 00000H XCFB DATA
296FAH 296FAH 00000H XCF DATA
296FAH 296FAH 00000H XCFE DATA
296FAH 2971DH 00024H CONST CONST
2971EH 29725H 00008H HDR MSG
29726H 298D2H 001ADH MSG MSG
298D3H 298D4H 00002H PAD MSG
298D5H 298D5H 00001H EPAD MSG
298D6H 298F1H 0001CH _BSS BSS
298F2H 298F2H 00000H XOB BSS
298F2H 298F2H 00000H XO BSS
298F2H 298F2H 00000H XOE BSS
29900H 29900H 00000H c_common BSS
29900H 2A0FFH 00800H STACK STACK
Origin Group
2940:0 DGROUP
Program entry point at 02BB:0014

BIN
LENS/LENS.U Normal file

Binary file not shown.

BIN
LENS/LENSPIC.BBK Normal file

Binary file not shown.

BIN
LENS/LENSPIC.LBM Normal file

Binary file not shown.

BIN
LENS/LENSPIC1.LBM Normal file

Binary file not shown.

BIN
LENS/LENSPICX.LBM Normal file

Binary file not shown.

5
LENS/LINK.TMP Normal file
View file

@ -0,0 +1,5 @@
/E +
main.obj asm.obj ..\dis\disc.obj +
_lensexb.obk _filler.obk _lensex1.obk _lensex0.obk +
_lensex2.obk _lensex3.obk _lensex4.obk _lensexp.obk
,lens.exe,lens.map;

394
LENS/MAIN.C Normal file
View file

@ -0,0 +1,394 @@
#include <stdio.h>
#include <malloc.h>
#include <math.h>
#include "..\dis\dis.h"
extern char lensex0[];
extern char lensex1[];
extern char lensex2[];
extern char lensex3[];
extern char lensex4[];
extern char lensexp[];
extern char lensexb[];
#define noSAVEPATH
#ifdef SAVEPATH
FILE *fp;
int pathstart2;
#else
int *pathdata1;
int *pathdata2;
char pathdata[13000];
#endif
char *vram=(char *)0xA0000000L;
int *lens1,*lens2,*lens3,*lens4;
extern char *back;
char *fade,*fade2;
extern char *rotpic;
extern char *rotpic90;
int lenswid,lenshig,lensxs,lensys;
char palette[768];
char *shiftstatus=(char *)0x0417;
int waitb()
{
if(dis_indemo())
{
return(dis_waitb());
}
if(*shiftstatus&16) setborder(0);
while(!(inp(0x3da)&8));
while((inp(0x3da)&8));
if(*shiftstatus&16) setborder(24);
return(1);
}
void drawlens(int x0,int y0)
{
int y,ys,ye;
long int u1,u2;
u1=(x0-lensxs)+(long)(y0-lensys)*320L;
u2=(x0-lensxs)+(long)(y0+lensys-1)*320L;
ys=lenshig/2;
ye=lenshig-1;
for(y=0;y<ys;y++)
{
if(u1>=0 && u1<=64000)
{
dorow(lens1,(unsigned)u1,y,0x40);
dorow2(lens2,(unsigned)u1,y,0x80);
dorow2(lens3,(unsigned)u1,y,0xC0);
dorow3(lens4,(unsigned)u1,y,0);
}
u1+=320;
if(u2>=0 && u2<=64000)
{
dorow(lens1,(unsigned)u2,ye-y,0x40);
dorow2(lens2,(unsigned)u2,ye-y,0x80);
dorow2(lens3,(unsigned)u2,ye-y,0xC0);
dorow3(lens4,(unsigned)u2,ye-y,0);
}
u2-=320;
}
}
void setvmode(int m)
{
_asm mov ax,m
_asm int 10h
}
int firfade1[200];
int firfade2[200];
int firfade1a[200];
int firfade2a[200];
void part1(void)
{
int x,y,xa,ya;
int a,r,g,b,c,i;
int frame=0;
char *cp,*dp;
frame=0;
for(b=0;b<200;b++)
{
a=b;
firfade1a[b]=(19+a/5+4)&(~7);
firfade2a[b]=(-(19+(199-a)/5+4))&(~7);
firfade1[b]=170*64+(100-b)*50;
firfade2[b]=170*64+(100-b)*50;
}
if(dis_musplus>-30) while(!dis_exit() && dis_musplus()<-6) ;
dis_waitb();
dis_setmframe(0);
while(!dis_exit() && frame<300)
{
if(frame<80)
{
a=frame*2;
for(c=0;c<6;c++)
{
cp=vram; dp=back;
for(y=0;y<200;y++)
{
x=firfade1[y]>>6;
cp[x]=dp[x];
x=firfade2[y]>>6;
cp[x]=dp[x];
firfade1[y]+=firfade1a[y];
firfade2[y]+=firfade2a[y];
cp+=320;
dp+=320;
}
}
}
a=waitb();
frame+=a;
}
}
void part2(void)
{
int firstbounce=1;
int x,y,xa,ya;
int a,r,g,b,c,i;
int frame=0,uframe=0;
char *cp,*dp;
x=65*64;
y=-50*64;
xa=ya=64;
uframe=frame=0;
while(!dis_exit() && uframe<715)
{
if(uframe<96)
{
a=(uframe-32)/2;
if(a<0) a=0;
setpalarea(fade2+a*3*192,64,192);
}
#ifdef SAVEPATH
putw(x/64,fp);
putw(y/64,fp);
drawlens(x/64,y/64);
x+=xa; y+=ya;
if(x>256*64 || x<60*64) xa=-xa;
if(y>150*64 && frame<600)
{
y-=ya;
if(firstbounce)
{
ya=-ya*2/3;
firstbounce=0;
}
else ya=-ya*9/10;
}
ya+=2;
#else
x=pathdata1[frame*2+0];
y=pathdata1[frame*2+1];
drawlens(x,y);
#endif
a=waitb();
uframe+=a;
if(a>3) a=3;
frame+=a;
}
while(!dis_exit() && uframe<720)
{
uframe+=waitb();
}
}
void part3(void)
{
int x,y,xa,ya;
int a,r,g,b,c,i;
int frame=0;
char *cp,*dp;
rotpic90=back;
for(x=0;x<256;x++)
{
for(y=0;y<256;y++)
{
rotpic90[x+y*256]=rotpic[y+(255-x)*256];
}
}
waitb();
setpalarea(fade+64*64*3,0,64);
inittwk();
{
double d1,d2,d3,scale,scaleb,scalea;
int flag=1;
d1=0;
d2=0.00007654321;
d3=0;
scale=2;
scalea=-0.01;
frame=0;
while(!dis_exit() && frame<2000)
{
if(dis_musplus()>-4) break;
#ifdef SAVEPATH
x=70.0*sin(d1)-30;
y=70.0*cos(d1)+60;
d1-=.005;
xa=-1024.0*sin(d2)*scale;
ya=1024.0*cos(d2)*scale;
x-=xa/16;
y-=ya/16;
d2+=d3;
putw(x,fp);
putw(y,fp);
putw(xa,fp);
putw(ya,fp);
rotate(x,y,xa,ya);
scale+=scalea;
if(frame>25)
{
if(d3<.02) d3+=0.00005;
}
if(frame<270)
{
if(scale<.9)
{
if(scalea<1) scalea+=0.0001;
}
}
else if(frame<400)
{
if(scalea>0.001) scalea-=0.0001;
}
else if(frame>1600)
{
if(scalea>-.1) scalea-=0.001;
}
else if(frame>1100)
{
a=frame-900; if(a>100) a=100;
if(scalea<256) scalea+=0.000001*a;
}
#else
x=pathdata2[frame*4+0];
y=pathdata2[frame*4+1];
xa=pathdata2[frame*4+2];
ya=pathdata2[frame*4+3];
rotate(x,y,xa,ya);
#endif
frame+=waitb();
if(frame>2000-128)
{
a=frame-(2000-128);
a/=2;
if(a>63) a=63;
setpalarea(fade+a*64*3,0,64);
}
if(frame<16)
{
setpalarea(fade+(64+frame)*64*3,0,64);
}
}
}
for(a=0;a<768;a++) palette[a]=63;
setpalarea(palette,0,256);
}
main()
{
int x,y,xa,ya;
int a,r,g,b,c,i;
int frame=0;
char *cp,*dp;
FILE *f1;
dis_partstart();
rotpic=halloc(16384,4);
if(!rotpic) exit(1);
fade=halloc(16000,1);
if(!fade) exit(1);
fade2=halloc(20000,1);
if(!fade2) exit(1);
setvmode(0x13);
outp(0x3c8,0);
for(a=0;a<768;a++) outp(0x3c9,0);
#ifndef SAVEPATH
a=*(int *)(lensexp+2);
pathdata1=(int *)(lensexp+4);
pathdata2=(int *)(lensexp+4+2*a);
#endif
memcpy(palette,lensexb+16,768);
back=(char *)((long)lensexb+((768+16)/16)*65536L);
memcpy(back+64000,back+64000-1536,1536);
lenswid=*(int *)(lensex0+0);
lenshig=*(int *)(lensex0+2);
cp=lensex0+4;
lensxs=lenswid/2;
lensys=lenshig/2;
for(i=1;i<4;i++)
{
r=*cp++;
g=*cp++;
b=*cp++;
for(a=0;a<64*3;a+=3)
{
c=r+palette[a+0];
if(c>63) c=63;
palette[a+i*64*3+0]=c;
c=g+palette[a+1];
if(c>63) c=63;
palette[a+i*64*3+1]=c;
c=b+palette[a+2];
if(c>63) c=63;
palette[a+i*64*3+2]=c;
}
}
lens1=lensex1;
lens2=lensex2;
lens3=lensex3;
lens4=lensex4;
cp=fade;
for(x=0;x<64;x++)
{
for(y=0;y<64*3;y++)
{
a=(palette[y]*(63-x)+x*63)/63;
*cp++=a;
}
}
for(x=0;x<16;x++)
{
for(y=0;y<64*3;y++)
{
a=palette[y]+(15-x)*5;
if(a>63) a=63;
*cp++=a;
}
}
cp=fade2;
for(x=0;x<32;x++)
{
for(y=64*3;y<256*3;y++)
{
a=y%(64*3);
a=(palette[y]-palette[a]*(31-x)/31);
*cp++=a;
}
}
// rotpic readymake
for(x=0;x<256;x++)
{
for(y=0;y<256;y++)
{
a=y*10/11-36/2;
if(a<0 || a>199) a=0;
a=back[x+32+a*320];
rotpic[x+y*256]=a;
}
}
waitb();
setpalarea(palette,0,256);
#ifdef SAVEPATH
fp=fopen("lens.exp","wb");
putw(0,fp);
putw(0,fp);
#endif
if(!dis_exit()) part1();
while(!dis_exit() && dis_musplus()<-20) ;
dis_waitb();
if(!dis_exit()) part2();
#ifdef SAVEPATH
pathstart2=(ftell(fp)-4)/2;
#endif
if(!dis_exit()) part3();
#ifdef SAVEPATH
rewind(fp);
putw(0,fp);
putw(pathstart2,fp);
fclose(fp);
#endif
}

BIN
LENS/MAIN.OBJ Normal file

Binary file not shown.

29
LENS/MAKEFILE Normal file
View file

@ -0,0 +1,29 @@
all : lens.exe calc.exe
#after lensexb, there must be 4K of data (filler) for 64K overflow
data1=_lensexb.obk _filler.obk _lensex1.obk _lensex0.obk
data2=_lensex2.obk _lensex3.obk _lensex4.obk _lensexp.obk
code1=main.obj asm.obj ..\dis\disc.obj
objs=$(code1) $(data1) $(data2)
asm_f = /ML /m2 /s /JJUMPS
#c_f = /AL /c /W1 /qc
c_f = /AL /c /W1 /Oxaz
.asm.obj :
tasm $(asm_f) $<
.c.obj :
cl $(c_f) $<
lens.exe : $(objs)
echo /E + > link.tmp
echo $(code1) + >> link.tmp
echo $(data1) + >> link.tmp
echo $(data2) >> link.tmp
echo ,lens.exe,lens.map; >> link.tmp
link @link.tmp
copy lens.exe ..\main\data\lns&zoom.exe
calc.exe : calc.c
cl /W3 /AL /qc calc.c /link /E

BIN
LENS/MONSTER.LBM Normal file

Binary file not shown.

1
LENS/RUNME.BAT Normal file
View file

@ -0,0 +1 @@
\s\p\st3\plays3m -xrunme2 d:\mods\purple\pm_night.s3m

4
LENS/RUNME2.BAT Normal file
View file

@ -0,0 +1,4 @@
echo off
:start
lens
goto start

33
LENS/SIN1024.INC Normal file
View file

@ -0,0 +1,33 @@
_sin1024 LABEL WORD
dw 0,1,3,4,6,7,9,10,12,14,15,17,18,20,21,23,25,26,28,29,31,32,34,36,37,39,40,42,43,45,46,48
dw 49,51,53,54,56,57,59,60,62,63,65,66,68,69,71,72,74,75,77,78,80,81,83,84,86,87,89,90,92,93,95,96
dw 97,99,100,102,103,105,106,108,109,110,112,113,115,116,117,119,120,122,123,124,126,127,128,130,131,132,134,135,136,138,139,140
dw 142,143,144,146,147,148,149,151,152,153,155,156,157,158,159,161,162,163,164,166,167,168,169,170,171,173,174,175,176,177,178,179
dw 181,182,183,184,185,186,187,188,189,190,191,192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207,208,209,210,211,211
dw 212,213,214,215,216,217,217,218,219,220,221,221,222,223,224,225,225,226,227,227,228,229,230,230,231,232,232,233,234,234,235,235
dw 236,237,237,238,238,239,239,240,241,241,242,242,243,243,244,244,244,245,245,246,246,247,247,247,248,248,249,249,249,250,250,250
dw 251,251,251,251,252,252,252,252,253,253,253,253,254,254,254,254,254,254,255,255,255,255,255,255,255,255,255,255,255,255,255,255
dw 256,255,255,255,255,255,255,255,255,255,255,255,255,255,255,254,254,254,254,254,254,253,253,253,253,252,252,252,252,251,251,251
dw 251,250,250,250,249,249,249,248,248,247,247,247,246,246,245,245,244,244,244,243,243,242,242,241,241,240,239,239,238,238,237,237
dw 236,235,235,234,234,233,232,232,231,230,230,229,228,227,227,226,225,225,224,223,222,221,221,220,219,218,217,217,216,215,214,213
dw 212,211,211,210,209,208,207,206,205,204,203,202,201,200,199,198,197,196,195,194,193,192,191,190,189,188,187,186,185,184,183,182
dw 181,179,178,177,176,175,174,173,171,170,169,168,167,166,164,163,162,161,159,158,157,156,155,153,152,151,149,148,147,146,144,143
dw 142,140,139,138,136,135,134,132,131,130,128,127,126,124,123,122,120,119,117,116,115,113,112,110,109,108,106,105,103,102,100,99
dw 97,96,95,93,92,90,89,87,86,84,83,81,80,78,77,75,74,72,71,69,68,66,65,63,62,60,59,57,56,54,53,51
dw 49,48,46,45,43,42,40,39,37,36,34,32,31,29,28,26,25,23,21,20,18,17,15,14,12,10,9,7,6,4,3,1
dw 0,-1,-3,-4,-6,-7,-9,-10,-12,-14,-15,-17,-18,-20,-21,-23,-25,-26,-28,-29,-31,-32,-34,-36,-37,-39,-40,-42,-43,-45,-46,-48
dw -49,-51,-53,-54,-56,-57,-59,-60,-62,-63,-65,-66,-68,-69,-71,-72,-74,-75,-77,-78,-80,-81,-83,-84,-86,-87,-89,-90,-92,-93,-95,-96
dw -97,-99,-100,-102,-103,-105,-106,-108,-109,-110,-112,-113,-115,-116,-117,-119,-120,-122,-123,-124,-126,-127,-128,-130,-131,-132,-134,-135,-136,-138,-139,-140
dw -142,-143,-144,-146,-147,-148,-149,-151,-152,-153,-155,-156,-157,-158,-159,-161,-162,-163,-164,-166,-167,-168,-169,-170,-171,-173,-174,-175,-176,-177,-178,-179
dw -181,-182,-183,-184,-185,-186,-187,-188,-189,-190,-191,-192,-193,-194,-195,-196,-197,-198,-199,-200,-201,-202,-203,-204,-205,-206,-207,-208,-209,-210,-211,-211
dw -212,-213,-214,-215,-216,-217,-217,-218,-219,-220,-221,-221,-222,-223,-224,-225,-225,-226,-227,-227,-228,-229,-230,-230,-231,-232,-232,-233,-234,-234,-235,-235
dw -236,-237,-237,-238,-238,-239,-239,-240,-241,-241,-242,-242,-243,-243,-244,-244,-244,-245,-245,-246,-246,-247,-247,-247,-248,-248,-249,-249,-249,-250,-250,-250
dw -251,-251,-251,-251,-252,-252,-252,-252,-253,-253,-253,-253,-254,-254,-254,-254,-254,-254,-255,-255,-255,-255,-255,-255,-255,-255,-255,-255,-255,-255,-255,-255
dw -256,-255,-255,-255,-255,-255,-255,-255,-255,-255,-255,-255,-255,-255,-255,-254,-254,-254,-254,-254,-254,-253,-253,-253,-253,-252,-252,-252,-252,-251,-251,-251
dw -251,-250,-250,-250,-249,-249,-249,-248,-248,-247,-247,-247,-246,-246,-245,-245,-244,-244,-244,-243,-243,-242,-242,-241,-241,-240,-239,-239,-238,-238,-237,-237
dw -236,-235,-235,-234,-234,-233,-232,-232,-231,-230,-230,-229,-228,-227,-227,-226,-225,-225,-224,-223,-222,-221,-221,-220,-219,-218,-217,-217,-216,-215,-214,-213
dw -212,-211,-211,-210,-209,-208,-207,-206,-205,-204,-203,-202,-201,-200,-199,-198,-197,-196,-195,-194,-193,-192,-191,-190,-189,-188,-187,-186,-185,-184,-183,-182
dw -181,-179,-178,-177,-176,-175,-174,-173,-171,-170,-169,-168,-167,-166,-164,-163,-162,-161,-159,-158,-157,-156,-155,-153,-152,-151,-149,-148,-147,-146,-144,-143
dw -142,-140,-139,-138,-136,-135,-134,-132,-131,-130,-128,-127,-126,-124,-123,-122,-120,-119,-117,-116,-115,-113,-112,-110,-109,-108,-106,-105,-103,-102,-100,-99
dw -97,-96,-95,-93,-92,-90,-89,-87,-86,-84,-83,-81,-80,-78,-77,-75,-74,-72,-71,-69,-68,-66,-65,-63,-62,-60,-59,-57,-56,-54,-53,-51
dw -49,-48,-46,-45,-43,-42,-40,-39,-37,-36,-34,-32,-31,-29,-28,-26,-25,-23,-21,-20,-18,-17,-15,-14,-12,-10,-9,-7,-6,-4,-3,-1

513
LENS/SIN4096.INC Normal file
View file

@ -0,0 +1,513 @@
dw 0, 25, 50, 75, 100, 125, 150, 175
dw 201, 226, 251, 276, 301, 326, 351, 376
dw 402, 427, 452, 477, 502, 527, 552, 577
dw 603, 628, 653, 678, 703, 728, 753, 778
dw 803, 829, 854, 879, 904, 929, 954, 979
dw 1004, 1029, 1054, 1079, 1105, 1130, 1155, 1180
dw 1205, 1230, 1255, 1280, 1305, 1330, 1355, 1380
dw 1405, 1430, 1455, 1480, 1505, 1530, 1555, 1580
dw 1605, 1630, 1655, 1680, 1705, 1730, 1755, 1780
dw 1805, 1830, 1855, 1880, 1905, 1930, 1955, 1980
dw 2005, 2030, 2055, 2080, 2105, 2130, 2155, 2180
dw 2204, 2229, 2254, 2279, 2304, 2329, 2354, 2379
dw 2404, 2428, 2453, 2478, 2503, 2528, 2553, 2577
dw 2602, 2627, 2652, 2677, 2701, 2726, 2751, 2776
dw 2801, 2825, 2850, 2875, 2900, 2924, 2949, 2974
dw 2998, 3023, 3048, 3073, 3097, 3122, 3147, 3171
dw 3196, 3221, 3245, 3270, 3294, 3319, 3344, 3368
dw 3393, 3417, 3442, 3467, 3491, 3516, 3540, 3565
dw 3589, 3614, 3638, 3663, 3687, 3712, 3736, 3761
dw 3785, 3810, 3834, 3858, 3883, 3907, 3932, 3956
dw 3980, 4005, 4029, 4054, 4078, 4102, 4127, 4151
dw 4175, 4200, 4224, 4248, 4272, 4297, 4321, 4345
dw 4369, 4394, 4418, 4442, 4466, 4490, 4514, 4539
dw 4563, 4587, 4611, 4635, 4659, 4683, 4707, 4731
dw 4756, 4780, 4804, 4828, 4852, 4876, 4900, 4924
dw 4948, 4972, 4995, 5019, 5043, 5067, 5091, 5115
dw 5139, 5163, 5187, 5210, 5234, 5258, 5282, 5306
dw 5329, 5353, 5377, 5401, 5424, 5448, 5472, 5495
dw 5519, 5543, 5566, 5590, 5614, 5637, 5661, 5684
dw 5708, 5732, 5755, 5779, 5802, 5826, 5849, 5873
dw 5896, 5919, 5943, 5966, 5990, 6013, 6036, 6060
dw 6083, 6106, 6130, 6153, 6176, 6200, 6223, 6246
dw 6269, 6293, 6316, 6339, 6362, 6385, 6408, 6432
dw 6455, 6478, 6501, 6524, 6547, 6570, 6593, 6616
dw 6639, 6662, 6685, 6708, 6731, 6754, 6777, 6799
dw 6822, 6845, 6868, 6891, 6914, 6936, 6959, 6982
dw 7005, 7027, 7050, 7073, 7095, 7118, 7141, 7163
dw 7186, 7208, 7231, 7253, 7276, 7299, 7321, 7343
dw 7366, 7388, 7411, 7433, 7456, 7478, 7500, 7523
dw 7545, 7567, 7590, 7612, 7634, 7656, 7678, 7701
dw 7723, 7745, 7767, 7789, 7811, 7833, 7856, 7878
dw 7900, 7922, 7944, 7966, 7988, 8009, 8031, 8053
dw 8075, 8097, 8119, 8141, 8162, 8184, 8206, 8228
dw 8249, 8271, 8293, 8315, 8336, 8358, 8379, 8401
dw 8423, 8444, 8466, 8487, 8509, 8530, 8552, 8573
dw 8594, 8616, 8637, 8658, 8680, 8701, 8722, 8744
dw 8765, 8786, 8807, 8829, 8850, 8871, 8892, 8913
dw 8934, 8955, 8976, 8997, 9018, 9039, 9060, 9081
dw 9102, 9123, 9144, 9165, 9185, 9206, 9227, 9248
dw 9268, 9289, 9310, 9331, 9351, 9372, 9392, 9413
dw 9434, 9454, 9475, 9495, 9516, 9536, 9556, 9577
dw 9597, 9618, 9638, 9658, 9679, 9699, 9719, 9739
dw 9759, 9780, 9800, 9820, 9840, 9860, 9880, 9900
dw 9920, 9940, 9960, 9980, 10000, 10020, 10040, 10060
dw 10079, 10099, 10119, 10139, 10159, 10178, 10198, 10218
dw 10237, 10257, 10276, 10296, 10315, 10335, 10354, 10374
dw 10393, 10413, 10432, 10452, 10471, 10490, 10510, 10529
dw 10548, 10567, 10586, 10606, 10625, 10644, 10663, 10682
dw 10701, 10720, 10739, 10758, 10777, 10796, 10815, 10834
dw 10853, 10871, 10890, 10909, 10928, 10946, 10965, 10984
dw 11002, 11021, 11040, 11058, 11077, 11095, 11114, 11132
dw 11150, 11169, 11187, 11206, 11224, 11242, 11260, 11279
dw 11297, 11315, 11333, 11351, 11370, 11388, 11406, 11424
dw 11442, 11460, 11478, 11496, 11513, 11531, 11549, 11567
dw 11585, 11602, 11620, 11638, 11656, 11673, 11691, 11708
dw 11726, 11744, 11761, 11779, 11796, 11813, 11831, 11848
dw 11866, 11883, 11900, 11917, 11935, 11952, 11969, 11986
dw 12003, 12020, 12037, 12054, 12072, 12088, 12105, 12122
dw 12139, 12156, 12173, 12190, 12207, 12223, 12240, 12257
dw 12273, 12290, 12307, 12323, 12340, 12356, 12373, 12389
dw 12406, 12422, 12438, 12455, 12471, 12487, 12504, 12520
dw 12536, 12552, 12568, 12584, 12600, 12617, 12633, 12649
dw 12665, 12680, 12696, 12712, 12728, 12744, 12760, 12775
dw 12791, 12807, 12822, 12838, 12854, 12869, 12885, 12900
dw 12916, 12931, 12947, 12962, 12977, 12993, 13008, 13023
dw 13038, 13054, 13069, 13084, 13099, 13114, 13129, 13144
dw 13159, 13174, 13189, 13204, 13219, 13234, 13249, 13263
dw 13278, 13293, 13307, 13322, 13337, 13351, 13366, 13380
dw 13395, 13409, 13424, 13438, 13452, 13467, 13481, 13495
dw 13510, 13524, 13538, 13552, 13566, 13580, 13594, 13608
dw 13622, 13636, 13650, 13664, 13678, 13692, 13705, 13719
dw 13733, 13747, 13760, 13774, 13788, 13801, 13815, 13828
dw 13842, 13855, 13868, 13882, 13895, 13908, 13922, 13935
dw 13948, 13961, 13974, 13988, 14001, 14014, 14027, 14040
dw 14053, 14065, 14078, 14091, 14104, 14117, 14129, 14142
dw 14155, 14167, 14180, 14193, 14205, 14218, 14230, 14243
dw 14255, 14267, 14280, 14292, 14304, 14317, 14329, 14341
dw 14353, 14365, 14377, 14389, 14401, 14413, 14425, 14437
dw 14449, 14461, 14473, 14484, 14496, 14508, 14519, 14531
dw 14543, 14554, 14566, 14577, 14589, 14600, 14611, 14623
dw 14634, 14645, 14657, 14668, 14679, 14690, 14701, 14712
dw 14723, 14734, 14745, 14756, 14767, 14778, 14789, 14800
dw 14810, 14821, 14832, 14843, 14853, 14864, 14874, 14885
dw 14895, 14906, 14916, 14927, 14937, 14947, 14957, 14968
dw 14978, 14988, 14998, 15008, 15018, 15028, 15038, 15048
dw 15058, 15068, 15078, 15088, 15098, 15107, 15117, 15127
dw 15136, 15146, 15156, 15165, 15175, 15184, 15193, 15203
dw 15212, 15221, 15231, 15240, 15249, 15258, 15267, 15277
dw 15286, 15295, 15304, 15313, 15322, 15330, 15339, 15348
dw 15357, 15366, 15374, 15383, 15392, 15400, 15409, 15417
dw 15426, 15434, 15443, 15451, 15459, 15468, 15476, 15484
dw 15492, 15500, 15509, 15517, 15525, 15533, 15541, 15549
dw 15557, 15564, 15572, 15580, 15588, 15596, 15603, 15611
dw 15618, 15626, 15634, 15641, 15649, 15656, 15663, 15671
dw 15678, 15685, 15693, 15700, 15707, 15714, 15721, 15728
dw 15735, 15742, 15749, 15756, 15763, 15770, 15777, 15783
dw 15790, 15797, 15803, 15810, 15817, 15823, 15830, 15836
dw 15842, 15849, 15855, 15861, 15868, 15874, 15880, 15886
dw 15892, 15899, 15905, 15911, 15917, 15923, 15928, 15934
dw 15940, 15946, 15952, 15957, 15963, 15969, 15974, 15980
dw 15985, 15991, 15996, 16002, 16007, 16012, 16018, 16023
dw 16028, 16033, 16039, 16044, 16049, 16054, 16059, 16064
dw 16069, 16074, 16078, 16083, 16088, 16093, 16097, 16102
dw 16107, 16111, 16116, 16120, 16125, 16129, 16134, 16138
dw 16142, 16147, 16151, 16155, 16159, 16163, 16167, 16171
dw 16175, 16179, 16183, 16187, 16191, 16195, 16199, 16202
dw 16206, 16210, 16213, 16217, 16221, 16224, 16228, 16231
dw 16234, 16238, 16241, 16244, 16248, 16251, 16254, 16257
dw 16260, 16263, 16266, 16269, 16272, 16275, 16278, 16281
dw 16284, 16286, 16289, 16292, 16294, 16297, 16300, 16302
dw 16305, 16307, 16309, 16312, 16314, 16316, 16319, 16321
dw 16323, 16325, 16327, 16329, 16331, 16333, 16335, 16337
dw 16339, 16341, 16343, 16344, 16346, 16348, 16350, 16351
dw 16353, 16354, 16356, 16357, 16359, 16360, 16361, 16363
dw 16364, 16365, 16366, 16367, 16368, 16369, 16370, 16371
dw 16372, 16373, 16374, 16375, 16376, 16377, 16377, 16378
dw 16379, 16379, 16380, 16380, 16381, 16381, 16382, 16382
dw 16382, 16383, 16383, 16383, 16383, 16383, 16383, 16383
dw 16384, 16383, 16383, 16383, 16383, 16383, 16383, 16383
dw 16382, 16382, 16382, 16381, 16381, 16380, 16380, 16379
dw 16379, 16378, 16377, 16377, 16376, 16375, 16374, 16373
dw 16372, 16371, 16370, 16369, 16368, 16367, 16366, 16365
dw 16364, 16363, 16361, 16360, 16359, 16357, 16356, 16354
dw 16353, 16351, 16350, 16348, 16346, 16344, 16343, 16341
dw 16339, 16337, 16335, 16333, 16331, 16329, 16327, 16325
dw 16323, 16321, 16319, 16316, 16314, 16312, 16309, 16307
dw 16305, 16302, 16300, 16297, 16294, 16292, 16289, 16286
dw 16284, 16281, 16278, 16275, 16272, 16269, 16266, 16263
dw 16260, 16257, 16254, 16251, 16248, 16244, 16241, 16238
dw 16234, 16231, 16228, 16224, 16221, 16217, 16213, 16210
dw 16206, 16202, 16199, 16195, 16191, 16187, 16183, 16179
dw 16175, 16171, 16167, 16163, 16159, 16155, 16151, 16147
dw 16142, 16138, 16134, 16129, 16125, 16120, 16116, 16111
dw 16107, 16102, 16097, 16093, 16088, 16083, 16078, 16074
dw 16069, 16064, 16059, 16054, 16049, 16044, 16039, 16033
dw 16028, 16023, 16018, 16012, 16007, 16002, 15996, 15991
dw 15985, 15980, 15974, 15969, 15963, 15957, 15952, 15946
dw 15940, 15934, 15928, 15923, 15917, 15911, 15905, 15899
dw 15892, 15886, 15880, 15874, 15868, 15861, 15855, 15849
dw 15842, 15836, 15830, 15823, 15817, 15810, 15803, 15797
dw 15790, 15783, 15777, 15770, 15763, 15756, 15749, 15742
dw 15735, 15728, 15721, 15714, 15707, 15700, 15693, 15685
dw 15678, 15671, 15663, 15656, 15649, 15641, 15634, 15626
dw 15618, 15611, 15603, 15596, 15588, 15580, 15572, 15564
dw 15557, 15549, 15541, 15533, 15525, 15517, 15509, 15500
dw 15492, 15484, 15476, 15468, 15459, 15451, 15443, 15434
dw 15426, 15417, 15409, 15400, 15392, 15383, 15374, 15366
dw 15357, 15348, 15339, 15330, 15322, 15313, 15304, 15295
dw 15286, 15277, 15267, 15258, 15249, 15240, 15231, 15221
dw 15212, 15203, 15193, 15184, 15175, 15165, 15156, 15146
dw 15136, 15127, 15117, 15107, 15098, 15088, 15078, 15068
dw 15058, 15048, 15038, 15028, 15018, 15008, 14998, 14988
dw 14978, 14968, 14957, 14947, 14937, 14927, 14916, 14906
dw 14895, 14885, 14874, 14864, 14853, 14843, 14832, 14821
dw 14810, 14800, 14789, 14778, 14767, 14756, 14745, 14734
dw 14723, 14712, 14701, 14690, 14679, 14668, 14657, 14645
dw 14634, 14623, 14611, 14600, 14589, 14577, 14566, 14554
dw 14543, 14531, 14519, 14508, 14496, 14484, 14473, 14461
dw 14449, 14437, 14425, 14413, 14401, 14389, 14377, 14365
dw 14353, 14341, 14329, 14317, 14304, 14292, 14280, 14267
dw 14255, 14243, 14230, 14218, 14205, 14193, 14180, 14167
dw 14155, 14142, 14129, 14117, 14104, 14091, 14078, 14065
dw 14053, 14040, 14027, 14014, 14001, 13988, 13974, 13961
dw 13948, 13935, 13922, 13908, 13895, 13882, 13868, 13855
dw 13842, 13828, 13815, 13801, 13788, 13774, 13760, 13747
dw 13733, 13719, 13705, 13692, 13678, 13664, 13650, 13636
dw 13622, 13608, 13594, 13580, 13566, 13552, 13538, 13524
dw 13510, 13495, 13481, 13467, 13452, 13438, 13424, 13409
dw 13395, 13380, 13366, 13351, 13337, 13322, 13307, 13293
dw 13278, 13263, 13249, 13234, 13219, 13204, 13189, 13174
dw 13159, 13144, 13129, 13114, 13099, 13084, 13069, 13054
dw 13038, 13023, 13008, 12993, 12977, 12962, 12947, 12931
dw 12916, 12900, 12885, 12869, 12854, 12838, 12822, 12807
dw 12791, 12775, 12760, 12744, 12728, 12712, 12696, 12680
dw 12665, 12649, 12633, 12617, 12600, 12584, 12568, 12552
dw 12536, 12520, 12504, 12487, 12471, 12455, 12438, 12422
dw 12406, 12389, 12373, 12356, 12340, 12323, 12307, 12290
dw 12273, 12257, 12240, 12223, 12207, 12190, 12173, 12156
dw 12139, 12122, 12105, 12088, 12072, 12054, 12037, 12020
dw 12003, 11986, 11969, 11952, 11935, 11917, 11900, 11883
dw 11866, 11848, 11831, 11813, 11796, 11779, 11761, 11744
dw 11726, 11708, 11691, 11673, 11656, 11638, 11620, 11602
dw 11585, 11567, 11549, 11531, 11513, 11496, 11478, 11460
dw 11442, 11424, 11406, 11388, 11370, 11351, 11333, 11315
dw 11297, 11279, 11260, 11242, 11224, 11206, 11187, 11169
dw 11150, 11132, 11114, 11095, 11077, 11058, 11040, 11021
dw 11002, 10984, 10965, 10946, 10928, 10909, 10890, 10871
dw 10853, 10834, 10815, 10796, 10777, 10758, 10739, 10720
dw 10701, 10682, 10663, 10644, 10625, 10606, 10586, 10567
dw 10548, 10529, 10510, 10490, 10471, 10452, 10432, 10413
dw 10393, 10374, 10354, 10335, 10315, 10296, 10276, 10257
dw 10237, 10218, 10198, 10178, 10159, 10139, 10119, 10099
dw 10079, 10060, 10040, 10020, 10000, 9980, 9960, 9940
dw 9920, 9900, 9880, 9860, 9840, 9820, 9800, 9780
dw 9759, 9739, 9719, 9699, 9679, 9658, 9638, 9618
dw 9597, 9577, 9556, 9536, 9516, 9495, 9475, 9454
dw 9434, 9413, 9392, 9372, 9351, 9331, 9310, 9289
dw 9268, 9248, 9227, 9206, 9185, 9165, 9144, 9123
dw 9102, 9081, 9060, 9039, 9018, 8997, 8976, 8955
dw 8934, 8913, 8892, 8871, 8850, 8829, 8807, 8786
dw 8765, 8744, 8722, 8701, 8680, 8658, 8637, 8616
dw 8594, 8573, 8552, 8530, 8509, 8487, 8466, 8444
dw 8423, 8401, 8379, 8358, 8336, 8315, 8293, 8271
dw 8249, 8228, 8206, 8184, 8162, 8141, 8119, 8097
dw 8075, 8053, 8031, 8009, 7988, 7966, 7944, 7922
dw 7900, 7878, 7856, 7833, 7811, 7789, 7767, 7745
dw 7723, 7701, 7678, 7656, 7634, 7612, 7590, 7567
dw 7545, 7523, 7500, 7478, 7456, 7433, 7411, 7388
dw 7366, 7343, 7321, 7299, 7276, 7253, 7231, 7208
dw 7186, 7163, 7141, 7118, 7095, 7073, 7050, 7027
dw 7005, 6982, 6959, 6936, 6914, 6891, 6868, 6845
dw 6822, 6799, 6777, 6754, 6731, 6708, 6685, 6662
dw 6639, 6616, 6593, 6570, 6547, 6524, 6501, 6478
dw 6455, 6432, 6408, 6385, 6362, 6339, 6316, 6293
dw 6269, 6246, 6223, 6200, 6176, 6153, 6130, 6106
dw 6083, 6060, 6036, 6013, 5990, 5966, 5943, 5919
dw 5896, 5873, 5849, 5826, 5802, 5779, 5755, 5732
dw 5708, 5684, 5661, 5637, 5614, 5590, 5566, 5543
dw 5519, 5495, 5472, 5448, 5424, 5401, 5377, 5353
dw 5329, 5306, 5282, 5258, 5234, 5210, 5187, 5163
dw 5139, 5115, 5091, 5067, 5043, 5019, 4995, 4972
dw 4948, 4924, 4900, 4876, 4852, 4828, 4804, 4780
dw 4756, 4731, 4707, 4683, 4659, 4635, 4611, 4587
dw 4563, 4539, 4514, 4490, 4466, 4442, 4418, 4394
dw 4369, 4345, 4321, 4297, 4272, 4248, 4224, 4200
dw 4175, 4151, 4127, 4102, 4078, 4054, 4029, 4005
dw 3980, 3956, 3932, 3907, 3883, 3858, 3834, 3810
dw 3785, 3761, 3736, 3712, 3687, 3663, 3638, 3614
dw 3589, 3565, 3540, 3516, 3491, 3467, 3442, 3417
dw 3393, 3368, 3344, 3319, 3294, 3270, 3245, 3221
dw 3196, 3171, 3147, 3122, 3097, 3073, 3048, 3023
dw 2998, 2974, 2949, 2924, 2900, 2875, 2850, 2825
dw 2801, 2776, 2751, 2726, 2701, 2677, 2652, 2627
dw 2602, 2577, 2553, 2528, 2503, 2478, 2453, 2428
dw 2404, 2379, 2354, 2329, 2304, 2279, 2254, 2229
dw 2204, 2180, 2155, 2130, 2105, 2080, 2055, 2030
dw 2005, 1980, 1955, 1930, 1905, 1880, 1855, 1830
dw 1805, 1780, 1755, 1730, 1705, 1680, 1655, 1630
dw 1605, 1580, 1555, 1530, 1505, 1480, 1455, 1430
dw 1405, 1380, 1355, 1330, 1305, 1280, 1255, 1230
dw 1205, 1180, 1155, 1130, 1105, 1079, 1054, 1029
dw 1004, 979, 954, 929, 904, 879, 854, 829
dw 803, 778, 753, 728, 703, 678, 653, 628
dw 603, 577, 552, 527, 502, 477, 452, 427
dw 402, 376, 351, 326, 301, 276, 251, 226
dw 201, 175, 150, 125, 100, 75, 50, 25
dw 0, -25, -50, -75, -100, -125, -150, -175
dw -201, -226, -251, -276, -301, -326, -351, -376
dw -402, -427, -452, -477, -502, -527, -552, -577
dw -603, -628, -653, -678, -703, -728, -753, -778
dw -803, -829, -854, -879, -904, -929, -954, -979
dw -1004, -1029, -1054, -1079, -1105, -1130, -1155, -1180
dw -1205, -1230, -1255, -1280, -1305, -1330, -1355, -1380
dw -1405, -1430, -1455, -1480, -1505, -1530, -1555, -1580
dw -1605, -1630, -1655, -1680, -1705, -1730, -1755, -1780
dw -1805, -1830, -1855, -1880, -1905, -1930, -1955, -1980
dw -2005, -2030, -2055, -2080, -2105, -2130, -2155, -2180
dw -2204, -2229, -2254, -2279, -2304, -2329, -2354, -2379
dw -2404, -2428, -2453, -2478, -2503, -2528, -2553, -2577
dw -2602, -2627, -2652, -2677, -2701, -2726, -2751, -2776
dw -2801, -2825, -2850, -2875, -2900, -2924, -2949, -2974
dw -2998, -3023, -3048, -3073, -3097, -3122, -3147, -3171
dw -3196, -3221, -3245, -3270, -3294, -3319, -3344, -3368
dw -3393, -3417, -3442, -3467, -3491, -3516, -3540, -3565
dw -3589, -3614, -3638, -3663, -3687, -3712, -3736, -3761
dw -3785, -3810, -3834, -3858, -3883, -3907, -3932, -3956
dw -3980, -4005, -4029, -4054, -4078, -4102, -4127, -4151
dw -4175, -4200, -4224, -4248, -4272, -4297, -4321, -4345
dw -4369, -4394, -4418, -4442, -4466, -4490, -4514, -4539
dw -4563, -4587, -4611, -4635, -4659, -4683, -4707, -4731
dw -4756, -4780, -4804, -4828, -4852, -4876, -4900, -4924
dw -4948, -4972, -4995, -5019, -5043, -5067, -5091, -5115
dw -5139, -5163, -5187, -5210, -5234, -5258, -5282, -5306
dw -5329, -5353, -5377, -5401, -5424, -5448, -5472, -5495
dw -5519, -5543, -5566, -5590, -5614, -5637, -5661, -5684
dw -5708, -5732, -5755, -5779, -5802, -5826, -5849, -5873
dw -5896, -5919, -5943, -5966, -5990, -6013, -6036, -6060
dw -6083, -6106, -6130, -6153, -6176, -6200, -6223, -6246
dw -6269, -6293, -6316, -6339, -6362, -6385, -6408, -6432
dw -6455, -6478, -6501, -6524, -6547, -6570, -6593, -6616
dw -6639, -6662, -6685, -6708, -6731, -6754, -6777, -6799
dw -6822, -6845, -6868, -6891, -6914, -6936, -6959, -6982
dw -7005, -7027, -7050, -7073, -7095, -7118, -7141, -7163
dw -7186, -7208, -7231, -7253, -7276, -7299, -7321, -7343
dw -7366, -7388, -7411, -7433, -7456, -7478, -7500, -7523
dw -7545, -7567, -7590, -7612, -7634, -7656, -7678, -7701
dw -7723, -7745, -7767, -7789, -7811, -7833, -7856, -7878
dw -7900, -7922, -7944, -7966, -7988, -8009, -8031, -8053
dw -8075, -8097, -8119, -8141, -8162, -8184, -8206, -8228
dw -8249, -8271, -8293, -8315, -8336, -8358, -8379, -8401
dw -8423, -8444, -8466, -8487, -8509, -8530, -8552, -8573
dw -8594, -8616, -8637, -8658, -8680, -8701, -8722, -8744
dw -8765, -8786, -8807, -8829, -8850, -8871, -8892, -8913
dw -8934, -8955, -8976, -8997, -9018, -9039, -9060, -9081
dw -9102, -9123, -9144, -9165, -9185, -9206, -9227, -9248
dw -9268, -9289, -9310, -9331, -9351, -9372, -9392, -9413
dw -9434, -9454, -9475, -9495, -9516, -9536, -9556, -9577
dw -9597, -9618, -9638, -9658, -9679, -9699, -9719, -9739
dw -9759, -9780, -9800, -9820, -9840, -9860, -9880, -9900
dw -9920, -9940, -9960, -9980,-10000,-10020,-10040,-10060
dw -10079,-10099,-10119,-10139,-10159,-10178,-10198,-10218
dw -10237,-10257,-10276,-10296,-10315,-10335,-10354,-10374
dw -10393,-10413,-10432,-10452,-10471,-10490,-10510,-10529
dw -10548,-10567,-10586,-10606,-10625,-10644,-10663,-10682
dw -10701,-10720,-10739,-10758,-10777,-10796,-10815,-10834
dw -10853,-10871,-10890,-10909,-10928,-10946,-10965,-10984
dw -11002,-11021,-11040,-11058,-11077,-11095,-11114,-11132
dw -11150,-11169,-11187,-11206,-11224,-11242,-11260,-11279
dw -11297,-11315,-11333,-11351,-11370,-11388,-11406,-11424
dw -11442,-11460,-11478,-11496,-11513,-11531,-11549,-11567
dw -11585,-11602,-11620,-11638,-11656,-11673,-11691,-11708
dw -11726,-11744,-11761,-11779,-11796,-11813,-11831,-11848
dw -11866,-11883,-11900,-11917,-11935,-11952,-11969,-11986
dw -12003,-12020,-12037,-12054,-12072,-12088,-12105,-12122
dw -12139,-12156,-12173,-12190,-12207,-12223,-12240,-12257
dw -12273,-12290,-12307,-12323,-12340,-12356,-12373,-12389
dw -12406,-12422,-12438,-12455,-12471,-12487,-12504,-12520
dw -12536,-12552,-12568,-12584,-12600,-12617,-12633,-12649
dw -12665,-12680,-12696,-12712,-12728,-12744,-12760,-12775
dw -12791,-12807,-12822,-12838,-12854,-12869,-12885,-12900
dw -12916,-12931,-12947,-12962,-12977,-12993,-13008,-13023
dw -13038,-13054,-13069,-13084,-13099,-13114,-13129,-13144
dw -13159,-13174,-13189,-13204,-13219,-13234,-13249,-13263
dw -13278,-13293,-13307,-13322,-13337,-13351,-13366,-13380
dw -13395,-13409,-13424,-13438,-13452,-13467,-13481,-13495
dw -13510,-13524,-13538,-13552,-13566,-13580,-13594,-13608
dw -13622,-13636,-13650,-13664,-13678,-13692,-13705,-13719
dw -13733,-13747,-13760,-13774,-13788,-13801,-13815,-13828
dw -13842,-13855,-13868,-13882,-13895,-13908,-13922,-13935
dw -13948,-13961,-13974,-13988,-14001,-14014,-14027,-14040
dw -14053,-14065,-14078,-14091,-14104,-14117,-14129,-14142
dw -14155,-14167,-14180,-14193,-14205,-14218,-14230,-14243
dw -14255,-14267,-14280,-14292,-14304,-14317,-14329,-14341
dw -14353,-14365,-14377,-14389,-14401,-14413,-14425,-14437
dw -14449,-14461,-14473,-14484,-14496,-14508,-14519,-14531
dw -14543,-14554,-14566,-14577,-14589,-14600,-14611,-14623
dw -14634,-14645,-14657,-14668,-14679,-14690,-14701,-14712
dw -14723,-14734,-14745,-14756,-14767,-14778,-14789,-14800
dw -14810,-14821,-14832,-14843,-14853,-14864,-14874,-14885
dw -14895,-14906,-14916,-14927,-14937,-14947,-14957,-14968
dw -14978,-14988,-14998,-15008,-15018,-15028,-15038,-15048
dw -15058,-15068,-15078,-15088,-15098,-15107,-15117,-15127
dw -15136,-15146,-15156,-15165,-15175,-15184,-15193,-15203
dw -15212,-15221,-15231,-15240,-15249,-15258,-15267,-15277
dw -15286,-15295,-15304,-15313,-15322,-15330,-15339,-15348
dw -15357,-15366,-15374,-15383,-15392,-15400,-15409,-15417
dw -15426,-15434,-15443,-15451,-15459,-15468,-15476,-15484
dw -15492,-15500,-15509,-15517,-15525,-15533,-15541,-15549
dw -15557,-15564,-15572,-15580,-15588,-15596,-15603,-15611
dw -15618,-15626,-15634,-15641,-15649,-15656,-15663,-15671
dw -15678,-15685,-15693,-15700,-15707,-15714,-15721,-15728
dw -15735,-15742,-15749,-15756,-15763,-15770,-15777,-15783
dw -15790,-15797,-15803,-15810,-15817,-15823,-15830,-15836
dw -15842,-15849,-15855,-15861,-15868,-15874,-15880,-15886
dw -15892,-15899,-15905,-15911,-15917,-15923,-15928,-15934
dw -15940,-15946,-15952,-15957,-15963,-15969,-15974,-15980
dw -15985,-15991,-15996,-16002,-16007,-16012,-16018,-16023
dw -16028,-16033,-16039,-16044,-16049,-16054,-16059,-16064
dw -16069,-16074,-16078,-16083,-16088,-16093,-16097,-16102
dw -16107,-16111,-16116,-16120,-16125,-16129,-16134,-16138
dw -16142,-16147,-16151,-16155,-16159,-16163,-16167,-16171
dw -16175,-16179,-16183,-16187,-16191,-16195,-16199,-16202
dw -16206,-16210,-16213,-16217,-16221,-16224,-16228,-16231
dw -16234,-16238,-16241,-16244,-16248,-16251,-16254,-16257
dw -16260,-16263,-16266,-16269,-16272,-16275,-16278,-16281
dw -16284,-16286,-16289,-16292,-16294,-16297,-16300,-16302
dw -16305,-16307,-16309,-16312,-16314,-16316,-16319,-16321
dw -16323,-16325,-16327,-16329,-16331,-16333,-16335,-16337
dw -16339,-16341,-16343,-16344,-16346,-16348,-16350,-16351
dw -16353,-16354,-16356,-16357,-16359,-16360,-16361,-16363
dw -16364,-16365,-16366,-16367,-16368,-16369,-16370,-16371
dw -16372,-16373,-16374,-16375,-16376,-16377,-16377,-16378
dw -16379,-16379,-16380,-16380,-16381,-16381,-16382,-16382
dw -16382,-16383,-16383,-16383,-16383,-16383,-16383,-16383
dw -16384,-16383,-16383,-16383,-16383,-16383,-16383,-16383
dw -16382,-16382,-16382,-16381,-16381,-16380,-16380,-16379
dw -16379,-16378,-16377,-16377,-16376,-16375,-16374,-16373
dw -16372,-16371,-16370,-16369,-16368,-16367,-16366,-16365
dw -16364,-16363,-16361,-16360,-16359,-16357,-16356,-16354
dw -16353,-16351,-16350,-16348,-16346,-16344,-16343,-16341
dw -16339,-16337,-16335,-16333,-16331,-16329,-16327,-16325
dw -16323,-16321,-16319,-16316,-16314,-16312,-16309,-16307
dw -16305,-16302,-16300,-16297,-16294,-16292,-16289,-16286
dw -16284,-16281,-16278,-16275,-16272,-16269,-16266,-16263
dw -16260,-16257,-16254,-16251,-16248,-16244,-16241,-16238
dw -16234,-16231,-16228,-16224,-16221,-16217,-16213,-16210
dw -16206,-16202,-16199,-16195,-16191,-16187,-16183,-16179
dw -16175,-16171,-16167,-16163,-16159,-16155,-16151,-16147
dw -16142,-16138,-16134,-16129,-16125,-16120,-16116,-16111
dw -16107,-16102,-16097,-16093,-16088,-16083,-16078,-16074
dw -16069,-16064,-16059,-16054,-16049,-16044,-16039,-16033
dw -16028,-16023,-16018,-16012,-16007,-16002,-15996,-15991
dw -15985,-15980,-15974,-15969,-15963,-15957,-15952,-15946
dw -15940,-15934,-15928,-15923,-15917,-15911,-15905,-15899
dw -15892,-15886,-15880,-15874,-15868,-15861,-15855,-15849
dw -15842,-15836,-15830,-15823,-15817,-15810,-15803,-15797
dw -15790,-15783,-15777,-15770,-15763,-15756,-15749,-15742
dw -15735,-15728,-15721,-15714,-15707,-15700,-15693,-15685
dw -15678,-15671,-15663,-15656,-15649,-15641,-15634,-15626
dw -15618,-15611,-15603,-15596,-15588,-15580,-15572,-15564
dw -15557,-15549,-15541,-15533,-15525,-15517,-15509,-15500
dw -15492,-15484,-15476,-15468,-15459,-15451,-15443,-15434
dw -15426,-15417,-15409,-15400,-15392,-15383,-15374,-15366
dw -15357,-15348,-15339,-15330,-15322,-15313,-15304,-15295
dw -15286,-15277,-15267,-15258,-15249,-15240,-15231,-15221
dw -15212,-15203,-15193,-15184,-15175,-15165,-15156,-15146
dw -15136,-15127,-15117,-15107,-15098,-15088,-15078,-15068
dw -15058,-15048,-15038,-15028,-15018,-15008,-14998,-14988
dw -14978,-14968,-14957,-14947,-14937,-14927,-14916,-14906
dw -14895,-14885,-14874,-14864,-14853,-14843,-14832,-14821
dw -14810,-14800,-14789,-14778,-14767,-14756,-14745,-14734
dw -14723,-14712,-14701,-14690,-14679,-14668,-14657,-14645
dw -14634,-14623,-14611,-14600,-14589,-14577,-14566,-14554
dw -14543,-14531,-14519,-14508,-14496,-14484,-14473,-14461
dw -14449,-14437,-14425,-14413,-14401,-14389,-14377,-14365
dw -14353,-14341,-14329,-14317,-14304,-14292,-14280,-14267
dw -14255,-14243,-14230,-14218,-14205,-14193,-14180,-14167
dw -14155,-14142,-14129,-14117,-14104,-14091,-14078,-14065
dw -14053,-14040,-14027,-14014,-14001,-13988,-13974,-13961
dw -13948,-13935,-13922,-13908,-13895,-13882,-13868,-13855
dw -13842,-13828,-13815,-13801,-13788,-13774,-13760,-13747
dw -13733,-13719,-13705,-13692,-13678,-13664,-13650,-13636
dw -13622,-13608,-13594,-13580,-13566,-13552,-13538,-13524
dw -13510,-13495,-13481,-13467,-13452,-13438,-13424,-13409
dw -13395,-13380,-13366,-13351,-13337,-13322,-13307,-13293
dw -13278,-13263,-13249,-13234,-13219,-13204,-13189,-13174
dw -13159,-13144,-13129,-13114,-13099,-13084,-13069,-13054
dw -13038,-13023,-13008,-12993,-12977,-12962,-12947,-12931
dw -12916,-12900,-12885,-12869,-12854,-12838,-12822,-12807
dw -12791,-12775,-12760,-12744,-12728,-12712,-12696,-12680
dw -12665,-12649,-12633,-12617,-12600,-12584,-12568,-12552
dw -12536,-12520,-12504,-12487,-12471,-12455,-12438,-12422
dw -12406,-12389,-12373,-12356,-12340,-12323,-12307,-12290
dw -12273,-12257,-12240,-12223,-12207,-12190,-12173,-12156
dw -12139,-12122,-12105,-12088,-12072,-12054,-12037,-12020
dw -12003,-11986,-11969,-11952,-11935,-11917,-11900,-11883
dw -11866,-11848,-11831,-11813,-11796,-11779,-11761,-11744
dw -11726,-11708,-11691,-11673,-11656,-11638,-11620,-11602
dw -11585,-11567,-11549,-11531,-11513,-11496,-11478,-11460
dw -11442,-11424,-11406,-11388,-11370,-11351,-11333,-11315
dw -11297,-11279,-11260,-11242,-11224,-11206,-11187,-11169
dw -11150,-11132,-11114,-11095,-11077,-11058,-11040,-11021
dw -11002,-10984,-10965,-10946,-10928,-10909,-10890,-10871
dw -10853,-10834,-10815,-10796,-10777,-10758,-10739,-10720
dw -10701,-10682,-10663,-10644,-10625,-10606,-10586,-10567
dw -10548,-10529,-10510,-10490,-10471,-10452,-10432,-10413
dw -10393,-10374,-10354,-10335,-10315,-10296,-10276,-10257
dw -10237,-10218,-10198,-10178,-10159,-10139,-10119,-10099
dw -10079,-10060,-10040,-10020,-10000, -9980, -9960, -9940
dw -9920, -9900, -9880, -9860, -9840, -9820, -9800, -9780
dw -9759, -9739, -9719, -9699, -9679, -9658, -9638, -9618
dw -9597, -9577, -9556, -9536, -9516, -9495, -9475, -9454
dw -9434, -9413, -9392, -9372, -9351, -9331, -9310, -9289
dw -9268, -9248, -9227, -9206, -9185, -9165, -9144, -9123
dw -9102, -9081, -9060, -9039, -9018, -8997, -8976, -8955
dw -8934, -8913, -8892, -8871, -8850, -8829, -8807, -8786
dw -8765, -8744, -8722, -8701, -8680, -8658, -8637, -8616
dw -8594, -8573, -8552, -8530, -8509, -8487, -8466, -8444
dw -8423, -8401, -8379, -8358, -8336, -8315, -8293, -8271
dw -8249, -8228, -8206, -8184, -8162, -8141, -8119, -8097
dw -8075, -8053, -8031, -8009, -7988, -7966, -7944, -7922
dw -7900, -7878, -7856, -7833, -7811, -7789, -7767, -7745
dw -7723, -7701, -7678, -7656, -7634, -7612, -7590, -7567
dw -7545, -7523, -7500, -7478, -7456, -7433, -7411, -7388
dw -7366, -7343, -7321, -7299, -7276, -7253, -7231, -7208
dw -7186, -7163, -7141, -7118, -7095, -7073, -7050, -7027
dw -7005, -6982, -6959, -6936, -6914, -6891, -6868, -6845
dw -6822, -6799, -6777, -6754, -6731, -6708, -6685, -6662
dw -6639, -6616, -6593, -6570, -6547, -6524, -6501, -6478
dw -6455, -6432, -6408, -6385, -6362, -6339, -6316, -6293
dw -6269, -6246, -6223, -6200, -6176, -6153, -6130, -6106
dw -6083, -6060, -6036, -6013, -5990, -5966, -5943, -5919
dw -5896, -5873, -5849, -5826, -5802, -5779, -5755, -5732
dw -5708, -5684, -5661, -5637, -5614, -5590, -5566, -5543
dw -5519, -5495, -5472, -5448, -5424, -5401, -5377, -5353
dw -5329, -5306, -5282, -5258, -5234, -5210, -5187, -5163
dw -5139, -5115, -5091, -5067, -5043, -5019, -4995, -4972
dw -4948, -4924, -4900, -4876, -4852, -4828, -4804, -4780
dw -4756, -4731, -4707, -4683, -4659, -4635, -4611, -4587
dw -4563, -4539, -4514, -4490, -4466, -4442, -4418, -4394
dw -4369, -4345, -4321, -4297, -4272, -4248, -4224, -4200
dw -4175, -4151, -4127, -4102, -4078, -4054, -4029, -4005
dw -3980, -3956, -3932, -3907, -3883, -3858, -3834, -3810
dw -3785, -3761, -3736, -3712, -3687, -3663, -3638, -3614
dw -3589, -3565, -3540, -3516, -3491, -3467, -3442, -3417
dw -3393, -3368, -3344, -3319, -3294, -3270, -3245, -3221
dw -3196, -3171, -3147, -3122, -3097, -3073, -3048, -3023
dw -2998, -2974, -2949, -2924, -2900, -2875, -2850, -2825
dw -2801, -2776, -2751, -2726, -2701, -2677, -2652, -2627
dw -2602, -2577, -2553, -2528, -2503, -2478, -2453, -2428
dw -2404, -2379, -2354, -2329, -2304, -2279, -2254, -2229
dw -2204, -2180, -2155, -2130, -2105, -2080, -2055, -2030
dw -2005, -1980, -1955, -1930, -1905, -1880, -1855, -1830
dw -1805, -1780, -1755, -1730, -1705, -1680, -1655, -1630
dw -1605, -1580, -1555, -1530, -1505, -1480, -1455, -1430
dw -1405, -1380, -1355, -1330, -1305, -1280, -1255, -1230
dw -1205, -1180, -1155, -1130, -1105, -1079, -1054, -1029
dw -1004, -979, -954, -929, -904, -879, -854, -829
dw -803, -778, -753, -728, -703, -678, -653, -628
dw -603, -577, -552, -527, -502, -477, -452, -427
dw -402, -376, -351, -326, -301, -276, -251, -226
dw -201, -175, -150, -125, -100, -75, -50, -25

BIN
LENS/_FILLER.OBK Normal file

Binary file not shown.

BIN
LENS/_LENSEX0.OBK Normal file

Binary file not shown.

BIN
LENS/_LENSEX1.OBK Normal file

Binary file not shown.

BIN
LENS/_LENSEX2.OBK Normal file

Binary file not shown.

BIN
LENS/_LENSEX3.OBK Normal file

Binary file not shown.

BIN
LENS/_LENSEX4.OBK Normal file

Binary file not shown.

BIN
LENS/_LENSEXB.OBK Normal file

Binary file not shown.

BIN
LENS/_LENSEXP.OBK Normal file

Binary file not shown.