The MASM Forum

General => The Workshop => Topic started by: jj2007 on January 01, 2015, 03:27:51 AM

Title: Banner demo
Post by: jj2007 on January 01, 2015, 03:27:51 AM
Just for fun - a banner demo using a known newsfeed.
Title: Re: Banner demo
Post by: dedndave on January 01, 2015, 09:58:00 AM
nice  :t

ya know, that brings up something i wanted to write - along a similar line...

that is, a TV schedule program
there has to be various sites out there that provide schedule info in some sort of standardized fashion   :P
Title: Re: Banner demo
Post by: jj2007 on January 01, 2015, 11:39:13 AM
Yes, a "TV now" banner would be nice indeed. Extracting the data from xml is not so difficult, see below, but I spent a lot of time designing the WM_PAINT handler.

GetBanner:
  xor esi, esi
  Let esi=FileRead$(RssFeed$)
  xor ecx, ecx
  .While 1
      .Break .if !Extract$(esi, "<title>", '</title>', xsLoop, 100)
      Let Title$(ecx)=eax
      .Break .if !Extract$(esi, "<description>", '</description>', xsLoop, 100)
      Let Desc$(ecx)=eax
      deb 4, "Feed", $Title$(ecx), $Desc$(ecx):60
      inc ecx
  .Endw
  mov bmax, ecx
  Clr$ esi
  retn
Title: Re: Banner demo
Post by: Torinofarra on January 13, 2015, 06:01:00 PM
Searching for a way to fix this problem.