kvisc/vm/in/STRING

31 lines
753 B
Plaintext

# The OS/K Team licenses this file to you under the MIT license.
# See the LICENSE file in the project root for more information.
#---------------------------------------------------------------------------#
# String manipulation instructions #
#---------------------------------------------------------------------------#
#
# Scan string for a particular value (SCASx)
#
# WHILE RCX > 0 DO
# RCX = RCX - 1
#
# IF ([%1] == 0) OR ([%1] == $2) THEN
# BREAK
# ELSE
# %1 = %1 + sizeof(x)
# FI
# DONE
#
#
# Note: Does not move past the value when found
#
scasb 2
scasw 2
scasd 2
scasq 2
#---------------------------------------------------------------------------#