トップページ⇒bath
119コメント51KB

銭湯での風変わりな注意、禁止事項

■ このスレッドは過去ログ倉庫に格納されています
0001|男|名無し湯|女|2006/10/27(金) 07:30:56ID:KQab+oA3
「刺青を入れた人の入場禁止」、「酒に酔った人の入浴禁止」などはあるけど。
0069|男|名無し湯|女|2007/12/23(日) 21:01:00ID:Q7K+YiMa
Sub Macro51()

On Error GoTo Err:
With ActiveWorkbook.Worksheets(ActiveWorkbook.ActiveSheet.Name)

行 = 1
Set xml = CreateObject("WinHttp.WinHttpRequest.5.1")
Set doc = CreateObject("Microsoft.XMLDOM") 'メモ CreateObjectするより、参照設定で指定したほうが本当はいいかも。

doc.Async = False '非同期をやめる。つまり同期にする。

'シーケンス1 リダイレクト先を取得
A = xml.option(6)
xml.option(6) = False '6=WinHttpRequestOption_EnableRedirects 'リダイレクトさせない

URL = "https://sec-sso.gmo.jp/webservice/ws-redirect?u=" & .Cells(行, 3)
xml.Open "GET", URL, False
xml.send

Debug.Print xml.responseText

Location = xml.getResponseHeader("Location") 'リダイレクト先URLの取得
AA = InStr(Len("https://kabu.gmo.jp/sec"), Location, "/")
基底URL = Left(xml.getResponseHeader("Location"), AA - 1)

xml.option(6) = True '6=WinHttpRequestOption_EnableRedirects '以後はリダイレクトをさせる
0070|男|名無し湯|女|2007/12/23(日) 21:01:44ID:Q7K+YiMa
'シーケンス2 リダイレクト先へ飛んでセッションIDを取得

URL = Location
xml.Open "GET", URL, False
xml.send
Debug.Print xml.responseText

doc.loadXML (xml.responseText)
If doc.documentElement.selectSingleNode("responseStatus").nodeTypedValue <> "OK" Then
msg = doc.documentElement.selectSingleNode("message").nodeTypedValue
MsgBox "GMO側が以下のエラーを返しました" + vbCrLf + "[" + msg + "]"
Exit Sub
End If


'シーケンス3 ユーザ認証とリダイレクトでURLをたどっていく
URL = 基底URL & "/ws-login?j_username=" & .Cells(行, 3) & "&j_password=" & .Cells(行, 4)
'url=https://kabu.gmo.jp/sec1-6/ws-login?j_username=999999999&j_password=111111
'Debug.Print url

xml.Open "GET", URL, False
xml.send
Debug.Print xml.responseText

doc.loadXML (xml.responseText)
If doc.documentElement.selectSingleNode("responseStatus").nodeTypedValue = "NG" Then
If doc.documentElement.selectSingleNode("message").nodeTypedValue = "Authentication Failure." Then
MsgBox ("ユーザIDまたはパスワードが誤っています")
Exit Sub
ElseIf doc.documentElement.selectSingleNode("message").nodeTypedValue = "Web service is not permitted." Then
'2007/04/03現在、GMOはこのエラーをかえさない。正常になる。ただし発注や一覧を問い合わせるとエラーになる
MsgBox ("GMOホームページに行って利用設定が必要です")
Exit Sub
Else
msg = doc.documentElement.selectSingleNode("message").nodeTypedValue
MsgBox "GMO側が以下のエラーを返しました" + vbCrLf + "[" + msg + "]"
Exit Sub
End If
ElseIf doc.documentElement.selectSingleNode("responseStatus").nodeTypedValue <> "OK" Then
msg = doc.documentElement.selectSingleNode("message").nodeTypedValue
MsgBox "GMO側が以下のエラーを返しました" + vbCrLf + "[" + msg + "]"
Exit Sub
End If

sndPlaySound ThisWorkbook _
.Path & "\login2.wav", 1

End With

Exit Sub

Err:
MsgBox "エラーが発生しました" + vbCrLf + Err.Description, vbOKOnly
End Sub
0071|男|名無し湯|女|2007/12/23(日) 21:05:01ID:Q7K+YiMa
Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Dim xml As Object
Dim doc As Object
Dim 基底URL As String
Sub Macro50()
Dim msg As String

On Error GoTo Err:
If xml Is Nothing Then
MsgBox "Loginされていません。Loginしてください", vbOKOnly
Exit Sub
End If

