Source language: Translate to:

DATA LIST TO LIST VARIABLES

Share sample pubs, scripts, etc. with other NeoBook users

Moderator: Neosoft Support

DATA LIST TO LIST VARIABLES

Postby virger » Fri Sep 26, 2008 10:18 pm

Using data list "to create" list of variables. "
using [[var_name]] for the fact that variable
example:
setvar "[var_name]" "Data"
setvar "[[var_name]]" "Hello Friend"
alertbox "Say" [data] "


It's a BUTTON


{NeoBook 5 Objects}
NeoBookVer=5.60
ObjectType=3
Name=PushButton4
X=46
Y=45
W=107
H=50
Anchor=0
Text=Do It
Align=2
ImageStyle=0
ObjAction=...TEST-1¶strparse "DIA:Lunes;123`234`.Martes;345`567`789`.Miercoles;987`654`321`,MES:Ene.Feb.Mar,ANO:1951.1970.2001,DICE:Hola.Como.Estas.Hoy" "," "[Dat]" "[Tot1]"¶¶...TEST-2¶.strparse "DIA:Lunes.Martes.Miercoles.Jueves.Viernes.Sabado,MES:Ene.Feb.Mar.Abr.May.Jun.Jul.Ago.Set.Oct.Nov.Dic.,ANO:1951.1970.2001,SAY:Hello.How.Are.You" "," "[Ddat]" "[Tot1]"¶¶loop "1" "[Tot1]" "[Cont1]"¶ strparse "[Dat[Cont1]]" ":" "[xTemp]" "[Dummy]"¶ setvar "[Obj]" "[xTemp1]"¶ SearchStr "`" " [xTemp2]" "[pos]" ""¶ if "[Pos]" ">" "0"¶ strparse "[xTemp2]" "." "[yTemp]" "[Tot2]"¶ loop "1" "[Tot2]" "[Cont2]"¶ strparse "[yTemp[Cont2]]" ";" "[zTemp]" "[Dummy]"¶ strparse "[zTemp2]" "`" "[Dummy]" "[Tot3]"¶ Loop "1" "[Tot3]" "[Cont3]"¶ setvar "[Obj2]" "[Obj]-[zTemp1]"¶ strparse "[zTemp2]" "`" "[[Obj2]]" "[Dummy]"¶ endloop¶ endloop¶ else¶ strparse "[xTemp2]" "." "[[Obj]]" "[Dummy]"¶ endif¶ setvar "[Obj]" ""¶ setvar "[Obj2]" ""¶ setvar "[Dat[Cont1]]" ""¶ setvar "[xTemp1]" ""¶ setvar "[xTemp2]" ""¶ setvar "[zTemp1]" ""¶ setvar "[zTemp2]" ""¶ setvar "[Pos]" ""¶ setvar "[Tot2]" ""¶ setvar "[Cont3]" ""¶ setvar "[Tot3]" ""¶ setvar "[Cont2]" ""¶ setvar "[Dummy]" ""¶ deletearray "DUMMY" "All"¶ deletearray "YTEMP" "All"¶endloop¶setvar "[Tot1]" ""¶setvar "[Cont1]" ""
LineColor=0
LineWidth=1
LineStyle=0
FillColor=12632256
FillPattern=0
Font=Arial
FontSize=10
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=5

=================

From Costa Rica
Pura Vida
User avatar
virger
 
Posts: 523
Joined: Mon Sep 18, 2006 12:21 pm
Location: Costa Rica, America Central

Return to Sample NeoBook Pubs

Who is online

Users browsing this forum: No registered users and 1 guest

cron