Results 1 to 21 of 21

Thread: Scrolling, (for someone who asked me) i think it was kedaman

  1. #1

    Thread Starter
    Conquistador
    Join Date
    Dec 1999
    Location
    Australia
    Posts
    4,527
    if it was kedaman, i hope this works for you too.
    Code:
    Dim Scr As Scrolling
    Private Type Scrolling
        FirstTry As Boolean
        ScrollInx As Integer
        ScrollStr As String
        ScrollLen As Integer
        StrtString As String
        ScrollInt As Integer
    End Type
    Private Sub cmdStaop_Click()
    If tmrScroll = True Then
    tmrScroll = False
    Exit Sub
    End If
    If tmrScroll = False Then
    Scr.StrtString = txtScroll.Text 'This is the scrolling text
    tmrScroll.Interval = Scr.ScrollInt
    tmrScroll = True
    End If
    Scr.FirstTry = True
    End Sub
    Private Sub Form_Load()
    Scr.ScrollInx = 1
    tmrScroll = False
    Scr.FirstTry = True
    lblScroll.Width = 2895
    Scr.ScrollInt = 50
    End Sub
    Private Sub tmrScroll_Timer()
    If Scr.FirstTry = True Then
    For i = 0 To 41
    Scr.StrtString = Scr.StrtString & " "
    Next i
    Scr.FirstTry = False
    End If
    Scr.ScrollStr = Right(Left(Scr.StrtString, Scr.ScrollInx), 40)
    lblScroll.Caption = Scr.ScrollStr
    Scr.ScrollInx = Scr.ScrollInx + 1
    Scr.ScrollLen = Len(Scr.StrtString)
    If Scr.ScrollLen = Scr.ScrollInx Then 'if it's finished (all off the screen)
    ', start again
    Scr.ScrollInx = 1
    End If
    End Sub
    the code is pretty self explanatory

  2. #2

    Thread Starter
    Conquistador
    Join Date
    Dec 1999
    Location
    Australia
    Posts
    4,527
    i just got email notification for a reply to this thread, from fox, but it is not here (weird???)
    did n e 1 reply?

  3. #3
    transcendental analytic kedaman's Avatar
    Join Date
    Mar 2000
    Location
    0x002F2EA8
    Posts
    7,221
    David, i appreciate that u have done that work for me but, sorry that's not what i wanted. Maybe you misunderstood me last time. I gave u my UDT that tells exactly how it should scrolls, the speed should be set to match the words timestamp. However I had made this scrolling go exactly passing every timestamp at the right time which causes the scrolling go whery jumpy and jerky. So while trying to put in some " " to make it go the right speed or give the speed some more flexibility i loosed the codes functionality. Well if you have time, and youre still willing to help, please mail me [email protected] and i give u my current source and a mp3file containing some lyrics for you to work with. you can also contact me if you have icq, mine is 12113437

    Fox, maybe deleted it, i'll ask him
    Use
    writing software in C++ is like driving rivets into steel beam with a toothpick.
    writing haskell makes your life easier:
    reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
    To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.

  4. #4
    PowerPoster Fox's Avatar
    Join Date
    Jan 2000
    Location
    *afk*
    Posts
    2,088
    That's right, I first misunderstood the problem...

  5. #5
    Frenzied Member
    Join Date
    Mar 2000
    Posts
    1,089
    what was the problem?

  6. #6
    transcendental analytic kedaman's Avatar
    Join Date
    Mar 2000
    Location
    0x002F2EA8
    Posts
    7,221
    Sam, didn't i make myself clear? I'm going to explain once more if so, try read what i have explained, even though i'm not good at it
    Use
    writing software in C++ is like driving rivets into steel beam with a toothpick.
    writing haskell makes your life easier:
    reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
    To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.

  7. #7
    Frenzied Member
    Join Date
    Mar 2000
    Posts
    1,089
    I havn't seen your origonal post. Where's that

  8. #8
    PowerPoster Fox's Avatar
    Join Date
    Jan 2000
    Location
    *afk*
    Posts
    2,088

    Arrow

    (That was the problem, where's you original post?)

  9. #9
    transcendental analytic kedaman's Avatar
    Join Date
    Mar 2000
    Location
    0x002F2EA8
    Posts
    7,221
    I think the search engine is really good on this site. I searched for lyrics and found this thread and the original:
    http://forums.vb-world.net/showthrea...threadid=14520
    Use
    writing software in C++ is like driving rivets into steel beam with a toothpick.
    writing haskell makes your life easier:
    reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
    To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.

  10. #10

    Thread Starter
    Conquistador
    Join Date
    Dec 1999
    Location
    Australia
    Posts
    4,527
    it was also mentioned inside my post about needing a project

    possibly titled I need a Project

  11. #11
    transcendental analytic kedaman's Avatar
    Join Date
    Mar 2000
    Location
    0x002F2EA8
    Posts
    7,221

    Lightbulb

    Right, are u an artist david? I need artist, also i need some1 to solve my scrolling dilemma. I will give some chocolate bars to any1 that helps me.
    Use
    writing software in C++ is like driving rivets into steel beam with a toothpick.
    writing haskell makes your life easier:
    reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
    To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.

  12. #12
    Fanatic Member
    Join Date
    Mar 2000
    Location
    That posh bit of England known as Buckinghamshire
    Posts
    658
    I am a bit bored at the minute so i would like to have a go at your scrolling problem Kedeman. So if you want to send me the code i'll give it a whirl. No promises though
    Iain, thats with an i by the way!

  13. #13
    transcendental analytic kedaman's Avatar
    Join Date
    Mar 2000
    Location
    0x002F2EA8
    Posts
    7,221
    Are you accustomed with arringed subproperties or have you done any physical apps like gravity or things, I think this can be solved indirectly manipulating the speed of the text, and sorry, I didn't tell what you need to know to help me but that is not for newbies. The speed has to be relatively manipulated by the current position, and if a sudden jump is noted, ignore relative manipulation. Are you sure you can handle this?
    Use
    writing software in C++ is like driving rivets into steel beam with a toothpick.
    writing haskell makes your life easier:
    reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
    To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.

  14. #14
    Fanatic Member
    Join Date
    Mar 2000
    Location
    That posh bit of England known as Buckinghamshire
    Posts
    658

    Lightbulb Who knows

    Who knows if i can handle this. I will give it good go, and you have nothing to lose by another person trying. As i said i have nothing much to do at the minute on my project, so i am a bit bored.
    Iain, thats with an i by the way!

  15. #15
    transcendental analytic kedaman's Avatar
    Join Date
    Mar 2000
    Location
    0x002F2EA8
    Posts
    7,221
    Will you have time to wait one or two days? I'm damn busy at the moment with all kinds of stuff. Nice of you to be interested in this.
    Use
    writing software in C++ is like driving rivets into steel beam with a toothpick.
    writing haskell makes your life easier:
    reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
    To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.

  16. #16

    Thread Starter
    Conquistador
    Join Date
    Dec 1999
    Location
    Australia
    Posts
    4,527
    an artist with what?

  17. #17
    transcendental analytic kedaman's Avatar
    Join Date
    Mar 2000
    Location
    0x002F2EA8
    Posts
    7,221

    Thumbs up

    An artist with good talent of couse! I need some graphical design to an RPG-game im working on.

    I'm working on putting a sample on my website so that
    everyone can have a try on my problem.
    Use
    writing software in C++ is like driving rivets into steel beam with a toothpick.
    writing haskell makes your life easier:
    reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
    To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.

  18. #18
    transcendental analytic kedaman's Avatar
    Join Date
    Mar 2000
    Location
    0x002F2EA8
    Posts
    7,221

    Talking Everyone that want to help, heres the file:


    http://www.geocities.com/kedasu/kedaman.zip

    Now this contains a sample mp3file with all the words and timestamp you need to work with.
    An ocx to handle some winamp stuff, i made just for this purpose.
    An txt file, you dont need to read if you alread have read these posts
    A sample project that shows how to use this ocx.

    You need winamp to play the sample mp3file. Don't use any other mp3player because this app is for winamp.

    Good luck!
    Use
    writing software in C++ is like driving rivets into steel beam with a toothpick.
    writing haskell makes your life easier:
    reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
    To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.

  19. #19

    Thread Starter
    Conquistador
    Join Date
    Dec 1999
    Location
    Australia
    Posts
    4,527
    nope, i'm pretty bad at art
    sorry

  20. #20
    transcendental analytic kedaman's Avatar
    Join Date
    Mar 2000
    Location
    0x002F2EA8
    Posts
    7,221
    np, but if there are other artists out there then contact me
    Use
    writing software in C++ is like driving rivets into steel beam with a toothpick.
    writing haskell makes your life easier:
    reverse (p (6*9)) where p x|x==0=""|True=chr (48+z): p y where (y,z)=divMod x 13
    To throw away OOP for low level languages is myopia, to keep OOP is hyperopia. To throw away OOP for a high level language is insight.

  21. #21
    Good Ol' Platypus Sastraxi's Avatar
    Join Date
    Jan 2000
    Location
    Ontario, Canada
    Posts
    5,134
    Actually.. uhh... Kedaman, I was hoping you could work on my game! The thread's right here if you want to sign up:

    http://forums.vb-world.net/showthrea...threadid=19736
    All contents of the above post that aren't somebody elses are mine, not the property of some media corporation.
    (Just a heads-up)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width