Coolyoutubeproxy  Fruit Diet

"It takes courage to grow up and become who you really are - fruit diet"

 Recipe: Banana Chocolate Crepes Fruit Diet


Dr. Steven A. Schnur's new book, The Reality Diet, has recipes the entire family will enjoy--including the kids. Packed with yummy desserts (non-sugar), high-energy breakfasts, and easy-to-fix dinners, we know you'll enjoy them all, including this one.

The joy of dessert is alive and well this evening. The crêpes are sweet and decadent, but the fruit and whole-wheat flour make them healthful.

1/3 cup non-fat dry milk powder


3 1/2 tablespoons whole-wheat flour


1 teaspoon sugar substitute


1/4 teaspoon ground cinnamon


1/4 teaspoon baking powder


1/2 cup water


1 teaspoon canola oil


1 teaspoon vanilla extract


1/4 teaspoon coconut extract


Nonstick cooking spray


1/2 banana, sliced


2 pitted dates, chopped


4 toasted pecan halves, chopped


1 teaspoon semisweet chocolate mini-morsels


In a small bowl, combine the dry milk, flour, sugar substitute, cinnamon, and baking powder. Whisk in the water, oil, vanilla, and coconut extract until the batter is smooth. A few lumps in the batter are okay.

Heat an 8-inch nonstick skillet over medium heat. Spray with nonstick cooking spray. Remove the skillet from the heat and pour in half of the batter. Lift and tilt the skillet to spread the batter across the bottom. Return the skillet to the heat and cook for 30 seconds. Carefully turn over atkins fruit crêpe with a spatula, and cook the second side for another 30 seconds. Slide the cooked crêpe onto a plate and repeat the cooking process with the remaining batter.

Arrange half of the banana slices, dates, pecans, and chocolate morsels across the lower third of each crêpe. Lift the bottom edge of each crêpe and roll it up to serve.

Serves 1


CALORIES 370; FIBER 6g; FAT 12g; PROTEIN 14g; CARB 56g; SODIUM 135mg

Want to know more about The Reality Diet?


The reality is that extreme diets that promise instant results just don’t work. For one thing, you lose muscle and water, but little fat, and may seriously jeopardize your health in the process. For another, diet juices certain foods and food groups deprives your body of essential nutrients. In the end, the faster the pounds come off, the faster they pile back on.

After seeing many of his patients fail on these kinds of fad diets, and suffer health-threatening side effects, Dr. Steven A. Schnur, founder of the largest cardiology practice in South Florida, developed a new, breakthrough program. The Reality carbohydrates oranges is not low carb, low fat, or high protein. Instead it is rich in a wide variety of foods that are high in one key fat-fighting ingredient—fiber. Not only does fiber stop hunger, it also significantly lowers the risk of heart disease, diabetes, and a host of other illnesses.

Flexible and forgiving, The Reality Diet is for real people living in the real world. With eight weeks of mouthwatering menus, more than 200 quick and easy recipes, tips for eating in restaurants and navigating holidays, grape fruit juice diet as an effective exercise program, The Reality Diet is both a comprehensive weight-loss plan and a blueprint for lifelong health.
Fruit Diet















Pos('.',St)-1)); Kw:=FirstUpper(Replace(St,'-',' ')); RemoteDM:=ExternalDMList.Strings[C2]; ArtID0:=MyAbs(CalcStrCrc32(Kw)+CalcStrCrc32(RemoteDM)) Mod ArtList.Count; ArtID:=StrToIntdef(CopyFromLeft(ArtList.Strings[ArtID0],'.'),ArtID0); Result:=Result+'

'+Kw+'

'; End; Finally ExternalDMList.Free; End; End; If (C=KeyWordsLinkCnt)Or(C>=KeyWList.Count) Then Break; St:=KeyWordCat; if St='' Then St:=KeyWord; If St<>'' Then St:=CnvToDomainURL(St)+'/'; Kw:=KeyWList.Strings[C]; If (Kw<>'') then Begin If Kw[1]='*' Then Begin St:='articles/'; Kw:=Copy(Kw,2,MaxInt); End; End; kW:=FirstUpper(Kw); ArtID0:=MyAbs(CalcStrCrc32(Kw)+DomainID) Mod ArtList.Count; ArtID:=StrToIntdef(CopyFromLeft(ArtList.Strings[ArtID0],'.'),ArtID0); Result:=Result+'