With ActiveWorkbook.Worksheets(ActiveWorkbook.ActiveSheet.Name)
行 = 11
AAA = Buy.TextBox1
BBB = Buy.TextBox2
CCC = Buy.TextBox3
If Buy.OptionButton1.Value = True Then
DDD = "001"
ElseIf (Buy.OptionButton2.Value = True) Then
DDD = "002"
ElseIf (Buy.OptionButton3.Value = True) Then
DDD = "006"
ElseIf (Buy.OptionButton4.Value = True) Then
DDD = "007"
End If

If Buy.OptionButton7.Value = True Then
EEE = "01"
ElseIf (Buy.OptionButton8.Value = True) Then
EEE = "02"
ElseIf (Buy.OptionButton9.Value = True) Then
EEE = "04"
End If
0072|男|名無し湯|女|2007/12/23(日) 21:15:57ID:Q7K+YiMa
doc.Async = False

URL = 基底URL & "/ws/kabu/kabuChumon.do?"
URL = URL & "skc=" + AAA + "&tht=21&bbt=2&kzt=2&sjt=" + DDD + "&thn=" + BBB + "&snp=" + CCC + "&nyf=false&dat=1&skt=" + EEE + "&syt=1"
Debug.Print URL

'url = "https://kabu.gmo.jp/sec1-6/ws/kabu/kabuChumon.do?skc=9449&tht=11&bbt=2&kzt=2&sjt=001&thn=100&snp=890&nyf=false&dat=1&skt=01&syt=0"

xml.Open "GET", URL, False
xml.send
'Debug.Print xml.getAllResponseHeaders
'Debug.Print xml.statusText
'Debug.Print xml.Status
Debug.Print xml.responseText

doc.loadXML (xml.responseText)
If doc.documentElement.selectSingleNode("responseStatus").nodeTypedValue <> "OK" Then
msg = doc.documentElement.selectSingleNode("message").nodeTypedValue
MsgBox "GMO側が以下のエラーを返しました" + vbCrLf + "[" + msg + "]"
Exit Sub
End If

sndPlaySound ThisWorkbook _
.Path & "\seikou.wav", 1

End With

Exit Sub

Err:
MsgBox "エラーが発生しました" + vbCrLf + Err.Description, vbOKOnly
End Sub
0073|男|名無し湯|女|2007/12/23(日) 21:17:26ID:Q7K+YiMa
Private Sub SpinButton4_SpinUp()

On Error Resume Next

If 1999 >= oohike.TextBox6.Value Then
oohike.TextBox6.Value = oohike.TextBox6.Value + 1
End If

If oohike.TextBox6.Value < 3000 Then
If oohike.TextBox6.Value >= 2000 Then
oohike.TextBox6.Value = oohike.TextBox6.Value + 5
End If
End If

If 3000 <= oohike.TextBox6.Value Then
If 30000 > oohike.TextBox6.Value Then
oohike.TextBox6.Value = oohike.TextBox6.Value + 10
End If
End If
If 50000 <= oohike.TextBox6.Value Then
If 100000 > oohike.TextBox6.Value Then
oohike.TextBox6.Value = oohike.TextBox6.Value + 100
End If
End If


If oohike.TextBox6.Value = "" Then
oohike.TextBox5.Value = 0
End If
If 100000 <= oohike.TextBox6.Value Then
oohike.TextBox6.Value = oohike.TextBox6.Value + 1000

End If

End Sub
0074|男|名無し湯|女|2007/12/23(日) 21:17:56ID:Q7K+YiMa
Private Sub SpinButton4_SpinDown()

On Error Resume Next

If 2000 >= oohike.TextBox6.Value Then
oohike.TextBox6.Value = oohike.TextBox6.Value - 1
End If

If oohike.TextBox6.Value < 3000 Then
If oohike.TextBox6.Value > 2000 Then
oohike.TextBox6.Value = oohike.TextBox6.Value - 5
End If
End If

If 3000 <= oohike.TextBox6.Value Then
If 30000 >= oohike.TextBox6.Value Then
oohike.TextBox6.Value = oohike.TextBox6.Value - 10
End If
End If
If 50000 <= oohike.TextBox6.Value Then
If 100000 >= oohike.TextBox6.Value Then
oohike.TextBox6.Value = oohike.TextBox6.Value - 100
End If
End If

If oohike.TextBox6.Value = "" Then
oohike.TextBox5.Value = 0
End If
If 100000 < oohike.TextBox6.Value Then
oohike.TextBox6.Value = oohike.TextBox6.Value - 1000
End If

