You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
131 lines
3.5 KiB
131 lines
3.5 KiB
15 years ago
|
#include "yukon.h"
|
||
|
|
#include <klocale.h>
|
||
|
|
#include <kdebug.h>
|
||
|
|
#include "deck.h"
|
||
|
|
#include <assert.h>
|
||
|
|
#include "cardmaps.h"
|
||
|
|
|
||
|
|
Yukon::Yukon( KMainWindow* parent, const char *name )
|
||
|
|
: Dealer( parent, name )
|
||
|
|
{
|
||
|
|
const int dist_x = cardMap::CARDX() * 11 / 10 + 1;
|
||
|
|
const int dist_y = cardMap::CARDY() * 11 / 10 + 1;
|
||
|
|
|
||
|
|
deck = Deck::new_deck(this);
|
||
|
|
deck->move(10, 10+dist_y*3);
|
||
|
|
deck->hide();
|
||
|
|
|
||
|
|
for (int i=0; i<4; i++) {
|
||
|
|
target[i] = new Pile(i+1, this);
|
||
|
|
target[i]->move(20+7*dist_x, 10+dist_y *i);
|
||
|
|
target[i]->setType(Pile::KlondikeTarget);
|
||
|
|
}
|
||
|
|
|
||
|
|
for (int i=0; i<7; i++) {
|
||
|
|
store[i] = new Pile(5+i, this);
|
||
|
|
store[i]->move(15+dist_x*i, 10);
|
||
|
|
store[i]->setAddType(Pile::KlondikeStore);
|
||
|
|
store[i]->setRemoveFlags(Pile::several | Pile::autoTurnTop);
|
||
|
|
}
|
||
|
|
|
||
|
|
setActions(Dealer::Hint | Dealer::Demo);
|
||
|
|
}
|
||
|
|
|
||
|
|
void Yukon::restart() {
|
||
|
|
deck->collectAndShuffle();
|
||
|
|
deal();
|
||
|
|
}
|
||
|
|
|
||
|
|
void Yukon::deal() {
|
||
|
|
for (int round = 0; round < 11; round++)
|
||
|
|
{
|
||
|
|
for (int j = 0; j < 7; j++)
|
||
|
|
{
|
||
|
|
bool doit = false;
|
||
|
|
switch (j) {
|
||
|
|
case 0:
|
||
|
|
doit = (round == 0);
|
||
|
|
break;
|
||
|
|
default:
|
||
|
|
doit = (round < j + 5);
|
||
|
|
}
|
||
|
|
if (doit)
|
||
|
|
store[j]->add(deck->nextCard(), round < j && j != 0, true);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
bool Yukon::isGameLost() const {
|
||
|
|
int i,j,k,l,indexi,freeStore=0;
|
||
|
|
Card *c, *cNewTop;
|
||
|
|
|
||
|
|
kdDebug(11111) <<"isGameLost" << endl;
|
||
|
|
|
||
|
|
for(i=0; i < 7; i++){
|
||
|
|
if( store[i]->isEmpty() ){
|
||
|
|
freeStore++;
|
||
|
|
continue;
|
||
|
|
}
|
||
|
|
|
||
|
|
if(store[i]->top()->rank() == Card::Ace ||
|
||
|
|
! store[i]->top()->isFaceUp())
|
||
|
|
return false;
|
||
|
|
|
||
|
|
for(indexi=store[i]->indexOf(store[i]->top()); indexi >=0; indexi--){
|
||
|
|
|
||
|
|
c=store[i]->at(indexi);
|
||
|
|
if( !c->isFaceUp() )
|
||
|
|
break;
|
||
|
|
|
||
|
|
if(freeStore > 0 && indexi > 0 && c->rank() == Card::King)
|
||
|
|
return false;
|
||
|
|
|
||
|
|
for(j=0; j < 4;j++){
|
||
|
|
if(!target[j]->isEmpty() &&
|
||
|
|
c->rank()-1 == target[j]->top()->rank() &&
|
||
|
|
c->suit() == target[j]->top()->suit())
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
|
||
|
|
for(j=1; j < 7; j++){
|
||
|
|
k=(i+j) % 7;
|
||
|
|
if( !store[k]->isEmpty() ) {
|
||
|
|
if(c->rank()+1 == store[k]->top()->rank() &&
|
||
|
|
(c->isRed() != store[k]->top()->isRed())){
|
||
|
|
|
||
|
|
if(indexi == 0)
|
||
|
|
return false;
|
||
|
|
else{
|
||
|
|
cNewTop=store[i]->at(indexi-1);
|
||
|
|
if(!cNewTop->isFaceUp())
|
||
|
|
return false;
|
||
|
|
if(cNewTop->rank() == Card::Ace)
|
||
|
|
return false;
|
||
|
|
if(cNewTop->rank() != store[k]->top()->rank() ||
|
||
|
|
cNewTop->isRed() != store[k]->top()->isRed())
|
||
|
|
return false;
|
||
|
|
|
||
|
|
for(l=0; l < 4;l++){
|
||
|
|
if(!target[l]->isEmpty() &&
|
||
|
|
cNewTop->rank()-1 == target[l]->top()->rank() &&
|
||
|
|
cNewTop->suit() == target[l]->top()->suit())
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
return (freeStore!=7);
|
||
|
|
}
|
||
|
|
|
||
|
|
static class LocalDealerInfo10 : public DealerInfo
|
||
|
|
{
|
||
|
|
public:
|
||
|
|
LocalDealerInfo10() : DealerInfo(I18N_NOOP("&Yukon"), 10) {}
|
||
|
|
virtual Dealer *createGame(KMainWindow *parent) { return new Yukon(parent); }
|
||
|
|
} gfi10;
|
||
|
|
|
||
|
|
#include "yukon.moc"
|