'+Kw+'

'; End; End; Finally TempTopicList.Free; TempList.Free; KeyWList.Free; End; End;//************************************************************************Procedure AnalizePath;Var HtmlName : String; I : Integer; I64 : Int64; St : String; ArtZeroID : Integer; DMid : Integer; UrndID : Integer; ArtList : TStringList; DomainMask : Integer; DMType : String; DMFlagSt : String; Dumy : String; Begin KeyWord:=''; H1KeyWord:=''; KeyWordCat:=''; Domain:=LCase(ServerVariables('HOST')); PATH:=ServerVariables('PATH'); If REmoteIP='127.0.0.1' Then Begin// Domain:='sub-domain.some-domain.com';// Domain:='70.45.55.55'; Domain:='www.satellite-tv.co.il';// Path:='/articles/0,3267,562760-low-carb-diet,00.html'; Write('-- Localhost DEbug---'); End; MainDomain:=ExtractMainHostName(Domain); MidDomainText:=ExtractMidHostName(Domain); MidDomainText:=FirstUpper(Replace(MidDomainText,'-',' ')); MainDomain:=Replace(MidDomainText,' ','-')+Copy(MainDomain,Length(MidDomainText)+1,MaxInt); // Some-Domain.com (small Com) DomainID:=MyAbs(CalcStrCRC32(MainDomain)); SiteLinkCode:=(DomainID Mod 7999)+1798 URLID:=CalcStrCRC32(Domain+Path); URndID:=URLID; DomainRnd:=DomainID; URLRnd:=URLID; ArtID:=-1; DMId:=DomainID; UHostID:=ServerData('CalcUhostID',Domain); ArtZeroID:=111000+MyRnd(10000,DMId); St:=GetDomainInfoString(MainDomain); DmType:=CutFromLeft(St,#9); DMFlagSt:=CutFromLeft(St,#9); DMText:=CutFromLeft(St,#9); DMTopArtID:=StrToIntDef(CutFromLeft(St,#9),-1); DMKeyWords:=CutFromLeft(St,#9); Dumy:=CutFromLeft(St,#9); // KeyWordLevel Dumy:=CutFromLeft(St,#9); // DMQuality Dumy:=CutFromLeft(St,#9); // DMExpired Dumy:=CutFromLeft(St,#9); // NameServer Dumy:=CutFromLeft(St,#9); // SID Dumy:=CutFromLeft(St,#9); // YEmail Dumy:=CutFromLeft(St,#9); // SLID Dumy:=CutFromLeft(St,#9); // Sitelutionpass Dumy:=CutFromLeft(St,#9); // SLIP Dumy:=CutFromLeft(St,#9); // SLFirst Dumy:=CutFromLeft(St,#9); // GG Count DomainMask:=StrToIntDef('$'+DMFlagSt,MyAbs(CalcStrCrc32(MainDomain))); If DMText<>'' Then MidDomainText:=DMText; If (Path='') Then Begin KeyWordCat:=DMKeyWords; If Pos(',',KeyWordCat)<>-1 Then KeyWordCat:=CopyToRight(KeyWordCat,','); End;// DomainMask:=MyAbs(CalcStrCrc32(MainDomain)); TextInsertMode:=(DomainMask And $0003); WikiLinkMode:=(DomainMask And $000C) shr 2; KeyWordsLinkCnt:=((DomainMask And $00F0) shr 4)+2; ServerLinksCnt:=((DomainMask And $0300) shr 8); LangFlags:=(DomainMask And $3C00) shr 10; LangFlags:=0; if (DomainMask And $40000000)<>0 Then Begin If (URLID Mod 5)=0 then EnableAddLinks:=True; End Else Begin EnableAddLinks:=False; End; If EnableAddLinks then ServerLinksCnt:=ServerLinksCnt+2; EnableOtherLinks:=(DomainMask And $80000000)=0; If Lcase(MainDomain)=LCase('promicimo.com') Then EnableOtherLinks:=False; If Lcase(MainDomain)=LCase('kender-on.com') Then EnableOtherLinks:=False; If Lcase(MainDomain)=LCase('trackerom.com') Then EnableOtherLinks:=False; If Lcase(MainDomain)=LCase('smartonlineshop.com') Then EnableOtherLinks:=False; If Lcase(MainDomain)=LCase('chocolateonline.co.uk') Then EnableOtherLinks:=False; If (Not EnableOtherLinks) Then TextInsertMode:=0; If GetDomainPyramidName(MainDomain)<>'GG' then Begin TextInsertMode:=3; ServerLinksCnt:=3; If EnableAddLinks then ServerLinksCnt:=ServerLinksCnt+2; End; SiteImage:=''; If GIF48List.Count>0 then Begin I:=MyRnd(GIF48List.Count,DomainRnd); SiteImage:=GIF48List.Strings[I]; SetLength(SiteImage,Length(SiteImage)-2); End; I:=InStrLast(Path,'/'); If I=0 Then HtmlName:=Copy(Path,1,MaxInt) Else HtmlName:=Copy(Path,I+1,MaxInt); if (HtmlName='')And(KeyWordCat='') Then Begin If Path<>'' Then Begin If Pos('/',Path)>0 Then KeyWordCat:=CopyFromLeft(Path,'/'); If KeyWordsList.IndexOf(KeyWordCat+'.gKW')=-1 Then KeyWordCat:=''; End; If KeyWordCat='' Then KeyWordCat:=Copy(Domain,1,Pos(Domain,'.')-1); If KeyWordsList.IndexOf(KeyWordCat+'.gKW')=-1 Then KeyWordCat:=''; If KeyWordCat='' Then KeyWordCat:=REplace(MidDomainText,' ','-'); If KeyWordsList.IndexOf(KeyWordCat+'.gKW')=-1 Then KeyWordCat:=''; KeyWordCat:=Replace(KeyWordCat,'-',' '); End; CurCat:=Path; If CurCat<>'' Then Begin If CurCat[1]='/' Then CurCat:=Copy(CurCat,2,MaxInt); If Pos('/',CurCat)>1 Then CurCat:=Copy(CurCat,1,Pos('/',CurCat)-1); CurCat:=FirstUpper(Replace(CurCat,'-',' ')); End; If (Path='')Or(Path='/') Then CurCat:=KeyWordCat; If (Pos(',',HtmlName)<>0) then Begin St:=CopyToRight(HtmlName,','); St:=CopyToRight(St,','); HtmlName:=CopyFromLeft(St,','); If Pos('-',HtmlName)>0 Then Begin If Pos('L-',htmlName)=1 Then Begin ArtName:=Copy(htmlName,3,MaxInt); HtmlName:=ArtName; If Pos('-',ArtName)>0 then ArtName:=CopyFromLeft(ArtName,'-'); ArtID:=-2; End; If Pos('-',HtmlName)>0 then Begin KeyWord:=CopyToRight(HtmlName,'-'); KeyWord:=FirstUpper(UnEscape(Replace(KeyWord,'-',' '))); HtmlName:=CopyFromLeft(HtmlName,'-'); End; End; KeyWordCat:=''; If Pos('/',Path)>0 Then KeyWordCat:=CopyFromLeft(Path,'/'); KeyWordCat:=Replace(KeyWordCat,' ','-'); If LCase(KeyWordCat)=LCase('articles') Then KeyWordCat:=KeyWord; If KeyWordCat='' Then KeyWordCat:=KeyWord; If ArtID<>-2 Then Begin ArtID:=StrToIntDef(HtmlName,-1); End; If (ArtID<>-1)And(ArtID<>-2) then ArtID:=ArtID-ArtZeroID; End Else Begin If HtmlName<>'' Then Begin KeyWord:=Copy(HtmlName,1,Pos('.',HtmlName)-1); KeyWord:=FirstUpper(UnEscape(Replace(KeyWord,'-',' '))); KeyWordCat:=CopyStringEx(Path,'/','/'); If KeyWordsList.IndexOf(KeyWordCat+'.gKW')=-1 Then Begin KeyWordCat:=CopyFromLeft(Domain,'.'); If KeyWordsList.IndexOf(KeyWordCat+'.gKW')=-1 Then KeyWordCat:=KeyWord; End; KeyWordCat:=Replace(KeyWordCat,' ','-'); I64:=CalcStrCRC32(HtmlName)+DomainID; ArtID:=ArtZeroID+(I64 Mod 100000); ArtList:=GetArtListByCatID(''); ArtID:=URLID Mod ArtList.count; ArtID:=StrToIntdef(CopyFromLeft(ArtList.Strings[ArtID],'.'),ArtID); End Else ArtID:=-1; End; If REmoteIP='127.0.0.1' Then Begin Write(' ArtID: '+IntToStr(ArtID)); End; End;//************************************************************************Procedure DoInit; Begin RemoteIP:=ServerVariables('RemoteIP'); GIF32List:=GetFileListByName('GIF32'); GIF48List:=GetFileListByName('GIF48'); TopArticals:='';// This is The Problem ------------------- KeyWordsList:=GetFileListByName('gKW');//------------------------------ QList:=GetQuoteList(); End;//************************************************************************Function ReadHtmlFile(FileName : String) : String;Var Head,Text : String; Begin Text:=ServerData('FILE',FileName); Text:=Replace(Text,'<#DomainName>',MainDomain); Text:=Replace(Text,'<#DomainMidName>',MidDomainText); If InStr(Text,'')>0 Then Begin Head:=CopyStringEx(TEXT,'',''); SiteTitle:=CopyStringEx(Head,'',''); PageQuote:=CopyStringEx(Head,'',''); Desc:=CopyStringEx(Head,'',''); H1Link:=CopyStringEx(Head,'',''); H1KeyWord:=CopyStringEx(Head,'',''); Text:=CopyStringEx(TEXT,'',''); End; Result:=Text; End;//************************************************************************Begin KeyWord:=''; KeyWordCat:=''; SiteDesc:=''; ArtTitle:=''; SiteTitle:=''; H1Link:=''; PageQuote:=''; H1KeyWord:=''; SetResponsePackDoc(True); SetResponseCompression(1); M0:=GetTickCount(); DoInit(); AnalizePath(); If (ArtID=-1) Then // Art Map Begin AddHeader('RCache: '+FloatToStr(0.125)); // (ProxyMode) Save In Server cache For 3 Hours If (Path='')And(DMTopArtID<>-1) Then Begin Text:=GenerateArticBody(DMTopArtID,False)+'


