[Libreoffice-commits] help.git: source/text
Stanislav Horacek
stanislav.horacek at gmail.com
Fri Jul 25 01:13:36 PDT 2014
source/text/sbasic/shared/03080101.xhp | 4 ++--
source/text/sbasic/shared/03080102.xhp | 4 ++--
source/text/sbasic/shared/03080103.xhp | 4 ++--
source/text/sbasic/shared/03080104.xhp | 4 ++--
source/text/sbasic/shared/03080601.xhp | 4 ++--
source/text/sbasic/shared/03090301.xhp | 4 ++--
6 files changed, 12 insertions(+), 12 deletions(-)
New commits:
commit 9b91dd5b4b0f98ff105c2d66bf59cff1e1ff6066
Author: Stanislav Horacek <stanislav.horacek at gmail.com>
Date: Thu Jul 24 20:09:18 2014 +0200
remove redundant dollars at InputBox function and fix invalid Basic examples
Change-Id: Idd6f14e127ba5e3939849b0baf7ec499e69e8695
Reviewed-on: https://gerrit.libreoffice.org/10517
Reviewed-by: Caolán McNamara <caolanm at redhat.com>
Tested-by: Caolán McNamara <caolanm at redhat.com>
diff --git a/source/text/sbasic/shared/03080101.xhp b/source/text/sbasic/shared/03080101.xhp
index dcd1ede..e1e35b1 100644
--- a/source/text/sbasic/shared/03080101.xhp
+++ b/source/text/sbasic/shared/03080101.xhp
@@ -62,8 +62,8 @@
<paragraph role="bascode" id="par_id3151112" xml-lang="en-US" l10n="U" oldref="19">' rounded Pi = 3.14159 Is a predefined constant</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim d1 As Double</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim d2 As Double</paragraph>
-<paragraph role="bascode" id="par_id3149262" xml-lang="en-US" l10n="U" oldref="22"> d1 = InputBox$ ("Enter the length of the side adjacent to the angle: ","Adjacent")</paragraph>
-<paragraph role="bascode" id="par_id3149482" xml-lang="en-US" l10n="U" oldref="23"> d2 = InputBox$ ("Enter the length of the side opposite the angle: ","Opposite")</paragraph>
+<paragraph role="bascode" id="par_id3149262" xml-lang="en-US" l10n="U" oldref="22"> d1 = InputBox("Enter the length of the side adjacent to the angle: ","Adjacent")</paragraph>
+<paragraph role="bascode" id="par_id3149482" xml-lang="en-US" l10n="U" oldref="23"> d2 = InputBox("Enter the length of the side opposite the angle: ","Opposite")</paragraph>
<paragraph role="bascode" id="par_id3155415" xml-lang="en-US" l10n="U" oldref="24"> Print "The Alpha angle is"; (atn (d2/d1) * 180 / Pi); " degrees"</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph>
</bascode>
diff --git a/source/text/sbasic/shared/03080102.xhp b/source/text/sbasic/shared/03080102.xhp
index 3385f8c..8fd32f8 100644
--- a/source/text/sbasic/shared/03080102.xhp
+++ b/source/text/sbasic/shared/03080102.xhp
@@ -61,8 +61,8 @@
<paragraph role="bascode" localize="false" xml-lang="en-US">Sub ExampleCosinus</paragraph>
<paragraph role="bascode" id="par_id3150010" xml-lang="en-US" l10n="U" oldref="19">' rounded Pi = 3.14159</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim d1 As Double, dAngle As Double</paragraph>
-<paragraph role="bascode" id="par_id3144764" xml-lang="en-US" l10n="U" oldref="21"> d1 = InputBox$ (""Enter the length of the adjacent side: ","Adjacent")</paragraph>
-<paragraph role="bascode" id="par_id3154491" xml-lang="en-US" l10n="U" oldref="22"> dAngle = InputBox$ ("Enter the angle Alpha (in degrees): ","Alpha")</paragraph>
+<paragraph role="bascode" id="par_id3144764" xml-lang="en-US" l10n="U" oldref="21"> d1 = InputBox("Enter the length of the adjacent side: ","Adjacent")</paragraph>
+<paragraph role="bascode" id="par_id3154491" xml-lang="en-US" l10n="U" oldref="22"> dAngle = InputBox("Enter the angle Alpha (in degrees): ","Alpha")</paragraph>
<paragraph role="bascode" id="par_id3151074" xml-lang="en-US" l10n="U" oldref="23"> Print "The length of the hypothenuse is"; (d1 / cos (dAngle * Pi / 180))</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph>
</bascode>
diff --git a/source/text/sbasic/shared/03080103.xhp b/source/text/sbasic/shared/03080103.xhp
index 94d5181..2793c39 100644
--- a/source/text/sbasic/shared/03080103.xhp
+++ b/source/text/sbasic/shared/03080103.xhp
@@ -62,8 +62,8 @@
<paragraph role="bascode" id="par_id3150011" xml-lang="en-US" l10n="U" oldref="19">' Pi = 3.1415926 is a predefined variable</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim d1 As Double</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim dAlpha As Double</paragraph>
-<paragraph role="bascode" id="par_id3145251" xml-lang="en-US" l10n="U" oldref="22"> d1 = InputBox$ ("Enter the length of the opposite side: ","Opposite Side")</paragraph>
-<paragraph role="bascode" id="par_id3148456" xml-lang="en-US" l10n="U" oldref="23"> dAlpha = InputBox$ ("Enter the angle Alpha (in degrees): ","Alpha")</paragraph>
+<paragraph role="bascode" id="par_id3145251" xml-lang="en-US" l10n="U" oldref="22"> d1 = InputBox("Enter the length of the opposite side: ","Opposite Side")</paragraph>
+<paragraph role="bascode" id="par_id3148456" xml-lang="en-US" l10n="U" oldref="23"> dAlpha = InputBox("Enter the angle Alpha (in degrees): ","Alpha")</paragraph>
<paragraph role="bascode" id="par_id3153877" xml-lang="en-US" l10n="U" oldref="24"> Print "The length of the hypotenuse is"; (d1 / sin (dAlpha * Pi / 180))</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph>
</bascode>
diff --git a/source/text/sbasic/shared/03080104.xhp b/source/text/sbasic/shared/03080104.xhp
index 7f0e470..0130c68 100644
--- a/source/text/sbasic/shared/03080104.xhp
+++ b/source/text/sbasic/shared/03080104.xhp
@@ -62,8 +62,8 @@
<paragraph role="bascode" id="par_id3153158" xml-lang="en-US" l10n="U" oldref="19">' Pi = 3.1415926 is a pre-defined variable</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim d1 As Double</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim dAlpha As Double</paragraph>
-<paragraph role="bascode" id="par_id3145252" xml-lang="en-US" l10n="U" oldref="22"> d1 = InputBox$ ("Enter the length of the side opposite the angle: ","opposite")</paragraph>
-<paragraph role="bascode" id="par_id3149582" xml-lang="en-US" l10n="U" oldref="23"> dAlpha = InputBox$ ("Enter the Alpha angle (in degrees): ","Alpha")</paragraph>
+<paragraph role="bascode" id="par_id3145252" xml-lang="en-US" l10n="U" oldref="22"> d1 = InputBox("Enter the length of the side opposite the angle: ","opposite")</paragraph>
+<paragraph role="bascode" id="par_id3149582" xml-lang="en-US" l10n="U" oldref="23"> dAlpha = InputBox("Enter the Alpha angle (in degrees): ","Alpha")</paragraph>
<paragraph role="bascode" id="par_id3154016" xml-lang="en-US" l10n="U" oldref="24"> Print "the length of the side adjacent the angle is"; (d1 / tan (dAlpha * Pi / 180))</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph>
</bascode>
diff --git a/source/text/sbasic/shared/03080601.xhp b/source/text/sbasic/shared/03080601.xhp
index 1e0a4ad..3663143 100644
--- a/source/text/sbasic/shared/03080601.xhp
+++ b/source/text/sbasic/shared/03080601.xhp
@@ -54,8 +54,8 @@
<paragraph role="bascode" localize="false" xml-lang="en-US">Sub ExampleDifference</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim siW1 As Single</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim siW2 As Single</paragraph>
-<paragraph role="bascode" id="par_id3145786" xml-lang="en-US" l10n="U" oldref="14"> siW1 = Int(InputBox$ ("Please enter the first amount","Value Input"))</paragraph>
-<paragraph role="bascode" id="par_id3149561" xml-lang="en-US" l10n="U" oldref="15"> siW2 = Int(InputBox$ ("Please enter the second amount","Value Input"))</paragraph>
+<paragraph role="bascode" id="par_id3145786" xml-lang="en-US" l10n="U" oldref="14"> siW1 = Int(InputBox("Please enter the first amount","Value Input"))</paragraph>
+<paragraph role="bascode" id="par_id3149561" xml-lang="en-US" l10n="U" oldref="15"> siW2 = Int(InputBox("Please enter the second amount","Value Input"))</paragraph>
<paragraph role="bascode" id="par_id3145750" xml-lang="en-US" l10n="U" oldref="16"> Print "The difference is "; Abs(siW1 - siW2)</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph>
</bascode>
diff --git a/source/text/sbasic/shared/03090301.xhp b/source/text/sbasic/shared/03090301.xhp
index 18b88d2..117c632 100644
--- a/source/text/sbasic/shared/03090301.xhp
+++ b/source/text/sbasic/shared/03090301.xhp
@@ -61,8 +61,8 @@
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim iInputa As Single</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim iInputb As Single</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US">Dim iInputc As Single</paragraph>
-<paragraph role="bascode" id="par_id3146970" xml-lang="en-US" l10n="U" oldref="25"> iInputa = Int(InputBox$ "Enter the first number: ","NumberInput"))</paragraph>
-<paragraph role="bascode" id="par_id3150329" xml-lang="en-US" l10n="U" oldref="26"> iInputb = Int(InputBox$ "Enter the second number: ","NumberInput"))</paragraph>
+<paragraph role="bascode" id="par_id3146970" xml-lang="en-US" l10n="U" oldref="25"> iInputa = Int(InputBox("Enter the first number: ","NumberInput"))</paragraph>
+<paragraph role="bascode" id="par_id3150329" xml-lang="en-US" l10n="U" oldref="26"> iInputb = Int(InputBox("Enter the second number: ","NumberInput"))</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US"> iInputc=iInputa</paragraph>
<paragraph role="bascode" localize="false" xml-lang="en-US"> GoSub SquareRoot</paragraph>
<paragraph role="bascode" id="par_id3154756" xml-lang="en-US" l10n="U" oldref="29"> Print "The square root of";iInputa;" is";iInputc</paragraph>
More information about the Libreoffice-commits
mailing list