End Sub
0075|男|名無し湯|女|2007/12/23(日) 21:31:38ID:Q7K+YiMa
Private Sub SpinButton3_SpinUp()

On Error Resume Next

If oohike.TextBox5.Value < 100 Then
oohike.TextBox5.Value = oohike.TextBox5.Value + 1
End If
If oohike.TextBox5.Value >= 100 Then
If oohike.TextBox5.Value <= 1900 Then
oohike.TextBox5.Value = oohike.TextBox5.Value + 100
End If
End If
If oohike.TextBox5.Value >= 2000 Then
oohike.TextBox5.Value = oohike.TextBox5.Value + 1000
End If

End Sub
Private Sub SpinButton3_SpinDown()

On Error Resume Next

If oohike.TextBox5.Value < 100 Then
oohike.TextBox5.Value = oohike.TextBox5.Value - 1
End If
If oohike.TextBox5.Value >= 100 Then
If oohike.TextBox5.Value <= 1900 Then
oohike.TextBox5.Value = oohike.TextBox5.Value - 100
End If
End If
If oohike.TextBox5.Value >= 2000 Then
oohike.TextBox5.Value = oohike.TextBox5.Value - 1000
End If

End Sub
0076|男|名無し湯|女|2007/12/23(日) 21:36:05ID:Q7K+YiMa
Private Sub CommandButton5_Click()

Call Macro51

End Sub
0077|男|名無し湯|女|2007/12/23(日) 23:33:01ID:Q7K+YiMa
指定時刻 = TimeValue(Range("L1") & "時" & Range("L4") & "分" & "00秒") 'スタート時間

待ち時間 = TimeValue("00時" & "00分" & "30秒") '30秒
0078|男|名無し湯|女|2007/12/28(金) 13:10:11ID:Mg6CxPpA
http://s10.kabu.co.jp/faq/qa.asp?qa=1259 http://38.119.88.64/downloadlink.php?cat=video&file=
0079|男|名無し湯|女|2007/12/28(金) 13:10:35ID:Mg6CxPpA
http://shane01.blog80.fc2.com/
0080営業時間2008/01/10(木) 11:28:50ID:tVZ49mFW
http://kabup.tank.jp/img/1199787977554.jpg
0081 ◆.bMars.Des 2008/01/10(木) 21:07:05ID:VMwqrXol
 
0082 ◆PGMars.pK. 2008/01/10(木) 21:07:48ID:VMwqrXol
 
0083API2008/01/20(日) 14:52:05ID:ZjqTclM4
Sub 注文一覧_Click()
On Error GoTo Err:

If xml Is Nothing Then
MsgBox "Loginされていません。Loginしてください", vbOKOnly
Exit Sub
End If

With ActiveWorkbook.Worksheets(ActiveWorkbook.ActiveSheet.Name)
行 = 21

doc.async = False

url = 基底URL & "/ws/kabu/kabuChumonList.do"
'url="https://kabu.gmo.jp/sec1-6/ws/kabu/kabuChumonList.do"
xml.Open "GET", url, False
xml.send
Debug.Print xml.responseText

doc.loadXML (xml.responseText)
If doc.documentElement.selectSingleNode("responseStatus").nodeTypedValue <> "OK" Then
msg = doc.documentElement.selectSingleNode("message").nodeTypedValue
MsgBox "GMO側が以下のエラーを返しました" + vbCrLf + "[" + msg + "]"
Exit Sub
End If

'Debug.Print xml.getAllResponseHeaders
'Debug.Print xml.statusText
'Debug.Print xml.Status
'Debug.Print xml.responseText

Set chumonListItems = doc.documentElement.selectSingleNode("chumonList").childNodes
0084API2008/01/20(日) 14:52:26ID:ZjqTclM4
ii = 0
Do While ii < chumonListItems.Length And ii < 15
Set chumonListItem = chumonListItems.Item(ii)

.Cells(行 + ii, 3) = "'" & chumonListItem.selectSingleNode("chumonBango").nodeTypedValue
.Cells(行 + ii, 4) = chumonListItem.selectSingleNode("meigara").Attributes.getNamedItem("shokenCode").nodeTypedValue
.Cells(行 + ii, 7) = chumonListItem.selectSingleNode("torihiki").nodeTypedValue
.Cells(行 + ii, 6) = chumonListItem.selectSingleNode("baibai").nodeTypedValue
.Cells(行 + ii, 5) = "'" & chumonListItem.selectSingleNode("shijo").nodeTypedValue