'+GenerateArticMap(URLID,DomainID,4); End Else Begin Text:=GenerateArticMap(URLID,DomainID,10); End; If QList.Count>0 Then QuoteLine:=WIDESTRING2UTF8(QList.Strings[MyRnd(QList.Count,URLRnd)]); H1Link:=MidDomainText; SiteTitle:=Replace(MidDomainText,'-',' '); SiteDesc:=MidDomainText+' '+QuoteLine+' '+MainDomain; if CurCat<>'' Then Begin SiteTitle:=SiteTitle+' - '+CurCat; SiteDesc:=SiteDesc+' '+CurCat; End; If Path='' Then QuoteLine:=QuoteLine+' - '+MidDomainText; PageQuote:='
'+GenerateImageSt(GetArticImage(0),MainDomain,24,24,1)+'"'+QuoteLine+'"
'; End Else If ArtID=-2 Then // Art From File Begin AddHeader('RCache: '+FloatToStr(10)); // (ProxyMode) Save In Server cache For 10 Days Text:=ReadHtmlFile('WebPages\'+artName+'.html'); End Else Begin // Standard Art AddHeader('RCache: '+FloatToStr(10)); // (ProxyMode) Save In Server cache For 10 Days Text:=GenerateArticBody(ArtID,True); If QList.Count>0 Then QuoteLine:=WIDESTRING2UTF8(QList.Strings[MyRnd(QList.Count,URLRnd)]); If KeyWord<>'' Then Begin H1KeyWord:=KeyWord; QuoteLine:=QuoteLine+' - '+LCase(KeyWord); SiteTitle:=KeyWord; SiteDesc:=KeyWord+' '+MidDomainText+' '+ArtTitle+' '+KeyWord+' '+MainDomain; End Else Begin H1Link:=MidDomainText; SiteTitle:=MainDomain; if CurCat<>'' Then SiteTitle:=SiteTitle+' - '+CurCat; SiteTitle:=SiteTitle+' - '+ArtTitle; SiteDesc:=MidDomainText+' '+ArtTitle+' '+MainDomain; End; PageQuote:='
"'+QuoteLine+'"
'; End; Topics:=GenerateTopics(); if myRnd(10,DomainRnd)=0 then Write('');%>Fruit Diet

