NAME

RemoveHoroscope

Remove a horoscope from the horoscope list.

USAGE

RemoveHoroscope [position_from_1]

PARAMETERS

none

OPTIONS

position_from_1:
If given, remove the horoscope list at this position (from 1).
If not give the last horoscope will be removed.

RETURN

none

Example

#--- get infos from horoscope 1, 2 and 3
#open 3 horoscopes 

for {set z 1} {$z <= 3} {incr z} {

 set title "Open Horoscope $z"

 if { ![SetCurrentHoroscope -title $title] } {
  PutTxt "Farewell..."
  return
 }
}

PutTxt "Horoscopes loaded"

SetCurrentHoroscope -nh 1
PutTxt "Name for Horoscope [GetCurrentHoroscopeNumber] = [Name]"

SetCurrentHoroscope -nh 2
PutTxt "Name for Horoscope [GetCurrentHoroscopeNumber] = [Name]"

SetCurrentHoroscope -nh 3
PutTxt "Name for Horoscope [GetCurrentHoroscopeNumber] = [Name]"

PutTxt "Total=[GetHoroscopeCount] horoscope"

PutTxt "Removing horoscope 2"
RemoveHoroscope 2
PutTxt "Name for Horoscope [GetCurrentHoroscopeNumber] = [Name]"

PutTxt "Removing horoscope 1"
RemoveHoroscope 1
PutTxt "Name for Horoscope [GetCurrentHoroscopeNumber] = [Name]"

PutTxt "Removing horoscope 1"
RemoveHoroscope 1
PutTxt "GetCurrentHoroscopeNumber = [GetCurrentHoroscopeNumber]"

PutTxt "Total=[GetHoroscopeCount] horoscope"

Output

Horoscopes loaded
Name for Horoscope 1 = Allais
Name for Horoscope 2 = Balzac
Name for Horoscope 3 = Callas
Total=3 horoscope
Removing horoscope 2
Name for Horoscope 2 = Callas
Removing horoscope 1
Name for Horoscope 1 = Callas
Removing horoscope 1
GetCurrentHoroscopeNumber = 0
Total=0 horoscope