问一下pascal复刻版第三类事件触发的问题

怪羊基德

我最近想重温一下再战江湖以及再破菠萝。dos版运行不了，所以就下了复刻版玩
但是复刻版有一个比较麻烦的问题：每次人物行走到第3类事件触发点（而又没有触发）时就会停下来，得松开方向键再按下方向键才能继续移动。比如说再战江湖里面的山洞随机遇山贼，菠萝里面的随机遇敌。

我想尝试着修改源码解决这个问题。先想到是由于procedure CheckEvent3中的function WaitAnyKey导致的（checkevent中这个个waitanykey原本好像是用来防止按得太快错过事件）。但是我把checkevent3 中的那句waitanykey删掉以后问题依然没有解决。还是会停一下。

哪位高手指点一下，这个移动中停一下是怎么导致的？lua版和原版好像没有这个问题。后来基于Pascal版的前传好像也没有这个问题。是不是与50指令有关？应该怎么解决？

winson7891

第一，waitanykey有2个地方
第二，注意事件触发那（几）个功能，文件是及时读取的，由于没有预读，所以会有停顿

怪羊基德

明白了，原來是procedure CallEvent後面的這個SDL_EnableKeyRepeat(50, 30)惹得祸。看到这个函数名还以为是允许按键。网上查了一下才知道原来是设定按键间隔......
另外，把事件全部在启动时预读果然可以在触发点的时候快不少。
多谢解答！！

weyl

我在google code里面建了一个工程，看看能不能把多人的修改都提交进去
http://code.google.com/p/kys-jedisdl/

怪羊基德

晕，现在随机遇敌打完仗后就死机。。
终于搞定了！！居然都4点了...
把procedure CallEvent后面的四行代码
InitialScence;
  redraw;
  sdl_updaterect(screen, 0, 0, screen.w, screen.h);
  SDL_EnableKeyRepeat(50, 30);

全部移动到战斗事件（function instruct_6）后面就好了。（其他包括开箱子、子地图内出现消失物体什么的事件后面也加上这段）
这样，只有在触发这些有必要重汇地图或重新定义鼠标的事件后，才重汇地图以及重新定义鼠标有效间隔。就不会造成走路卡了。

至于预读事件信息，貌似影响很小。

怪羊基德

不是我改后才需要呀。我后面说的这个就是针对原始的程序而言。本来重汇地图语句和重新定义按键在calevent后面，这样无论触发什么事件都会运行这两句。而这两句话会使得连续按键中断，因此就导致了我一开始说的问题。
但是这两句话又不能直接删掉。一方面，战斗指令会让连续按键永久失效，所以后面必须用sdl-EnableKey重新允许连续按键。另一方面，有些事件比如说开宝箱会使屏幕中贴图改变，所以此时必须重汇，否则无法看到改变。
基于以上几点，我就把本来放在事件之后重置语句放在一些具体的指令后面，这就解决了在事件触发点走过时卡的问题(此时压根没有运行那两句导致卡的命令，当然就不会卡了)。

现在玩起来比较正常了，终于可以去好好重温当年的感觉了


NameSDL_EnableKeyRepeat- Set keyboard repeat rate.
Synopsis#include "SDL.h"
int SDL_EnableKeyRepeat(int delay, int interval);
DescriptionEnables or disables the keyboard repeat rate. delay specifies how long the key must be pressed before it begins repeating, it then repeats at the speed specified by interval. Both delay and interval are expressed in milliseconds.
Setting delay to 0 disables key repeating completely. Good default values are SDL_DEFAULT_REPEAT_DELAY and SDL_DEFAULT_REPEAT_INTERVAL.
Return ValueReturns 0 on success and -1 on failure.
戰鬥中會把key repeating關掉，所以戰鬥結束後要重新打開