forum.boolean.name

forum.boolean.name (http://forum.boolean.name/index.php)
-   2D-программирование (http://forum.boolean.name/forumdisplay.php?f=13)
-   -   Чертовщина какая-то!!! (http://forum.boolean.name/showthread.php?t=9706)

Jlemyp 04.11.2009 17:46
Чертовщина какая-то!!!
 
Обьясните почему так получается!В коде который ниже строчка Input$ игнорируется !!! Сразу срабатывает Stop! Если же создаю новый проект и перекидываю этот кусок то работает!
Код:
Function nem_rus()
aa$=Input$(" 3-создать игру  4-найти игру")
;WriteLine client,aa$
;WriteLine client,name$
Stop
Repeat
Cls
Text 100,100, "ЖДЕМ"
If ReadAvail(client)>0
  ip_prot=ReadInt(client)
  nam_prot$=ReadLine(client)
  nem=ReadInt(client)
  If nem=1
      nemec=True
      z=2
  Else
      nemec=False
      z=2
  EndIf
EndIf
Flip
Until z=2
End Function

NitE 04.11.2009 17:51
Ответ: Чертовщина какая-то!!!
 
Код:
Function nem_rus()
aa$=Input$(" 3-создать игру  4-найти игру")
;WriteLine client,aa$
;WriteLine client,name$
Stop
Repeat
Cls
Text 100,100, "ЖДЕМ"
If ReadAvail(client)>0
  ip_prot=ReadInt(client)
  nam_prot$=ReadLine(client)
  nem=ReadInt(client)
  If nem=1
      nemec=True
      z=2
  Else
      nemec=False
      z=2
  EndIf
EndIf
Flip
Until z=2
End Function
потомучто они закоменнтированы.
убери отмеченное.

Jlemyp 04.11.2009 17:54
Ответ: Чертовщина какая-то!!!
 
я имею ввиду строчку выше Input$. На ней программа не останавливается!

Jlemyp 04.11.2009 18:00
Ответ: Чертовщина какая-то!!!
 
Все разобрался! У меня получалось при входе в эту функцию,нажатая клавиша Энтер! Обнулил информацию о нажатии клавиши с помощью FlushKeys и сработало!

IGR 04.11.2009 18:01
Ответ: Чертовщина какая-то!!!
 
строчка выше это название функции ??
ты хочеш там остановить программу ??


Часовой пояс GMT +4, время: 13:47.

vBulletin® Version 3.6.5.
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Перевод: zCarot