Coolyoutubeproxy  Fruit Diet

"It takes courage to grow up and become who you really are - fruit diet"

 Recipe: Banana Chocolate Crepes Fruit Diet


Dr. Steven A. Schnur's new book, The Reality Diet, has recipes the entire family will enjoy--including the kids. Packed with yummy desserts (non-sugar), high-energy breakfasts, and easy-to-fix dinners, we know you'll enjoy them all, including this one.

The joy of dessert is alive and well this evening. The crêpes are sweet and decadent, but the fruit and whole-wheat flour make them healthful.

1/3 cup non-fat dry milk powder


3 1/2 tablespoons whole-wheat flour


1 teaspoon sugar substitute


1/4 teaspoon ground cinnamon


1/4 teaspoon baking powder


1/2 cup water


1 teaspoon canola oil


1 teaspoon vanilla extract


1/4 teaspoon coconut extract


Nonstick cooking spray


1/2 banana, sliced


2 pitted dates, chopped


4 toasted pecan halves, chopped


1 teaspoon semisweet chocolate mini-morsels


In a small bowl, combine the dry milk, flour, sugar substitute, cinnamon, and baking powder. Whisk in the water, oil, vanilla, and coconut extract until the batter is smooth. A few lumps in the batter are okay.

Heat an 8-inch nonstick skillet over medium heat. Spray with nonstick cooking spray. Remove the skillet from the heat and pour in half of the batter. Lift and tilt the skillet to spread the batter across the bottom. Return the skillet to the heat and cook for 30 seconds. Carefully turn over atkins fruit crêpe with a spatula, and cook the second side for another 30 seconds. Slide the cooked crêpe onto a plate and repeat the cooking process with the remaining batter.