.Cells(行 + ii, 10) = chumonListItem.selectSingleNode("juchuSuryo").nodeTypedValue
.Cells(行 + ii, 11) = chumonListItem.selectSingleNode("miyakujoSuryo").nodeTypedValue

.Cells(行 + ii, 13) = chumonListItem.selectSingleNode("sashine").nodeTypedValue
.Cells(行 + ii, 14) = chumonListItem.selectSingleNode("heikinYakujoTanka").nodeTypedValue
.Cells(行 + ii, 15) = "'" & chumonListItem.selectSingleNode("shikko").nodeTypedValue




ii = ii + 1
Loop
If ii < chumonListItems.Length Then
MsgBox ("注文が15件以上あります")
End If
Do While ii < 15 'ゴミ掃除
.Rows(行 + ii) = Null
ii = ii + 1
Loop

End With

Exit Sub

Err:
MsgBox "エラーが発生しました" + vbCrLf + Err.Description, vbOKOnly

End Sub
0085API2008/01/20(日) 15:28:00ID:ZjqTclM4
Dim xml As Object
Dim doc As Object
Dim 基底URL As String
0086API2008/01/20(日) 15:35:44ID:ZjqTclM4
http://sky.geocities.jp/mujintrading/ 
0087|男|名無し湯|女|2008/01/21(月) 22:41:49ID:TFHtYsd1
Sub TE1()

Teisei.OptionButton1.Value = True
Teisei.Top = Itiran.Top + 1
Teisei.Left = Itiran.Left + 20
Teisei.Show
Teisei.TextBox10 = Itiran.Spreadsheet1.Range("F1")
Teisei.TextBox11 = Itiran.Spreadsheet1.Range("E1")
Teisei.Label1 = Itiran.Spreadsheet1.Range("C1")
Teisei.Label2 = Itiran.Spreadsheet1.Range("B1")
Teisei.Label3 = Itiran.Spreadsheet1.Range("A1")
P1 = Itiran.TextBox1
Teisei.Label5 = Itiran.TextBox1
P2 = Itiran.TextBox11
P3 = Itiran.TextBox51
With Teisei.TextBox10
.SelStart = 0
.SelLength = 6
Teisei.SpinButton1.SetFocus

If Itiran.Spreadsheet1.Range("D1") = "現物" Then

URL03 = "https://trade.net.sec.kazaka.jp/IMode/00002V1Y/imode/kbodr/tsei_kai_h?d=" + P2 + "&n=" + P1 + "&t=0&k=" + P3

Itiran.WebBrowser2.Navigate URL03

ElseIf Itiran.Spreadsheet1.Range("D1") = "信用新規" Then

URL003 = "https://trade.net.sec.kazaka.jp/IMode/00002V1Y/imode/sinyo/tsei_tku_h?d=" + P2 + "&n=" + P1 + "&t=0&k=" + P3

Itiran.WebBrowser2.Navigate URL003

Do While Itiran.WebBrowser2.ReadyState <> 4 '4の完了以外ループ
DoEvents
Loop
Do While Itiran.WebBrowser2.Document.ReadyState <> "complete"
DoEvents
Loop

End If
End With

Teisei.Label4 = Itiran.Spreadsheet1.Range("D1")

End Sub
0088API2008/01/22(火) 20:50:02ID:80axMbmp
Sub 変更_Click()

On Error GoTo Err:
If xml Is Nothing Then
MsgBox "Loginされていません。Loginしてください", vbOKOnly
Exit Sub
End If

With ActiveWorkbook.Worksheets(ActiveWorkbook.ActiveSheet.Name)
行 = 17

doc.async = False

url = 基底URL & "/ws/kabu/kabuChumonHenko.do?"
url = url & "cmk=" & .Cells(行, 3) & "&snp=" & .Cells(行, 4) & "&nyf=false"
Debug.Print url

'url = "https://kabu.gmo.jp/sec1-6/ws/kabu/kabuChumonHenko.do?cmk=999999999999999999&snp=9999&nyf=false"

xml.Open "GET", url, False
xml.send
'Debug.Print xml.getAllResponseHeaders
'Debug.Print xml.statusText
'Debug.Print xml.Status
'Debug.Print xml.responseText

