WALLOP

File

SCRIPT\WALLOP.DAT

Usage of file

Stores overview of wallops (when usermode +w is on)

Usage in PnP

Loads wallops overview in PnP > Options > Display > Wallops

  ; Display - Wallops
  :12
  loadbuf -otwallop $dname 263 "script\dlgtext.dat"
  if ($hget(pnp.config,wallop.on)) did -c $dname 253
  did -c $dname 263 $calc(1 + $findtok(-si2 @Wallop,$hget(pnp.config,wallop.win),32))
  var %ln = 1,%filter = $hget(pnp.config,wallop.f)
  while ($read(script\wallop.dat,n,%ln)) {
    var %data = $ifmatch,%to = 258
    if ($mid(%filter,%ln,1)) %to = 256
    did -a $dname %to %data
    did -i $dname $calc(%to + 1) $didwm($dname,%to,%data,1) %ln
    inc %ln
  }
  return