Source language: Translate to:

arrange in order

General questions about NeoBook

Moderator: Neosoft Support

Re: arrange in order

Postby virger » Thu Mar 31, 2016 3:46 pm

Sorry !!!
I test this..Try please.

Code: Select all
{NeoBook 5 Objects}
NeoBookVer=5.80
ObjectType=10
Name=LsUnSort
X=141
Y=106
W=165
H=176
Anchor=0
Text=[ls]
VarName=[vDatSort]
VarType=1
XPTheme=Yes
LineColor=0
LineWidth=1
LineStyle=0
FillColor=15856113
FillPattern=0
Font=Arial
FontSize=14
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=3
ObjectType=3
Name=BtOrder
X=362
Y=163
W=90
H=27
Anchor=0
Text=Order
Align=2
ImageStyle=0
XPTheme=Yes
ObjAction=.1) Create a ListBoxSize "LsUnSort" 'NOT-SORT' Append ALL Data¶.   with List Items == [Ls]¶.2) Data in this format:¶.   001.Team Name1¶.   021.Team Name21¶.   999.Team Name999¶.3) Execute Button Actions¶¶ListBoxSort "LsUnSort" "True"¶ListBoxSize "LsUnSort" "[LenSort]"¶setvar "[lz]" ""¶loop "[LenSort]" "1" "[i]"¶    ListBoxGetItem "LsUnSort" "[i]" "[vDatSort]"¶    setvar "[lz]" "[lz][vDatSort][#13][#10]"¶endloop¶setvar "[ls]" ""¶ListBoxSort "LsUnSort" "False"¶setvar "[ls]" "[lz]"¶setvar "[lz]" ""
LineColor=0
LineWidth=1
LineStyle=0
FillColor=15856113
FillPattern=0
Font=Arial
FontSize=14
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=2
ObjectType=9
Name=EnData
X=309
Y=106
W=160
H=23
Anchor=0
Text=001.Virger
VarName=[dt]
Align=1
EditLen=0
LineColor=0
LineWidth=1
LineStyle=0
FillColor=15856113
FillPattern=0
Font=Arial
FontSize=12
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=4
ObjectType=3
Name=BtInc
X=309
Y=130
W=90
H=32
Anchor=0
Text=Include
Align=2
Key=13
ImageStyle=0
XPTheme=Yes
ObjAction=ListBoxAddItem "LsUnsort" "0" "[dt]"¶Random "999" "[rn]"¶¶if "[rn]" "<" "10"¶    setvar "[rn]" "00[rn]"¶else¶    if "[rn]" "<" "100"¶        setvar "[rn]" "0[rn]"¶    endif¶endif¶¶setvar "[dt]" "[rn]."
LineColor=0
LineWidth=1
LineStyle=0
FillColor=15856113
FillPattern=0
Font=Arial
FontSize=14
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=5
COSTA RICA
PURA VIDA
User avatar
virger
 
Posts: 509
Joined: Mon Sep 18, 2006 12:21 pm
Location: Costa Rica, America Central

Re: arrange in order

Postby martinp » Fri Apr 01, 2016 8:02 am

thanks, what does each button do and where do I place the score scripts?
Script : [T1] this is the script label for team one's score
martinp
 
Posts: 50
Joined: Fri May 20, 2005 6:18 am

Re: arrange in order

Postby virger » Fri Apr 01, 2016 4:42 pm

Bueno; hasta aqui mi ayuda !
Good; to here my help !

