Sancaros/stoneage8.5
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
master
stoneage8.5/石器时代8.5客户端最新源代码/石器源码/system/skyisland.cpp

547 lines
13 KiB
C++
Raw Permalink Normal View History

change file encoding
2020-06-23 15:53:23 +08:00

reupload
2020-06-23 15:27:59 +08:00
#include "../systeminc/version.h"
#include "../systeminc/system.h"
#include "../systeminc/loadrealbin.h"
#include "../systeminc/map.h"
#include "../systeminc/pc.h"
DWORD sky_island_no = 0;
DWORD sky_island_no_bak = 0;
LPDIRECTDRAWSURFACE lpsurLand = NULL;
LPDIRECTDRAWSURFACE lpsurCloud1 = NULL;
LPDIRECTDRAWSURFACE lpsurCloud2 = NULL;
change file encoding
2020-06-23 15:53:23 +08:00
#ifdef _MOON_FAIRYLAND // (不可开) ROG ADD 月之仙境
reupload
2020-06-23 15:27:59 +08:00
BOOL moonFlag = FALSE;
#endif
#ifdef _NEW_CLOUD
BOOL NCLOUD_Flag = FALSE;
#endif
short LandWidth, LandHeight;
short CloudWidth1, CloudHeight1;
short CloudWidth2, CloudHeight2;
int fMapWidth, fMapHeight;
int iCloudX1, iCloudY1, iCloudX2, iCloudY2;
int iCloudDX, iCloudDY;
BOOL bDrawUpCloud;
RECT g_rc;
#ifdef _NEW_CLOUD
extern void SkyIslandDraw(int floor);
#else
extern void SkyIslandDraw();
#endif
extern int displayBpp;
extern unsigned short highColorPalette[256];
#ifdef _READ16BITBMP
extern BOOL g_bUseAlpha;
#endif
void LoadBmpToSurface( int noFrom, LPDIRECTDRAWSURFACE lpsurTo, int w, int h)
{
DDSURFACEDESC ddsd;
ZeroMemory( &ddsd, sizeof(DDSURFACEDESC) );
ddsd.dwSize = sizeof(DDSURFACEDESC);
if( lpsurTo->Lock( NULL, &ddsd, DDLOCK_WAIT, NULL) == DD_OK ){
if( realGetImage( noFrom,
( unsigned char **)&pRealBinBits,
&RealBinWidth,
&RealBinHeight ) ){
change file encoding
2020-06-23 15:53:23 +08:00
// realbin档图素要倒着读
reupload
2020-06-23 15:27:59 +08:00
pRealBinBits += (w * (h-1));
if( displayBpp == 32){
extern unsigned int highColor32Palette[256];
int* surface;
surface = (int *)ddsd.lpSurface;
change file encoding
2020-06-23 15:53:23 +08:00
// 高彩一个点要用2个byte,所以pitch除2方便填颜色值
reupload
2020-06-23 15:27:59 +08:00
ddsd.lPitch >>= 2; // ddsd.lPitch /= 2;
unsigned int pixel;
for( int i = 0; i < h; i++){
for( int j = 0; j < w; j++){
pixel = highColor32Palette[(unsigned char)pRealBinBits[j]];
change file encoding
2020-06-23 15:53:23 +08:00
// 透明色不处理
reupload
2020-06-23 15:27:59 +08:00
if( pixel) surface[j] = pixel;
}
change file encoding
2020-06-23 15:53:23 +08:00
// 换下一行
reupload
2020-06-23 15:27:59 +08:00
surface += ddsd.lPitch;
pRealBinBits -= w;
}
}else if( displayBpp == 16){
LPWORD surface;
surface = (LPWORD)ddsd.lpSurface;
change file encoding
2020-06-23 15:53:23 +08:00
// 高彩一个点要用2个byte,所以pitch除2方便填颜色值
reupload
2020-06-23 15:27:59 +08:00
ddsd.lPitch >>= 1; // ddsd.lPitch /= 2;
unsigned short pixel;
for( short i = 0; i < h; i++){
for( short j = 0; j < w; j++){
pixel = highColorPalette[(unsigned char)pRealBinBits[j]];
change file encoding
2020-06-23 15:53:23 +08:00
// 透明色不处理
reupload
2020-06-23 15:27:59 +08:00
if( pixel) surface[j] = pixel;
}
change file encoding
2020-06-23 15:53:23 +08:00
// 换下一行
reupload
2020-06-23 15:27:59 +08:00
surface += ddsd.lPitch;
pRealBinBits -= w;
}
}else{
LPBYTE surface;
surface = (LPBYTE)ddsd.lpSurface;
for( short i = 0; i < h; i++){
CopyMemory( surface, pRealBinBits, w);
surface += ddsd.lPitch;
pRealBinBits -= w;
}
}
}
lpsurTo->Unlock( NULL);
}
}
void SkyIslandInit()
{
sky_island_no = 0;
sky_island_no_bak = 0;
LandWidth = 0;
LandHeight = 0;
CloudWidth1 = CloudHeight1 = 0;
CloudWidth2 = CloudHeight2 = 0;
iCloudX1 = iCloudY1 = 0;
iCloudX2 = iCloudY2 = 0;
iCloudDX = iCloudDY = 0;
}
void SkyIslandRelease()
{
LandWidth = 0;
CloudWidth1 = 0;
CloudWidth2 = 0;
if( lpsurLand){
lpsurLand->Release();
lpsurLand = NULL;
}
if( lpsurCloud1){
lpsurCloud1->Release();
lpsurCloud1 = NULL;
}
if( lpsurCloud2){
lpsurCloud2->Release();
lpsurCloud2 = NULL;
}
}
void SkyIslandLoadBmp()
{
if( sky_island_no){
short w, h;
DWORD no;
realGetNo( sky_island_no & 0xffff, &no );
realGetWH( no, &w, &h);
if( w != LandWidth || h != LandHeight){
fMapWidth = ((nowFloorGxSize + nowFloorGySize) * SURFACE_WIDTH) >> 1; // fMapWidth = (nowFloorGxSize+nowFloorGySize)*SURFACE_WIDTH/2;
fMapHeight = ((nowFloorGxSize + nowFloorGySize) * SURFACE_HEIGHT) >> 1; //fMapWidth = (nowFloorGxSize+nowFloorGySize)*SURFACE_WIDTH/2;
LandWidth = w;
LandHeight = h;
if( lpsurLand){
lpsurLand->Release();
lpsurLand = NULL;
}
lpsurLand = CreateSurface( w, h, 0, DDSCAPS_SYSTEMMEMORY);
}
if( lpsurLand){
LoadBmpToSurface( no, lpsurLand, w, h);
if( !lpsurCloud1){
#ifdef _NEW_CLOUD
if( NCLOUD_Flag == TRUE )
realGetNo( 29077+(rand()%2), &no);
else
realGetNo( 40500+(rand()&0x3), &no);
#else
realGetNo( 40500+(rand()&0x3), &no);
#endif
realGetWH( no, &w, &h);
CloudWidth1 = w;
CloudHeight1 = h;
iCloudX1 = rand() % w;
iCloudY1 = rand() % h;
if( lpsurCloud1 = CreateSurface( lpDraw->xSize, lpDraw->ySize, 0, DDSCAPS_SYSTEMMEMORY) ){
LoadBmpToSurface( no, lpsurCloud1, w, h);
}
}
if( !lpsurCloud2){
short w, h;
DWORD no;
#ifdef _NEW_CLOUD
if( NCLOUD_Flag == TRUE )
realGetNo( 29077+(rand()%2), &no);
else
realGetNo( 40500+(rand()&0x3), &no);
#else
realGetNo( 40500+(rand()&0x3), &no);
#endif
realGetWH( no, &w, &h);
CloudWidth2 = w;
CloudHeight2 = h;
iCloudX2 = rand() % w;
iCloudY2 = rand() % h;
if( lpsurCloud2 = CreateSurface( lpDraw->xSize, lpDraw->ySize, 0, DDSCAPS_SYSTEMMEMORY) ){
LoadBmpToSurface( no, lpsurCloud2, w, h);
}
}
}
}
}
void SkyIslandSetNo( int fl)
{
sky_island_no_bak = sky_island_no;
sky_island_no = 0;
change file encoding
2020-06-23 15:53:23 +08:00
#ifdef _MOON_FAIRYLAND // (不可开) ROG ADD 月之仙境
reupload
2020-06-23 15:27:59 +08:00
moonFlag = FALSE;
#endif
#ifdef _NEW_CLOUD
NCLOUD_Flag = FALSE;
#endif
switch( fl){
change file encoding
2020-06-23 15:53:23 +08:00
//避免重复的loadmap动作
reupload
2020-06-23 15:27:59 +08:00
case 30691:
sky_island_no = (1<<16) | 40510;
break;
case 30692:
sky_island_no = (2<<16) | 40510;
break;
case 30693:
sky_island_no = (3<<16) | 40510;
break;
case 30694:
sky_island_no = (4<<16) | 40510;
break;
case 30695:
sky_island_no = (5<<16) | 40510;
break;
case 30689:
sky_island_no = (6<<16) | 40510;
break;
change file encoding
2020-06-23 15:53:23 +08:00
case 5581://金飞航空
reupload
2020-06-23 15:27:59 +08:00
sky_island_no = (1<<16) | 40511;
break;
change file encoding
2020-06-23 15:53:23 +08:00
#ifdef _MOON_FAIRYLAND // (不可开) ROG ADD 月之仙境
reupload
2020-06-23 15:27:59 +08:00
case 8255:
sky_island_no = (1<<16) | 40512;
moonFlag = TRUE;
break;
case 8256:
sky_island_no = (2<<16) | 40512;
moonFlag = TRUE;
break;
case 8257:
sky_island_no = (3<<16) | 40512;
moonFlag = TRUE;
break;
#endif
#ifdef _LOST_FOREST_FOG
case 7450:
case 7451:
sky_island_no = (1<<16);
break;
#endif
change file encoding
2020-06-23 15:53:23 +08:00
// 神台
reupload
2020-06-23 15:27:59 +08:00
case 104:
sky_island_no = (2<<16) | 40511;
break;
#ifdef _NEW_CLOUD
case 61000:
case 61100:
sky_island_no = (1<<16);
NCLOUD_Flag = TRUE;
break;
#endif
}
if( sky_island_no_bak != sky_island_no){
SkyIslandLoadBmp();
int x,y;
x = ((nowGx + nowGy) * (SURFACE_WIDTH >> 1));
y = ((nowFloorGySize + nowGy - nowGx) * (SURFACE_HEIGHT >> 1));
g_rc.left = ((LandWidth-DEF_APPSIZEX)*x/fMapWidth);
g_rc.top = ((LandHeight-DEF_APPSIZEY)*y/fMapHeight);
g_rc.right = g_rc.left + DEF_APPSIZEX;
g_rc.bottom = g_rc.top + DEF_APPSIZEY;
}
}
#ifdef _NEW_CLOUD
void SkyIslandDraw(int floor)
#else
void SkyIslandDraw()
#endif
{
static DWORD dwSlow1;
static int compx = (int)pc.ptAct->mx,compy = (int)pc.ptAct->my;
int x,y;
DWORD now;
RECT rc;
if( sky_island_no && lpsurCloud1 && lpsurLand && pc.ptAct){
bDrawUpCloud = TRUE;
if(compx != (int)pc.ptAct->mx || compy != (int)pc.ptAct->my){
switch(pc.dir){
change file encoding
2020-06-23 15:53:23 +08:00
// 下
reupload
2020-06-23 15:27:59 +08:00
case 0: g_rc.top++; break;
change file encoding
2020-06-23 15:53:23 +08:00
// 左下
reupload
2020-06-23 15:27:59 +08:00
case 1:
g_rc.left--;
g_rc.top++;
break;
change file encoding
2020-06-23 15:53:23 +08:00
// 左
reupload
2020-06-23 15:27:59 +08:00
case 2: g_rc.left--; break;
change file encoding
2020-06-23 15:53:23 +08:00
// 左上
reupload
2020-06-23 15:27:59 +08:00
case 3:
g_rc.left--;
g_rc.top--;
break;
change file encoding
2020-06-23 15:53:23 +08:00
// 上
reupload
2020-06-23 15:27:59 +08:00
case 4: g_rc.top--; break;
change file encoding
2020-06-23 15:53:23 +08:00
// 右上
reupload
2020-06-23 15:27:59 +08:00
case 5:
g_rc.left++;
g_rc.top--;
break;
change file encoding
2020-06-23 15:53:23 +08:00
// 右
reupload
2020-06-23 15:27:59 +08:00
case 6: g_rc.left++; break;
change file encoding
2020-06-23 15:53:23 +08:00
// 右下
reupload
2020-06-23 15:27:59 +08:00
case 7:
g_rc.left++;
g_rc.top++;
break;
}
compx = (int)pc.ptAct->mx;
compy = (int)pc.ptAct->my;
}
g_rc.right = g_rc.left + DEF_APPSIZEX;
g_rc.bottom = g_rc.top + DEF_APPSIZEY;
SetRect(&rc,g_rc.left,g_rc.top,g_rc.right,g_rc.bottom);
if(g_rc.left < 0){
rc.left = 0;
rc.right = rc.left + DEF_APPSIZEX;
}
if(g_rc.top < 0){
rc.top = 0;
rc.bottom = rc.top + DEF_APPSIZEY;
}
if(g_rc.right > LandWidth){
rc.right = LandWidth;
rc.left = LandWidth - DEF_APPSIZEX;
}
if(g_rc.bottom > LandHeight){
rc.bottom = LandHeight;
rc.top = LandHeight - DEF_APPSIZEY;
}
lpDraw->lpBACKBUFFER->BltFast( 0, 0, lpsurLand, &rc, DDBLTFAST_WAIT);
#ifdef _READ16BITBMP
if(g_bUseAlpha) lpDraw->lpBACKBUFFERSYS->BltFast( 0, 0, lpsurLand, &rc, DDBLTFAST_WAIT);
#endif
change file encoding
2020-06-23 15:53:23 +08:00
#ifdef _MOON_FAIRYLAND // (不可开) ROG ADD 月之仙境
reupload
2020-06-23 15:27:59 +08:00
if(moonFlag == TRUE) return;
#endif
if( (now = TimeGetTime()) > dwSlow1){
dwSlow1 = now + 177;
iCloudX1 += iCloudDX;
iCloudY1 += iCloudDY;
if(((iCloudX1>=DEF_APPSIZEX) || (iCloudY1>=DEF_APPSIZEY)) ){
change file encoding
2020-06-23 15:53:23 +08:00
//产生一朵新的云
reupload
2020-06-23 15:27:59 +08:00
#ifdef __CARYTEST
iCloudNo1 = 40500+(rand()&0x3);
DWORD no;
short w, h;
realGetNo( iCloudNo1, &no);
realGetWH( no, &w, &h);
CloudWidth1 = w;
CloudHeight1 = h;
#else
DWORD no;
short w, h;
#ifdef _NEW_CLOUD
if( floor == 61000 || floor == 61100 )
realGetNo( 29077+(rand()%2), &no);
else
realGetNo( 40500+(rand()&0x3), &no);
#else
realGetNo( 40500+(rand()&0x3), &no);
#endif
realGetWH( no, &w, &h);
if( w!=CloudWidth1 || h!=CloudHeight1){
CloudWidth1 = w;
CloudHeight1 = h;
LoadBmpToSurface( no, lpsurCloud1, w, h);
}
#endif
int dx = 0, dy = 0;
switch( rand()%3){
case 0:
dx = rand() & 0x1f;
break;
case 1:
dy = rand() & 0x1f;
break;
default:
break;
}
iCloudX1 = -CloudWidth1 + dx + 40;
iCloudY1 = -CloudHeight1 + dy + 30;
}
}
// int x, y;
x = iCloudX1;
y = iCloudY1;
SetRect( &rc, 0, 0, CloudWidth1, CloudHeight1);
if( x < 0){
rc.left = -x;
x = 0;
}
if( (x+CloudWidth1) >= DEF_APPSIZEX){
rc.right = DEF_APPSIZEX - x;
}
if( y < 0){
rc.top = -y;
y = 0;
}
if( (y+CloudHeight1) >= DEF_APPSIZEY){
rc.bottom = DEF_APPSIZEY -y;
}
if( (rc.bottom-rc.top)>0 && (rc.right-rc.left)>0){
lpDraw->lpBACKBUFFER->BltFast( x, y, lpsurCloud1, &rc, DDBLTFAST_WAIT|DDBLTFAST_SRCCOLORKEY);
#ifdef _READ16BITBMP
if(g_bUseAlpha) lpDraw->lpBACKBUFFERSYS->BltFast( x, y, lpsurCloud1, &rc, DDBLTFAST_WAIT|DDBLTFAST_SRCCOLORKEY);
#endif
}
}
}
#ifdef _NEW_CLOUD
void SkyIslandDraw2( int fl )
#else
void SkyIslandDraw2()
#endif
{
change file encoding
2020-06-23 15:53:23 +08:00
#ifdef _MOON_FAIRYLAND // (不可开) ROG ADD 月之仙境
reupload
2020-06-23 15:27:59 +08:00
if(moonFlag == TRUE)
return;
#endif
static DWORD dwSlow2;
DWORD now;
RECT rc;
if( bDrawUpCloud){
bDrawUpCloud = FALSE;
if( sky_island_no && lpsurCloud2
#ifdef _NEW_CLOUD
|| ( fl == 61000 || fl == 61100 )
#endif
){
if( (now = TimeGetTime()) > dwSlow2){
dwSlow2 = now + 73;
iCloudX2 += iCloudDX;
iCloudY2 += iCloudDY;
if( (iCloudX2>=DEF_APPSIZEX) || //((iCloudX2+CloudWidth2)<0) ||
(iCloudY2>=DEF_APPSIZEY) /*|| ((iCloudY2+CloudHeight2)<0)*/){
change file encoding
2020-06-23 15:53:23 +08:00
//产生一朵新的云
reupload
2020-06-23 15:27:59 +08:00
DWORD no;
#ifdef _NEW_CLOUD
if( fl == 61000 || fl == 61100 ){
realGetNo( 29077+(rand()%2), &no);
}
else
realGetNo( 40500+(rand()&0x3), &no);
#else
realGetNo( 40500+(rand()&0x3), &no);
#endif
short w, h;
realGetWH( no, &w, &h);
if( w!=CloudWidth2 || h!=CloudHeight2){
CloudWidth2 = w;
CloudHeight2 = h;
LoadBmpToSurface( no, lpsurCloud2, w, h);
}
int dx = 0, dy = 0;
switch( rand()%3){
case 0:
dx = rand() & 0x1f;
break;
case 1:
dy = rand() & 0x1f;
break;
default:
break;
}
iCloudX2 = -CloudWidth2 + dx + 40;
iCloudY2 = -CloudHeight2 + dy + 30;
}
}
int x, y;
x = iCloudX2;
y = iCloudY2;
SetRect( &rc, 0, 0, CloudWidth2, CloudHeight2);
if( x < 0){
rc.left = -x;
x = 0;
}
if( (x+CloudWidth2) >= DEF_APPSIZEX){
rc.right = DEF_APPSIZEX - x;
}
if( y < 0){
rc.top = -y;
y = 0;
}
if( (y+CloudHeight2) >= DEF_APPSIZEY){
rc.bottom = DEF_APPSIZEY -y;
}
if( (rc.bottom-rc.top)>0 && (rc.right-rc.left)>0){
lpDraw->lpBACKBUFFER->BltFast( x, y, lpsurCloud2, &rc, DDBLTFAST_WAIT|DDBLTFAST_SRCCOLORKEY);
#ifdef _READ16BITBMP
if(g_bUseAlpha) lpDraw->lpBACKBUFFERSYS->BltFast( x, y, lpsurCloud2, &rc, DDBLTFAST_WAIT|DDBLTFAST_SRCCOLORKEY);
#endif
}
}
}
}
BOOL SkyIslandCheckSurface()
{
if( lpsurLand)
if( lpsurLand->IsLost() )
return TRUE;
if( lpsurCloud1)
if( lpsurCloud1->IsLost() )
return TRUE;
return FALSE;
}
void SkyIslandProc()
{
static DWORD speed = 0;
if( sky_island_no){
DWORD now = TimeGetTime();
if( now > speed){
speed = now + 1000;
int dx = 0, dy = 0;
switch( rand() & 0x3){
case 0:
dx = rand() & 0x2;
break;
case 1:
break;
default:
dy = rand() & 0x2;
break;
}
iCloudDX = 4 - dx;
iCloudDY = 2 + dy;
}
}
}
Reference in New Issue Copy Permalink