LoadTemplate("STDPROLOG_SHORT"); // predefined: #FILEMOD $HASH_STDPROLOG["DocumentTitle"] = " . - = [ Тайны соблазнА ] = - . "; $HASH_STDPROLOG["CLASSIFICATOR_DATA"] = GetClassificator(); $HASH_STDPROLOG["NEWSBLOCK_DATA"] = GetNewsBlock(); $HASH_STDPROLOG["ARCHIVE_DATA"] = GetJournalArchive(); $HASH_STDPROLOG["LOGON_USER_BLOCK_DATA"] = $isAuthenticated ? GetLoggedInUserBox() : GetLogonRegistryBox(); $HASH_STDPROLOG["VERTICAL_ADV_BLOCK_DATA"] = GetLeftAdvBox(); //So let's evaluate this Template and get results... echo $T_STDPROLOG->PrepareTemplate($HASH_STDPROLOG, $Evaluatecode=1, $UsePrecompiled=1); unset($T_STDPROLOG); unset($HASH_STDPROLOG); $ab_rel_issue = $JI_ID; function IsArenaEmpty($ArenaLine, $ArenaCol, $Size_x, $Size_y){ global $Arena; for($row=$ArenaLine; $row<$ArenaLine+$Size_y; $row++){ for($col=$ArenaCol; $col<$ArenaCol+$Size_x; $col++){ if( $Arena[$row][$col] != "" ){ return 0; } } } return 1; } function LockArena($ArenaLine, $ArenaCol, $Size_x, $Size_y, $ADid){ global $Arena; for($row=$ArenaLine; $row<$ArenaLine+$Size_y; $row++){ for($col=$ArenaCol; $col<$ArenaCol+$Size_x; $col++){ $Arena[$row][$col] = "z"; } } // lock corners $Arena[$ArenaLine+$Size_y-1][$ArenaCol+$Size_x-1] = -$ADid; $Arena[$ArenaLine][$ArenaCol] = $ADid; return 1; } function PlaceAD($ad){ global $Arena; // var_dump($ad); for($ArenaLine=0; ;$ArenaLine++){ for($col=0; $col<=2-$ad["ab_size_x"]; $col++){ if( IsArenaEmpty($ArenaLine, $col, $ad["ab_size_x"], $ad["ab_size_y"]) ){ LockArena($ArenaLine, $col, $ad["ab_size_x"], $ad["ab_size_y"], $ad["ab_id"]); return; } } } } function LocalFindAD($ADID){ global $ADVs; for($i=0; $i"; ////////////////////////////////////////////// for($ad=0;$ad<$NADs; $ad++){ // echo "($ad)"; flush() ; PlaceAD($ADVs[$ad]); } ////////////////////////////////////////////// // echo ""; ////////////////////////////////////////////// ////////////////////////////////////////////// // echo "
";
/*
		$ArenaLine = 0;
		while( 1 ){
			if( $Arena[$ArenaLine][0]=="" && $Arena[$ArenaLine][1]=="" )
				break;
			for($col=0; $col<=1;$col++){
				echo $Arena[$ArenaLine][$col] . " " ;
			}
			echo "\n";
			$ArenaLine++;
		}
*/


//		var_dump($Arena);
//		var_dump($ADVs);
//		echo "
"; ////////////////////////////////////////////// ?> "; for($col=0; $col<=1;$col++){ $ADID = $Arena[$ArenaLine][$col]; if( $ADID == "" ){ // empty item! echo "\t\n"; }else if( $ADID == "z" ){ // already done just continue }else if( $ADID < 0 ){ // print it ending! }else if( $ADID > 0 ){ // print it beginning! $SRC = LocalFindAD($ADID); // var_dump($SRC); // echo " ::: $ADID ::: "; if( $SRC["ab_size_x"]>1 ){ $colspan = "colspan=\"" . $SRC["ab_size_x"]. "\""; $cwidth = "width=\"100%\""; }else{ $colspan = ""; $cwidth = "width=\"50%\""; } if( $SRC["ab_size_y"]>1 ){ $rowspan = "rowspan=\"" . $SRC["ab_size_y"]. "\""; }else{ $rowspan = ""; } $DATUM = nl2br($SRC["ab_text"]); if( $SRC["ab_fgcolor"] != "" ){ $FGCOLORSTART = ""; $FGCOLOREND = ""; }else{ $FGCOLORSTART = ""; $FGCOLOREND = ""; } if( $SRC["ab_bgcolor"] != "" ){ $BGCOLOR = "bgcolor=\"" . $SRC["ab_bgcolor"] . "\""; }else{ $BGCOLOR = ""; } // if( $ADID=="5" ){ echo "***"; } // if( $ADID=="5" ){ echo "** :$col: **:" .$Arena[$ArenaLine][0] . ":**"; } // if( $ADID=="5" ){ echo "***"; } if( $SRC["ab_type"] == 'graph' ){ $AdvBlobs = new TheBlob; $Asset = new TheAsset; $Asset->LoadAsset2($SRC["ab_id"],'V'); $RelatedBlobIDs = $AdvBlobs->FindBlobs($Asset->ASSET_ID, "IMAGE", "", ""); $AdvBlobs->LoadBlob($RelatedBlobIDs[0], 0); $IMGSRC = $AdvBlobs->GetBlobImageHref(); echo ""; }else{ echo ""; } } } $ArenaLine++; echo "\n"; } /* for($row=1; $row<=10; $row++){ echo ""; for($col=1; $col<=2; $col++){ echo ""; } echo "\n"; } */ }else{ ?>
 $FGCOLORSTART$FGCOLOREND$FGCOLORSTART$DATUM$FGCOLOREND
sdssdffsd;lf ksad;fl ksad;f lksad;f lksad;fl ksadf; lkasdf; lkasdf; lkasf ;lkasdf;l kwerqrwpo kweqpr kqwerp okwerp owkqer pqwor kwqpeor kwpqeor kwqp rokqw f sdf asdf asdf sdaf asdf asdf asdf asdf asdf asdlf kasdf ljsadlkf jsalf jasdld kfjasd flaskdjf asdlk jf psdokg dspfokg dspfog kdspo ksdopg kdspog kdsfpog kdsfpgo kdsfpg oksdfpg odksfp goksdfpog kdsfpog kdspfog dsfpog kdsfpog ksdpog kdspog dspog sdg opkdsgpsdokgpsdogp sdpog sdgfp oksd sdpogk sdpogk wergewrksd sdf po;wtrkw;tler;t lksdgdkgkddgph
\n"; } ?>
База объявлений пуста...
LoadTemplate("STDEPILOG"); echo $T->PrepareTemplate($HASH, 1, 1); ?>