doc.loadXML (xml.responseText)
If doc.documentElement.selectSingleNode("responseStatus").nodeTypedValue <> "OK" Then
msg = doc.documentElement.selectSingleNode("message").nodeTypedValue
MsgBox "GMO側が以下のエラーを返しました" + vbCrLf + "[" + msg + "]"
Exit Sub
End If

msg = doc.documentElement.selectSingleNode("message").nodeTypedValue
MsgBox (msg)

End With

Exit Sub
Err:
MsgBox "エラーが発生しました" + vbCrLf + Err.Description, vbOKOnly
End Sub
0089AV2008/01/25(金) 18:35:00ID:hAY7uhgB
保存はできるよ。
ページが開いたら、アドレスの「media」を「downloadfile」に書き換えれば、
いつもどおりDLはできる。
0090AV2008/01/27(日) 21:03:34ID:cFiC6q0Q
http://shane01.blog80.fc2.com/

http://38.119.88.64/downloadlink.php?cat=video&file=

downloadfile

0091|男|名無し湯|女|2008/02/10(日) 20:13:53ID:t+j0hMyt
http://kcware.rave.jp/pukiwiki/index.php?%A5%DE%A1%BC%A5%B1%A5%C3%A5%C8%A5%B9%A5%D4%A1%BC%A5%C9%A5%E9%A5%A4%A5%D6%A5%E9%A5%EA
マーケットスピードライブラリ
0092|男|名無し湯|女|2008/02/11(月) 12:18:16ID:EKxg8U3n
CPU 計算速度測定
http://nagoya.cool.ne.jp/kositori/pc/cpu.html
0093AV2008/02/25(月) 23:00:27ID:CRuQYZ+R
http://www.yourfilehost.com/media.php?cat=video&file=57380a.wmv
http://www.yourfilehost.com/media.php?cat=video&file=07220721_blyu01.wmv
0094AV2008/04/01(火) 23:02:59ID:X6XI8CGQ
http://www.yourfilehost.com/media.php?cat=video&file=nonomiyarin_0312_001.wmv
0095AV2008/04/14(月) 21:14:59ID:wLp1YHFR
きれいなOL系?浴衣がとても似合う。
ttp://www.yourfilehost.com/media.php?cat=video&file=yukata_bijinsex001.wmv
ttp://www.yourfilehost.com/media.php?cat=video&file=yukata_bijinsex002.wmv
ttp://www.yourfilehost.com/media.php?cat=video&file=yukata_bijinsex003.wmv
ttp://www.yourfilehost.com/media.php?cat=video&file=yukata_bijinsex004.wmv
ttp://www.yourfilehost.com/media.php?cat=video&file=yukata_bijinsex005.wmv
ttp://www.yourfilehost.com/media.php?cat=video&file=yukata_bijinsex006.wmv
ttp://www.yourfilehost.com/media.php?cat=video&file=yukata_bijinsex007.wmv
ttp://www.yourfilehost.com/media.php?cat=video&file=yukata_bijinsex008.wmv
ttp://www.yourfilehost.com/media.php?cat=video&file=yukata_bijinsex009.wmv
0096AV2008/04/14(月) 21:15:14ID:wLp1YHFR
きれいなOL系?浴衣がとても似合う。
ttp://www.yourfilehost.com/media.php?cat=video&file=yukata_bijinsex001.wmv
001-009
0097|男|名無し湯|女|2008/06/10(火) 02:26:01ID:vSxtYsVh
( ̄ω ̄)
0098|男|名無し湯|女|2009/07/06(月) 19:39:18ID:hotZK2tY
なんだこのスレw
0099|男|名無し湯|女|2009/07/16(木) 06:09:27ID:I4uwjzTo
俺の行くところは、子供が走っていたら注意してくださいって書いてあるよ。
0100|男|名無し湯|女|2009/07/17(金) 19:35:07ID:gS324G04
入浴剤の持込はお断りしています
ってなのがあったな。
0101|男|名無し湯|女|2009/07/24(金) 10:03:07ID:ZOWriY0B
うろおぼえだが