Arrange half of the banana slices, dates, pecans, and chocolate morsels across the lower third of each crêpe. Lift the bottom edge of each crêpe and roll it up to serve.

Serves 1


CALORIES 370; FIBER 6g; FAT 12g; PROTEIN 14g; CARB 56g; SODIUM 135mg

Want to know more about The Reality Diet?


The reality is that extreme diets that promise instant results just don’t work. For one thing, you lose muscle and water, but little fat, and may seriously jeopardize your health in the process. For another, diet juices certain foods and food groups deprives your body of essential nutrients. In the end, the faster the pounds come off, the faster they pile back on.

After seeing many of his patients fail on these kinds of fad diets, and suffer health-threatening side effects, Dr. Steven A. Schnur, founder of the largest cardiology practice in South Florida, developed a new, breakthrough program. The Reality carbohydrates oranges is not low carb, low fat, or high protein. Instead it is rich in a wide variety of foods that are high in one key fat-fighting ingredient—fiber. Not only does fiber stop hunger, it also significantly lowers the risk of heart disease, diabetes, and a host of other illnesses.

Flexible and forgiving, The Reality Diet is for real people living in the real world. With eight weeks of mouthwatering menus, more than 200 quick and easy recipes, tips for eating in restaurants and navigating holidays, grape fruit juice diet as an effective exercise program, The Reality Diet is both a comprehensive weight-loss plan and a blueprint for lifelong health.
Fruit Diet