Skip to Content

Register Login

Industry Online Support

Technical Forum

Navigation

Is it posible to clear all variables in a datablock

Created by: Jens_app at: 1/17/2011 11:18 AM (9 Replies)

Rating (4)

Thanks 8

10 Entries

1/17/2011 11:18 AM	Rate (0)
Jens_app Gold Member Joined: 1/5/2011 Last visit: 4/6/2023 Posts: 814 Rating: (119)	Is there a STL command to clear all variables in a datablock? Everything should be set to 0. Thanks
	Keep it simple and on-topic. A simple straight-to-the-point answer is often of more quality than a complicated one.
Suggestion To thank Quote Answer

1/17/2011 11:28 AM	Rate (1)
hdhosseini Diamond Expert Joined: 1/28/2009 Last visit: 5/26/2023 Posts: 6802 Rating: (1345)	Jens_app Is there a STL command to clear all variables in a datablock? Everything should be set to 0. Thanks This codes make all 300 words in datablock 2 to zero [code] OPN DB 2 L P#DBX 0.0 LAR1 L 300 LP: T #LP_CNT //INTEGER VARIABLE L 0 T W [AR1,P#0.0] L 2 SLW 3 +AR1 L #LP_CNT LOOP LP[/code]
	Last edited by: hdhosseini at: 1/17/2011 2:49 PM // UPDATED SLW 3 Demo Channel on Youtube
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users wirenut

1/17/2011 1:42 PM	Rate (0)
Zenta Silver Member Joined: 10/12/2006 Last visit: 5/24/2023 Posts: 206 Rating: (25)	Hi Jens_app, yes it is posibble with sfc21 FILL Regards Zenta
	Last edited by: Zenta at: 1/17/2011 5:47 PM
Suggestion To thank Quote Answer

1/17/2011 1:58 PM	Rate (2)
jacek d Platinum Expert Joined: 9/23/2005 Last visit: 5/30/2023 Posts: 4170 Rating: (643)	hdhosseini This codes make all 300 words in datablock 2 to zero [code]OPN DB 2 L P#DBX 0.0 LAR1 L 300 LP: T #LP_CNT //INTEGER VARIABLE L 0 T W [AR1,P#0.0] L 2 SLW 2 +AR1 L #LP_CNT LOOP LP[/code] First of all. If I got it well you wanted to move pointer by1 word (2 bytes), it should be SLD 3 instead ofSLW 2. (ok, it's enough to use SLW in this case, but let's do things properly) However, let me modify the code a little bit [code]OPN DB 2 LAR1 P#DBX 0.0 //LAR1/2can be loadedwith a constant L 0 LDBLG // it's possible to get lenght of DB in bytes - nice ... LP: TAK TB [AR1,P#0.0] +AR1 P#1.0 //adding pointer directly to LAR - 1 byte ahead TAK LOOP LP [/code] And the question is - where is the loop counter ?
	Last edited by: jacek d at: 1/17/2011 2:59 PM Regards, Jacek What is confusing you is the fact that you never see a number but always its digit representation. So you end up thinking that the number is the representation. - Andrej Bauer Any claims against me - based on whatever legal reason - resulting from the use of any code and/or ideas presented on this forum shall be excluded. #StayWithUkraine
Suggestion To thank Quote Answer
This contribution was helpful to 4 thankful Users Ton Verra hdhosseini Jens_app Karls1

1/17/2011 3:05 PM	Rate (0)
Jens_app Gold Member Joined: 1/5/2011 Last visit: 4/6/2023 Posts: 814 Rating: (119)	Thanks for the replies, going to study and test the code asap. Greetings Jens
	Keep it simple and on-topic. A simple straight-to-the-point answer is often of more quality than a complicated one.
Suggestion To thank Quote Answer

1/17/2011 3:27 PM	Rate (0)
Jens_app Gold Member Joined: 1/5/2011 Last visit: 4/6/2023 Posts: 814 Rating: (119)	Well I suppose youalwaysput the lenght of the datablock in ACCU1 using the TAK command to switch accu1 with accu2 right? And then you do ACCU1 - 1 everytime you loop till accu1 is equal to zero. Very clever of you :p
	Keep it simple and on-topic. A simple straight-to-the-point answer is often of more quality than a complicated one.
Suggestion To thank Quote Answer

1/17/2011 3:42 PM	Rate (1)
jacek d Platinum Expert Joined: 9/23/2005 Last visit: 5/30/2023 Posts: 4170 Rating: (643)	Right.
	Regards, Jacek What is confusing you is the fact that you never see a number but always its digit representation. So you end up thinking that the number is the representation. - Andrej Bauer Any claims against me - based on whatever legal reason - resulting from the use of any code and/or ideas presented on this forum shall be excluded. #StayWithUkraine
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users Jens_app

7/8/2013 10:48 AM	Rate (0)
Karls1 Posts: 139 Rating: (5)	jacek d hdhosseini This codes make all 300 words in datablock 2 to zero OPN DB 2 L P#DBX 0.0 LAR1 L 300 LP: T #LP_CNT //INTEGER VARIABLE L 0 T W [AR1,P#0.0] L 2 SLW 2 +AR1 L #LP_CNT LOOP LP First of all. If I got it well you wanted to move pointer by1 word (2 bytes), it should be SLD 3 instead ofSLW 2. (ok, it's enough to use SLW in this case, but let's do things properly) However, let me modify the code a little bit OPN DB 2 LAR1 P#DBX 0.0 //LAR1/2can be loadedwith a constant L 0 LDBLG // it's possible to get lenght of DB in bytes - nice ... LP: TAK TB [AR1,P#0.0] +AR1 P#1.0 //adding pointer directly to LAR - 1 byte ahead TAK LOOP LP And the question is - where is the loop counter ? Hello Experts, I am trying something like that and first of all many thanks to "jacek d" for sample code. In above example, i am not understand in this and [code]T B [AR1,P#0.0][/code] i think this should be[code]T W [AR1,P#0.0][/code] as need to fill 300 word, right? P.S The above sample code is working well when i test it. but i confusing in Black and White. Kindly help me to understand this. many thanks!
Karls1 Posts: 139 Rating: (5)
Suggestion To thank Quote Answer

7/8/2013 10:55 AM	Rate (0)
hdhosseini Diamond Expert Joined: 1/28/2009 Last visit: 5/26/2023 Posts: 6802 Rating: (1345)	Hello, Trick of his codes was finding the numbers of bytes in a DB in advance.Incrementing one byte is OK .It is for an arbitrary DB. L DBLG//it'spossibletogetlenghtofDBinbytes Best regards Hamid Hosseini
	Last edited by: hdhosseini at: 7/8/2013 11:13 AM Last edited by: hdhosseini at: 7/8/2013 10:57 AM Demo Channel on Youtube
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users Karls1

7/8/2013 11:13 AM	Rate (0)
Karls1 Posts: 139 Rating: (5)	Many Thanks Dear Hamid, now i am very clear Tested with Real Data and it's worked, too. but need to tested with real CPU to prevent unforeseen problem.
Karls1 Posts: 139 Rating: (5)
Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users hdhosseini

|

Share this page:

Share this page on...

Follow us on