「人は右側を歩く 昔も今も」
みたいなのがあった
意味不明だった
0102|男|名無し湯|女|2009/08/02(日) 19:17:49ID:oZfZApa0
たいていサウナ室って裸にタオルぐらいで入る物だが、
札幌と、あと京都もそうだったかな?パンツはいて入るところもあるんだな。
マナーですから、パンツをはいてください、みたいな。
だいぶ前のことだから、今は違うかもしれん。
0103|男|名無し湯|女|2009/08/04(火) 17:36:07ID:cvQsClAt
青木禁止
0104|男|名無し湯|女|2009/08/21(金) 15:47:47ID:owDTQvr3
パンツなんて履いて入ったら汚いな
なんでそんなことするんだろ
0105|男|名無し湯|女|2009/09/02(水) 16:06:27ID:7SFCbHSg
身体を洗うときに面倒臭そうだ
0106|男|名無し湯|女|2009/09/22(火) 13:06:36ID:DP55b7xe
今は亡き「東京温泉」(八重洲にあったサウナ)も、入浴用パンツを穿かされた。
背中を洗うおばちゃんたちに、チ○コが見えないようにするため。

錦糸町にある楽天地サウナは、背中を洗ってもらう際には、下半身にタオルをかけるよう、注意書きがあったと記憶しているが、それ以外はみんなぶらぶらしている。
まぁ、おばちゃんたちからすれば、あくまで体の一部であって、どうでもいいんだろう。
0107|男|名無し湯|女|2009/09/23(水) 23:38:56ID:zPNEyJsT
>>103
なにそれ?
0108|男|名無し湯|女|2010/01/22(金) 01:16:26ID:pykJ6pSE
注意事項ではないけど、銭湯の風変わりな紹介画像。

ttp://www.minatonoyu.com/bath/dangler.html

0109|男|名無し湯|女|2010/01/22(金) 02:06:01ID:9YJCd9xx
>>8
> どこの銭湯か忘れたんだけど、多分、東京・江東区か墨田区ですが、
> 風呂場にコンビニ袋持参禁止と書いてあった。意味が未だにわからない。

俺はデパートの紙袋に着替え等一式を入れていくけど、扱いが違うWWW
ホームレスの入店を拒否するために掲示してあるのでは?
0110|男|名無し湯|女|2010/03/10(水) 07:38:34ID:Zwrhhpqx
台湾の温泉に、高温と低温があって、高温側の注意事項に、未成年が入ると、生殖機能に悪影響があるから、入るなって、あった。

日本だと熱い風呂に我慢して入れって言われてたのに
0111|男|名無し湯|女|2010/09/09(木) 17:21:16ID:Z8eHb3HY
変な決まりだね
0112|男|名無し湯|女|2011/02/07(月) 18:30:42ID:6wZi2id3
埼玉県の 放歌禁止
広範的にいうと迷惑行為のうちに入るとは思うけど。
東京だとここまではっきりとは書いていなかったので、
最初はつらかった。
0113|男|名無し湯|女|2011/02/08(火) 01:18:53ID:f8Wc4/Am
名古屋市東区にあるデキマチ温泉、脱衣所に注意書きがびっしり。
かくのが面倒くさい位かいてあるので省略するが、一番びっくりしたのは「入浴は二時間まで、あがったら20分以内に帰って下さい」にはびっくりしたわ。
銭湯ってくつろぐ場所じゃないの?
0114|男|名無し湯|女|2011/02/08(火) 09:07:56ID:Vy0AoxCq
>>7っぽいっていうか、確か「淫らな行為はおやめください」とかだったような、
そんな注意書きなら、A県T市の最老舗のスパ銭のS風呂に確かそんな注意書きがマジであった記憶がうっすらとあるw
0115|男|名無し湯|女|2011/02/08(火) 11:29:53ID:Avp9hdkw
皮かぶりの方は、きちんと剥いて荒い終えてから湯船に入ってください
0116|男|名無し湯|女|2011/03/01(火) 01:12:00.75ID:HkWp6P/X
薬物中毒者の方入浴禁止ってあったよ
刺青オッケーのとこだけど。
0117|男|名無し湯|女|2011/03/25(金) 02:01:55.64ID:eg1KGHtX
ホモ以外の人は入浴できません
チンポが勃起したら必ず抜いてください
猪又ホモ蔵36才 スーパーホモ警備員
0118|男|名無し湯|女|2011/09/27(火) 13:05:53.75ID:6lQmjfmM
スカトロプレイ禁止
0119|男|名無し湯|女|2011/09/28(水) 01:36:22.75ID:nlN79Kt/
シャワーのプッシュノブを足で押すな、ってのがあるけど。
5秒もしないで止まるシャワーを忙しく手で押し続ける‥とうのは一応カネ払
ってのんびり入浴しに来てる身としては是非とも改善を求めたい‥とは思う。
■ このスレッドは過去ログ倉庫に格納されています