/***************************************************** ** ** PrintoutHelper --- writeWesternAspectarium ** ******************************************************/ void PrintoutHelper::writeWesternAspectarium( ChartProperties *props, const int &type ) { Formatter *formatter = Formatter::get(); wxString s; AspectExpert expert( h ); list<AspectEvent> al = expert.update( h, props ); int numrows = (int)al.size() / 3; if ( al.size() % 3 ) numrows++; Table table( 12, numrows + 1 ); table.show_grid = false; table.setHeader( 0, _( "Aspect" ), false, 2 ); table.setHeader( 3, _( "Orbis" ) ); table.col_line[2] = true; table.col_line[3] = true; table.setHeader( 4, _( "Aspect" ), false, 2 ); table.setHeader( 7, _( "Orbis" ) ); table.col_line[6] = true; table.col_line[7] = true; table.setHeader( 8, _( "Aspect" ), false, 2 ); table.setHeader( 11, _( "Orbis" ) ); table.col_line[10] = true; int col = 0; int row = 0; for ( list<AspectEvent>::iterator iter = al.begin(); iter != al.end(); iter++ ) { table.setEntry( 4 * col, row + 1, writer->getObjectName( (*iter).planet1, TMEDIUM ), config->usePlanetSymbols ); s = AspectExpert::getAspectSymbol( (*iter).aspectType ); if ( s.IsEmpty()) { s = AspectExpert::getAspectShortDescription( (*iter).aspectType ); table.setEntry( 4 * col + 1, row + 1, s, false ); } else { table.setEntry( 4 * col + 1, row + 1, s, true ); } table.setEntry( 4 * col + 2, row + 1, writer->getObjectName( (*iter).planet2, TMEDIUM ), config->usePlanetSymbols ); table.setEntry( 4 * col + 3, row + 1, formatter->getLenFormatted( (*iter).orbis, DEG_PRECISION_MINUTE ), false ); row++; if ( row >= numrows ) { col++; row = 0; } } writer->writeTable( table, true ); }
virtual int write() { UranianExpert expert( mview, writer, *cfg ); switch( mode ) { case 0: expert.writeRadixAnalysis( horoscope ); break; case 1: expert.writeYearlyPreviewAnalysis( horoscope, year ); break; default: printf( "Error: wrong view mode %d in midpoint window\n", mode ); break; } return 0; }
/***************************************************** ** ** GenericTableWriter --- writeAvRekhaPoints ** ******************************************************/ void GenericTableWriter::writeAvRekhaPoints( const uint &i0, const TcColumnSet &set ) { table->setHeader( i0, _( "AV" )); if ( set.listcontext != TAB_LC_PLANETS || ! set.vedic ) return; AshtakavargaExpert expert( h, V_RASI ); expert.update(); uint line = 1; for ( uint p = 0; p < obs.size(); p++ ) { assert( table->getNbRows() > line ); if (( obs[p] >= OSUN && obs[p] <= OSATURN ) || obs[p] == OASCENDANT ) { table->setEntry( i0, line, wxString::Format( wxT( "%d" ), expert.getItem( REKHA, obs[p], getRasi( h->getVedicLongitude( obs[p] ))))); } line++; } }
/***************************************************** ** ** GenericTableWriter --- writeAspectarium ** ******************************************************/ void GenericTableWriter::writeAspectarium( const uint &i0, const TcColumnSet &set ) { AspectExpert expert( h, h ); list<AspectEvent>::iterator iter; TableEntry *e; ChartProperties props; props.setVedic( set.vedic ); list<AspectEvent> al = expert.updateWesternAspects( &props, CT_RADIX ); for ( uint p = 0; p < obs.size(); p++ ) { table->setHeader( i0 + p, getObjectName( obs[p], set )); for ( uint q = 0; q < obs.size(); q++ ) { if ( p == q ) table->setEntry( i0 + p, q + 1, wxT( "-" )); else { for ( iter = al.begin(); iter != al.end(); iter++ ) { if ( (*iter).planet1 == obs[p] && (*iter).planet2 == obs[q] ) { e = table->getEntry( i0 + p , q + 1 ); e->text.add( MToken( TTSE_ASPECT, (*iter).aspectType, TF_MEDIUM )); e = table->getEntry( i0 + q , p + 1 ); e->text.add( MToken( TTSE_ASPECT, (*iter).aspectType, TF_MEDIUM )); //s << t.getAspectSymbol( (*iter).aspectType ); //table->setEntry( i0 + p , q + 1, s ); //table->setEntry( i0 + q , p + 1, s ); } } } } } }
/***************************************************** ** ** TextHelper --- writeVedicPlanets ** ******************************************************/ int TextHelper::writeVedicPlanets() { #define HOUSE_QUALIFIER 1000 wxString s; int pindex, rowindex = 1, shast, col = 1, p, ret = 0; int numcols; unsigned int i; ObjectPosition pos; Formatter *f = Formatter::get(); Lang lang; int nakshatramode = ( config->vNakshatraMode28 ? N28 : N27 ); VargaHoroscope chart( horoscope, VARGA_RASI ); VargaHoroscope bchart( horoscope, VARGA_BHAVA ); JaiminiExpert expert( &chart ); AshtakavargaExpert aexpert( &chart ); Planet *planet; int istyle = chartprops->getVedicMainStyle(); int extraObjects = 0; if ( chartprops->getVedicObjectStyle() & OBJECTS_INCLUDE_D9_LAGNA ) extraObjects |= OBJECTS_INCLUDE_D9_LAGNA; vector<int> obs = chartprops->getVedicPlanetList( extraObjects ); int opt_lord, opt_dig, opt_nav, opt_kara, opt_shast, opt_nak, opt_dasa, opt_bha, opt_kp, opt_ashtaka, opt_pada, opt_houses, opt_declinations; opt_lord = opt_dig = opt_nav = opt_kara = opt_shast = opt_nak = opt_dasa = opt_bha = opt_kp = opt_ashtaka = opt_pada = opt_houses = opt_declinations = 0; numcols = 2; if ( istyle & MAIN_CHILD_SHOW_LORD ) { opt_lord = true; numcols++; } if ( istyle & MAIN_CHILD_SHOW_DIGNITY ) { opt_dig = true; numcols++; } if ( istyle & MAIN_CHILD_SHOW_NAVAMSA ) { opt_nav = true; numcols++; } if ( istyle & MAIN_CHILD_SHOW_KARAKA ) { opt_kara = true; expert.calcCharaKarakas(); numcols++; } if ( istyle & MAIN_CHILD_SHOW_SHASTIAMSA ) { opt_shast = true; numcols++; } if ( istyle & MAIN_CHILD_SHOW_NAKSHATRA ) { opt_nak = true; numcols++; } if ( istyle & MAIN_CHILD_SHOW_DASAVARGA ) { opt_dasa = true; numcols++; } if ( istyle & MAIN_CHILD_SHOW_HOUSEPOS ) { opt_bha = true; numcols++; } if ( istyle & MAIN_CHILD_SHOW_ASHTAKA ) { opt_ashtaka = true; aexpert.update(); numcols += 1; } if ( istyle & MAIN_CHILD_SHOW_PADA ) { opt_pada = true; numcols += 1; } if ( istyle & MAIN_CHILD_SHOW_KP ) { opt_kp = true; horoscope->updateKP( 0 ); numcols += 3; } if ( istyle & MAIN_CHILD_SHOW_DECLINATION ) { opt_declinations = true; numcols ++; } if ( istyle & MAIN_CHILD_SHOW_HOUSES ) { opt_houses = true; for ( i = HOUSE1; i <= HOUSE12; i++ ) obs.push_back( i + HOUSE_QUALIFIER ); } Table table( numcols, obs.size() + 1 ); table.setHeader( 0, _( "Planet" )); table.setHeader( 1, _( "Length" )); i = 2; if ( opt_declinations ) table.setHeader( i++, _( "Declination" )); if ( opt_lord ) table.setHeader( i++, _( "Lord" )); if ( opt_dig ) table.setHeader( i++, _( "Dignity" )); if ( opt_nav ) table.setHeader( i++, _( "D-9" )); if ( opt_nak ) table.setHeader( i++, _( "Nakshatra" )); if ( opt_pada ) table.setHeader( i++, _( "Pada" )); if ( opt_kp ) { table.setHeader( i++, _( "KP Lord" )); table.setHeader( i++, _( "Sublord" )); table.setHeader( i++, _( "Subsublord" )); } if ( opt_shast ) table.setHeader( i++, _( "Shastiamsa" )); if ( opt_dasa ) table.setHeader( i++, _( "Dasa Varga" )); if ( opt_bha ) table.setHeader( i++, _( "Bhava" )); if ( opt_kara ) table.setHeader( i++, _( "Karaka" )); if ( opt_ashtaka ) table.setHeader( i++, _( "AV" )); for ( i = 0; i < obs.size(); i++ ) { pindex = obs[i]; if ( pindex >= HOUSE_QUALIFIER ) { pos.length = horoscope->getHouse( pindex - HOUSE_QUALIFIER, true, false ); pos.latitude = 0; pos.retro = false; } else { pos = horoscope->getObjectPosition( pindex, true ); // pos.length is 0 for unclaculated planets because Ayanamsa isn't subtracted in that case if ( pos.length == 0 && pindex != OARIES ) ret++; } planet = 0; col = 2; assert( (int)table.nb_rows >= rowindex ); table.setEntry( 0, rowindex, ( pindex <= LAST_ARABIC_OBJECT ? writer->getObjectName( pindex, TLARGE, true ) : lang.getBhavaName( pindex - HOUSE_QUALIFIER ))); if ( pindex <= OSATURN ) planet = horoscope->getPlanet( pindex ); table.setEntry( 1, rowindex, writer->getPosFormatted( pos.length, pos.retro )); // Declination if ( opt_declinations ) table.setEntry( col++, rowindex, f->getLatitudeFormatted( pos.latitude, DEG_PRECISION_SECOND )); // Lord if ( opt_lord ) table.setEntry( col++, rowindex, writer->getObjectName( getLord( getRasi( pos.length )), TLARGE, true )); // Dignity if ( opt_dig ) { if ( pindex >= OSUN && pindex <= OSATURN && obs[i] < MAX_EPHEM_OBJECTS ) table.setEntry( col, rowindex, lang.getDignityName( horoscope->getVargaData( pindex, VARGA_RASI )->getDignity(), TLARGE )); col++; } // Navamsa if ( opt_nav ) table.setEntry( col++, rowindex, writer->getSignName( getRasi( pos.length * 9 ), config->signPrecision )); // Nakshatra if ( opt_nak ) table.setEntry( col++, rowindex, lang.getNakshatraName( getNakshatra( pos.length, nakshatramode ), nakshatramode, TMEDIUM )); // Pada if ( opt_pada ) { s.Printf( wxT( "%d" ), (int)(getNakshatraLength( pos.length, nakshatramode ) / 3.3333333333 ) + 1 ); table.setEntry( col++, rowindex, s ); } // Krishnamurti if ( opt_kp ) { KpData kp; if ( pindex <= LAST_ARABIC_OBJECT ) { kp = horoscope->getKPLords( obs[i] ); } else { kp = horoscope->getHouseKPLords( pindex - HOUSE_QUALIFIER ); } table.setEntry( col++, rowindex, writer->getObjectName( kp.lord, TLARGE, true )); table.setEntry( col++, rowindex, writer->getObjectName( kp.sublord, TLARGE, true )); table.setEntry( col++, rowindex, writer->getObjectName( kp.subsublord, TLARGE, true )); } // Shastiamsa if ( opt_shast ) { shast = (int)( a_red( pos.length, 30 ) * 2 ); if ( isEvenRasi( pos.length )) shast = 59 - shast; assert( shast >= 0 && shast < 60 ); s.Printf( wxT( "%s (%c)" ), (const wxChar*)lang.getShastiamsaName( shast), ( k_shastiamsa_benefic[(int)shast] ? 'B' : 'M' )); table.setEntry( col, rowindex, s ); col++; } // Dasavarga Dignity if ( opt_dasa ) { if ( pindex <= OSATURN && obs[i] < MAX_EPHEM_OBJECTS ) { VargaExpert expert; table.setEntry( col, rowindex, lang.getVimsopakaDignityName( 2, planet->getVimsopakaBalaGoodVargas( 2 )) ); } col++; } // Bhava if ( opt_bha && obs[i] <= MAX_EPHEM_OBJECTS ) { s.Printf( wxT( "%d" ), red12( bchart.getRasi( pindex ) - bchart.getRasi( OASCENDANT )) + 1 ); table.setEntry( col++, rowindex, s ); } // Karaka if ( opt_kara ) { if ( pindex <= OSATURN ) p = pindex; else if ( pindex == OMEANNODE || pindex == OTRUENODE ) p = 7; else p = -1; if ( p >= 0 ) table.setEntry( col, rowindex, lang.getKarakaName( expert.getCharaKarakaProperty( p )) ); col++; } // Ashtaka Varga if ( opt_ashtaka ) { if ((( pindex >= OSUN && pindex <= OSATURN ) || pindex == OASCENDANT ) && obs[i] <= MAX_EPHEM_OBJECTS ) { s.Printf( wxT( "%d" ), aexpert.getItem( REKHA, pindex, getRasi( pos.length ))); table.setEntry( col++, rowindex, s ); } col++; } rowindex++; } writer->writeTable( table ); return ret; }