Results 1 to 2 of 2

Thread: Usage of ITERATE

  1. #1
    Super Moderator Petr Schreiber's Avatar
    Join Date
    Aug 2005
    Location
    Brno - Czech Republic
    Posts
    6,828
    Blog Entries
    3
    Rep Power
    696

    Usage of ITERATE

    Hi,

    my attempt to create sample for ITERATE,
    the data filling part could be replaced with "'-- some data loaded here --" or something like that"

    [code=thinbasic]
    dim index as long

    type tAgenda
    age as byte ' Years
    payment as long ' Money
    drivingLicense as byte ' 0 = no, 1 = yes
    end type

    %ITEMS = 3
    dim Person(%ITEMS) as tAgenda

    Person(1).age = 24
    Person(1).payment = 1000
    Person(1).drivingLicense = 1

    Person(2).age = 32
    Person(2).payment = 1000
    Person(2).drivingLicense = 0

    Person(3).age = 64
    Person(3).payment = 1000
    Person(3).drivingLicense = 1

    ' -- Raise payment for people older and equall to 32, and in case they
    ' -- have driving license too then some money extra
    for index = 1 to %ITEMS

    if Person(index).age < 32 then iterate for ' -- Too young, quickly jump to NEXT person index
    Person(index).payment = Person(index).payment + 1000

    if Person(index).drivingLicense = 0 then iterate for ' -- No driving license, quickly jump to NEXT person index
    Person(index).payment = Person(index).payment + 500

    next
    [/code]


    Bye,
    Petr
    Learn 3D graphics with ThinBASIC, learn TBGL!
    Windows 7 64bit - Intel Core 2 Duo T6600 @ 2.2GHz - 4 GB RAM - NVIDIA GeForce G210M 512MB
    Windows 8 64bit - Intel Core i5-3350P @ 3.1GHz - 8 GB RAM - NVIDIA GeForce GT640 3GB

  2. #2
    thinBasic author ErosOlmi's Avatar
    Join Date
    Sep 2004
    Location
    Milan - Italy
    Age
    51
    Posts
    8,338
    Blog Entries
    2
    Rep Power
    10

    Re: Usage of ITERATE

    Got it. Thanks
    www.thinbasic.com | www.thinbasic.com/community/ | psch.thinbasic.com
    Win10Pro 64bit - 8GB Ram - Intel i7 M620 2.67GHz - NVIDIA Quadro FX1800M 1GB

Posting Permissions

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