Code: Select all
{NeoBook 5 Objects}
NeoBookVer=5.80
ObjectType=8
Name=Inf1
X=6
Y=206
W=315
H=29
Anchor=0
Font=Arial
FontSize=14
FontStyle=0
FontCharset=1
TextColor=0
Text={\rtf1\ansi\deff0\deftab254{\fonttbl{\f0\fnil\fcharset1 Arial;}}{\colortbl\red0\green0\blue0;\red255\green0\blue0;\red0\green128\blue0;\red0\green0\blue255;\red255\green255\blue0;\red255\green0\blue255;\red128\green0\blue128;\red128\green0\blue0;\red0\green255\blue0;\red0\green255\blue255;\red0\green128\blue128;\red0\green0\blue128;\red255\green255\blue255;\red192\green192\blue192;\red128\green128\blue128;\red0\green0\blue0;\red0\green0\blue0;}\paperw12240\paperh15840\margl1440\margr1440\margt1440\margb1440\margh720\margf720{\*\pnseclvl1\pnucrm\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl2\pnucltr\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl3\pndec\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl4\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{)}}}¶{\*\pnseclvl5\pndec\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl6\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl7\pnlcrm\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl8\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl9\pndec\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶\endnhere\sectdefaultcl{\pard{\qr\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs28\cf0 Team:\tab \tab \tab \tab \tab \tab \tab \tab \tab Score:}}¶}
HMargin=0
VMargin=4
LineColor=0
LineWidth=0
LineStyle=0
FillColor=15856113
FillPattern=1
TabOrder=8
ObjectType=8
Name=Inf2
X=350
Y=206
W=284
H=29
Anchor=0
Font=Arial
FontSize=14
FontStyle=0
FontCharset=1
TextColor=0
Text={\rtf1\ansi\deff0\deftab254{\fonttbl{\f0\fnil\fcharset1 Arial;}}{\colortbl\red0\green0\blue0;\red255\green0\blue0;\red0\green128\blue0;\red0\green0\blue255;\red255\green255\blue0;\red255\green0\blue255;\red128\green0\blue128;\red128\green0\blue0;\red0\green255\blue0;\red0\green255\blue255;\red0\green128\blue128;\red0\green0\blue128;\red255\green255\blue255;\red192\green192\blue192;\red128\green128\blue128;\red0\green0\blue0;\red0\green0\blue0;}\paperw12240\paperh15840\margl1440\margr1440\margt1440\margb1440\margh720\margf720{\*\pnseclvl1\pnucrm\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl2\pnucltr\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl3\pndec\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{.}}}¶{\*\pnseclvl4\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb}{\pntxta{)}}}¶{\*\pnseclvl5\pndec\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl6\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl7\pnlcrm\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl8\pnlcltr\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶{\*\pnseclvl9\pndec\pnstart1\pnhang\pnindent720{\pntxtb{(}}{\pntxta{)}}}¶\endnhere\sectdefaultcl{\pard{\qc\li0\fi0\ri0\sb0\sl\sa0 \plain\f0\fs28\cf0 RESULT}}¶}
HMargin=0
VMargin=4
LineColor=0
LineWidth=0
LineStyle=0
FillColor=15856113
FillPattern=1
TabOrder=7
ObjectType=10
Name=LsUnSort
X=326
Y=234
W=311
H=130
Anchor=0
Text=[ls]
VarName=[vDatSort]
VarType=1
XPTheme=Yes
LineColor=0
LineWidth=1
LineStyle=0
FillColor=15268064
FillPattern=0
Font=Arial
FontSize=14
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=2
ObjectType=3
Name=BtOrder
X=430
Y=382
W=90
H=27
Anchor=0
Text=Order
Align=2
ImageStyle=0
XPTheme=Yes
ObjAction=.1) Create a ListBoxSize "LsUnSort" 'NOT-SORT' Append ALL Data¶.   with List Items == [Ls]¶.2) Data in this format:¶.   001.Team Name1¶.   021.Team Name21¶.   999.Team Name999¶.3) Execute Button Actions¶¶ListBoxSort "LsUnSort" "True"¶ListBoxSize "LsUnSort" "[LenSort]"¶setvar "[lz]" ""¶loop "[LenSort]" "1" "[i]"¶    ListBoxGetItem "LsUnSort" "[i]" "[vDatSort]"¶    setvar "[lz]" "[lz][vDatSort][#13][#10]"¶endloop¶setvar "[ls]" ""¶ListBoxSort "LsUnSort" "False"¶setvar "[ls]" "[lz]"¶setvar "[lz]" ""
LineColor=0
LineWidth=1
LineStyle=0
FillColor=15856113
FillPattern=0
Font=Arial
FontSize=14
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=1
ObjectType=3
Name=BtIncData
X=88
Y=382
W=165
H=29
Anchor=0
Text=Include Data
Align=2
ImageStyle=0
XPTheme=Yes
ObjAction=ListBoxSize "LsTeam" "[len]"¶loop "1" "[len]" "[ts]"¶    ListBoxGetItem "LsTeam"  "[ts]" "[team]"¶    ListBoxGetItem "LsScore" "[ts]" "[score]"¶¶    setvar "[rn]" "[score]"¶    if "[rn]" "<" "10"¶        setvar "[rn]" "00[rn]"¶    else¶        if "[rn]" "<" "100"¶            setvar "[rn]" "0[rn]"¶        endif¶    endif¶¶    setvar "[dt]" "[rn].[team]"¶    ListBoxAddItem "LsUnSort" "0" "[dt]"¶endloop
LineColor=0
LineWidth=1
LineStyle=0
FillColor=15856113
FillPattern=0
Font=Arial
FontSize=14
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=6
ObjectType=10
Name=LsTeam
X=5
Y=234
W=246
H=130
Anchor=0
Text=Real Madrid¶Barcelona FC¶Deportivo Espanol¶Real Sporting de Gijón¶Club Deportivo Badajoz¶Sevilla Fútbol Club¶Deportivo de La Coruña¶Real Betis Balompié¶Levante Unión Deportiva¶Real Club Deportivo Gara¶Club de Santander¶Club Deportivo Basconia¶Alicante Club de Fútbol¶Deportivo Mallorca¶Club Deportivo Acero¶Deportivo Alavés
VarName=[Team]
VarType=0
XPTheme=Yes
LineColor=0
LineWidth=1
LineStyle=0
FillColor=14739704
FillPattern=0
Font=Arial
FontSize=14
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=10
ObjectType=10
Name=LsScore
X=253
Y=234
W=71
H=130
Anchor=0
Text=123¶35¶111¶23¶56¶87¶93¶113¶74¶18¶46¶91¶105¶8¶66¶50
VarName=[Score]
VarType=0
XPTheme=Yes
LineColor=0
LineWidth=1
LineStyle=0
FillColor=16308440
FillPattern=0
Font=Arial
FontSize=14
FontStyle=0
FontCharset=1
TextColor=0
TabOrder=9
COSTA RICA
PURA VIDA
User avatar
virger
 
Posts: 509
Joined: Mon Sep 18, 2006 12:21 pm
Location: Costa Rica, America Central

Re: arrange in order

Postby martinp » Sat Apr 02, 2016 4:46 am

Gracias, las secuencias de comandos funciona perfectamente

Thanks you, the script works perfectly
martinp
 
Posts: 50
Joined: Fri May 20, 2005 6:18 am

Previous

Return to General NeoBook Discussions

Who is online

Users browsing this forum: No registered users and 2 guests